|
|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 9216 (0x2400)
Types: TextFile
Names: »hpasc0«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »hpasc0«
(*$M20 COMPILE 68000 *)
(*$L+ OPTIONS HERE *) (* %M% %I% %H% ID KEYWORDS TO SCCS *)
(* +++++++++++++++++++++++++++++++++++++++++++++++++++++++*
* *
* 10/7/73 SYNTAX ANALYSIS INCLUDING ERROR *
* HANDLING; CHECKS BASED ON DECLARA- *
* TIONS; ADDRESS AND CODE GENERATION *
* FOR A HYPOTHETICAL STACK COMPUTER *
* URS AMMANN ETH ZURICH *
* *
* 05/20/74 *
* THE COMPILER IS NOW WRITTEN IN A SUBSET OF *
* STANDARD PASCAL - AS DEFINED IN THE NEW *
* MANUAL BY K. JENSEN AND N. WIRTH - AND IT *
* PROCESSES EXACTLY THIS SUBSET. *
* KESAV NORI ETH ZURICH *
* *
* THE COMPILER IS NOW CHANGED TO: *
* *
* -PRODUCE THE INTERMEDIATE CODE IN AN *
* ASSEMBLER READABLE FORM (NAMELY THE *
* 370, ASSEMBLER_H), 15-NOV-75. *
* *
* -PRESERVE PROCEDURE NAMES AND THEIR *
* STATIC LEVELS AT THE OBJECT LEVEL, THUS *
* ALLOWING A SET OF 'DISPLAY' REGISTERS TO *
* BE USED IN ACCESSING NON_LOCAL, NON_GLOBAL *
* VARIABLES (INSTEAD OF GOING THROUGH A *
* CHAIN OF POINTERS), 10-DEC-75. *
* *
* -INCLUDE THE TYPE OF THE OPERANDS IN THE *
* P_INSTRUCTIONS AS FOLLOWS: *
* *
* A : ADDRESS (POINTER) OPERAND *
* B : BOOLEAN " *
* C : CHARACTER " *
* I : INTEGER " *
* R : REAL " *
* S : SET " *
* *
* THE P_INSTRUCTION NOW LOOKS LIKE: *
* (LAB) OPCODE (TYPE),(OPERANDS) *
* A NEW PROCEDURE 'HALT(RC: INTEGER)' IS *
* ADDED TO THE SET OF STANDARD PROCEDURES *
* TO FACILITATE TERMINATING A PROGRAM AT *
* ANY POINT AND RETURNING A 'RETURN CODE' *
* TO THE OPERATING SYSTEM, 26-JAN-76. *
* *
* -TREAT THE INPUT AS A TEXT FILE WITH *
* LINES (RECORDS) OF LINELGTH CHAR. EACH, *
* THIS ALLOWS A MORE EFFICIENT STRING *
* ORIENTED INPUT, 20-MAR-76. *
* *
* -ALLOCATE AND PROPERLY ALIGN VARIABLES ON *
* THE BASIS OF THEIR TYPES, I.E. *
* *
* TYPE SIZE ALIGNED ON *
* *
* B,C 1-BYTE 1-BYTE *
* A,I 4-BYTES 4-BYTE *
* S 8-BYTES 4-BYTE *
* R 8-BYTES 8-BYTE *
* *
* DYNAMIC STORAGE HOWEVER IS ALWAYS ALLOC- *
* CATED ON 8-BYTE BOUNDARIES TO AVOID RUN- *
* TIME CHECKING OVERHEAD, 25-APR-76. *
* *
* -'READ' OF 'STRING' VARIABLES (I.E. ARRAY *
* OF CHAR) IS NOW IMPLEMENTED AND IT IS TO *
* COMPLEMENT THE SIMILAR 'WRITE' FUNCTION. *
* ALSO THE STANDARD PROCEDURE: *
* TRAP(I: INTEGER; VAR V: (.ANY TYPE.) ); *
* IS ADDED TO THE SET OF STANDARD PROCEDURES *
* TO FACILITATE COMMUNICATION WITH THE OUT- *
* SIDE WORLD, 10-SEP-76. *
* *
* -RELEVENT INFORMATION ON/ABOUT PROCEDURES *
* ARE NOW SENT TO 'QRD' FILE. THIS INCLUDES *
* SUCH INFORMATION AS THE SIZE OF THE PROCE- *
* DURE AS WELL AS ITS DATA AREA, LIST OF THE *
* PROCEDURES CALLED AND THE # OF CALLS, THE *
* LEVEL OF THE HIGHEST_LEVEL PROCEDURE CALLED *
* ETC. THIS INFORMATION IS MAINLY INTENDED *
* FOR INTER_PROCEDURAL ANALYSIS, BUT IT IS *
* ALSO USEFUL FOR MORE EFFICIENT PROCEDURE *
* ENTRY/EXIT CODE, 22-MAR-77. *
* *
* -THE COMPILER IS NOW SET UP TO GENERATE *
* P_CODE SUITABLE FOR A MICRO_PROCESSOR *
* IMPLEMENTATION. THE LENGTH (IN # OF *
* BYTES) OF BASIC DATA TYPES AS WELL AS *
* THE FORMAT OF THE OUTPUT IS (SLIGHTLY) *
* DIFFERENT FROM THAT OF THE 370 VERSION, *
* 11-FEB-78. *
* *
* *
* THE ABOVE CHANGES (INCLUDING ADDITIONS AND/OR *
* DELETIONS) HAVE BEEN TAGGED BY A '#' TAG AT *
* THE BEGINNING OR THE END OF AFFECTED LINES. *
* S. HAZEGHI SLAC *
* *
* *
* NEW CHANGES MADE 12/78 BY EPS (MARKED BY 'EPS') *
* TO PERMIT COMPILATION BY THE BERKELEY UNIX *
* COMPILER. *
* -FIX LOOSE TYPE MATCHES (ARG TO GENLABEL) *
* (TYPE OF CSTPART) *
* -CHANGE READ(LINEBUF) TO FOR LOOP WHICH *
* READS CHAR BY CHAR *
* -FILL IN ALL UNUSED VARIANTS OF RECORD *
* CASES *
* -COMMENT ALL UNUSED VARIABLES *
* -COMMENT ALL # COMMENTS PUT IN BY HAZEGHI *
* *
* SKIP STRITTER *
* MOTOROLA *
* *
* GOTO'S ELIMINATED IN INSYMBOL, NEW1, SEARCHID, *
* SEARCHSECTION, AND CASESTATEMENT FOR COMPILATION *
* BY NBS COMPILER *
* 12/28/78 EPS MOTOROLA *
* *
* 01/04/79 CHANGES IN INSYMBOL (COLLECTING *
* INTEGERS) FOR NON-DECIMAL RADIX INTEGER CONSTANTS *
* (OF THE FORM RR#NN...N WHERE RR IS BASE 10 AND *
* 1 <= RR <= 16 AND N < RR ) EPS *
* *
* 01/05/79 CHANGE INSYMBOL AND ADD ARRAY UPPER FOR *
* TRANSLATION OF ALL INPUT IDENTIFIERS AND *
* RESERVED WORDS TO UPPER CASE - UPPER CASE *
* AND LOWER CASE ARE INDISTINGUISHABLE TO THE *
* COMPILER EXCEPT IN STRINGS EPS *
* *
* 01/23/79 UPDATE INSYMBOL TO ACCEPT MOTOROLA *
* OPTIONS EPS *
* *
* 01/23/79 CREATE WARNING FACILITY SIMILAR TO *
* EXISTING ERROR FACILITY. NEW PROC WARNING; *
NEW CLOBALS WARNINGS:BOOLEAN AND WARNCOUNT:
* INTEGER EPS*
**
* 01/23/79 CHANGES TO SUPPORT ALPHANUMERIC *
* LABELS. CHANGES MADE IN 'LABELDECL', *
▶EOF◀