Initial revision

This commit is contained in:
ceriel
1988-10-04 10:56:50 +00:00
parent 7bac6eb164
commit a66faf4100
27 changed files with 17054 additions and 0 deletions

15
lang/a68s/aem/dec_main.p Normal file
View File

@@ -0,0 +1,15 @@
PROCEDURE dbug (number : INTEGER);
BEGIN
writeln('dbug value',number)
END;
PROCEDURE dump (VAR start,finish : INTEGER); EXTERN;
BEGIN
reset(A68INIT);
reset(LGO);
reset(SOURCDECS);
rewrite(LSTFILE);
rewrite(DUMPF);
dump(firststack, laststack);
END.