home *** CD-ROM | disk | FTP | other *** search
- ;*******************************************
- ;*
- ;* File compile script
- ;* by Giovanni Lambiase (C) 1995
- ;*
- ;* This script compile a file and place
- ;* object and executable files in RAM:
- ;* This script needs PED: handler mounted.
- ;*
- ;*******************************************
-
- .key file
- .bra {
- .ket }
-
- FailAt 30
-
- IF "{file}" EQ ""
- ; Wait CR
- ECHO "No file selected..."
- ECHO ""
- ECHO "Press return to continue..."
- ProgED:SASC_Support/ReturnWait
- ELSE
- ; Run SCMSG
- SYS:REXXC/RX ProgED:SASC_Support/RunSCMSG.script
-
- ; CD in RAM:
- CD RAM:
-
- ; Compile file given
- SC:C/SC LINK ERRREXX PED:{file} OBJNAME RAM:
-
- ; Wait CR
- ECHO ""
- ECHO "Press return to continue..."
- ProgED:SASC_Support/ReturnWait
-
- ; Goto on first error
- SYS:REXXC/RX ProgED:SASC_Support/FirstError.script
- ENDIF
-