home *** CD-ROM | disk | FTP | other *** search
- .Key file
- ; Atomizes a C program Version 1.02
- failat 65535
- if not exists df1:examples/<file$t1>.o
- echo "File examples/<file$t1>.o does not exist. Try again."
- skip END
- endif
-
- copy df1:examples/<file$t1>.o ram:<file$t1>.o
-
- if not exists ram:<file$t1>.o
- echo "File <file$t1>.o not copied to ram: Error..."
- skip END
- endif
-
- echo "-- atomizing <file$t1>..."
-
- df1:c/atom ram:<file$t1>.o ram:<file$t1>.o.TMP -cdb -pc
-
- if not exists ram:<file$t1>.o.TMP
- echo "File ram:<file$t1>.o.TMP does not exist. Error..."
- skip END
- endif
-
- delete df1:examples/<file$t1>.o
-
- copy ram:<file$t1>.o.TMP df1:examples/<file$t1>.o
-
- if not exists df1:examples/<file$t1>.o
- echo "File ram:<file$t1>.o not copied to df1:examples/
- copy ram:<file$t1>.o df1:examples/<file$t1>.o
- skip END
- endif
-
- delete ram:<file$t1>.o
-
- LAB END
-