|
DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1250 (0x4e2)
Types: TextFile
Names: »CC.J«
└─⟦8c095a7f3⟧ Bits:30005798 CR80 Disc Pack ( Vol ILS systemdisk XAMOS TOS 10:01 hard boot #43c 19-7-87/JFJ )
└─ ⟦this⟧ »CC.J«
└─⟦c2e810e96⟧ Bits:30005799 CR80 Disc Pack ( XAMOS 841129 ILS TOS 10-01 System Disk Tilhører ILS/MSG hard boot boot entry #43c )
└─ ⟦this⟧ »CC.J«
WRITELN DEFINE OLDVERIFY VERIFY DEFINE VERIFY 0 DEFINE CPPFROM 'S' IF (P2 <> 'CT') AND (P3 <> 'CT') THEN GOTO CPP LABEL CTRACE DEFINE CPPFROM 'MCCT' CREATE $P1$$.MCCT R/10 COUT:@NULL-FILE*V*F IF CC <> 0 THEN RESET $P1$$.MCCT WRITELN 'C Trace Executing .............' @**CTRACE -i @**PREFIXES.D*MXAMOS.D*C.D* -- $P1$$.S COUT:$P1$$.MCCT IF CC <> 0 THEN WRITELN 'ERROR IN CTRACE' IF CC <> 0 THEN GOTO END REMOVE CTRACE.ERROR LABEL CPP WRITELN 'C Preprocessor Executing ......' @**CPP -pf $P1$$.P -x -i @**PREFIXES.D*MXAMOS.D*C.D* -o $P1$$.MCPP -- $P1$$.$CPPFROM IF CC <> 0 THEN WRITELN 'ERROR IN CPP' IF CC <> 0 THEN GOTO END WRITELN 'C Compiler Pass 1 Executing ...' @**CP1 -n32 -pf $P1$$.P -t -m -b0 -o $P1$$.MCP1 -- $P1$$.MCPP IF CC <> 0 THEN WRITELN 'ERROR IN CP1' IF CC <> 0 THEN GOTO END WRITELN 'C Compiler Pass 2 Executing ...' @**CP2 -m -o $P1$$.MCP2 -- $P1$$.MCP1 IF CC <> 0 THEN WRITELN 'ERROR IN CP2' IF CC <> 0 THEN GOTO END MASM I:$P1$$.MCP2 O:$P1$$.L P:$P1$$.A.P L:1 IF CC <> 0 THEN WRITELN 'ERROR IN MASM' IF CC <> 0 THEN GOTO END LABEL END IF (P2 = 'NR') OR (P3 = 'NR') THEN GOTO NO_REMOVE DREMOVE M:$P1$$.MC PR:NO LABEL NO_REMOVE DEFINE VERIFY OLDVERIFY DELETE OLDVERIFY