.TITLE	ORCID ORC IDENTIFIER
	.IDENT	/V01.7/
	.ENABL	LC
;
; THIS MODULE CONTAINS THE ORC IDENTIFIER
;
; X01	23-OCT-78	ORIGINAL ORCAM
;			LOCAL SYMBOL BLOCKS DEFINED FOR I PSECTS
;
; X02	26-OCT-78	ALLOW CSECTS FOR FORTRAN FILES
;			VARIOUS CHANGES FOR F4P FILES
;			INCLUDE RELOCATION TYPES 3,12,14
;			GENERATE LABEL FOR TRANSFER ADDRESS
;
; X03	29-DEC-78	CORRECT BUG IN "GLOBAL(R0)"
;			INCLUDE COMPLEX RELOCATION
;			CORRECT OUTPUT FOR SPL AND MARK
;
; X04	 9-FEB-79	IMPROVE ERROR RECOVERY
;			CORRECT INCREL TO COPE WITH COMPLEX RELOCATION
;			CHANGE LOCAL SYMBOL FORMAT - ALLOW 25 PSECTS
; X04.1	13-MAR-79	CORRECT BUG WITH RLD RECORDS AT START OF FILE
; X04.2	21-MAR-79	PRINT ASCII CHARS ONLY IF IN RANGE 40-137
;			ALLOW I/D FLIPS (CONDITIONAL ASSEMBLY)
;
; V01	27-APR-79	MAKE INTTXT A SUBROUTINE
;			IMPROVE PROCESSING OF DATA PSECTS
; V01.1	24-MAY-79	IMPROVE CODE IN I/O ROUTINES
;			ALLOCATE TABLE SPACE AT TASK BUILD TIME
;			REORGANISE FOR OVERLAY TO FIT INTO 8K
; V01.2 30-OCT-79	CORRECT BUG FOR LC MOD
;			ALLOW FOR RAD50 STRINGS AT ODD ADDRESSES
;
; V01.3 5-NOV-81	FORCE FLOATING IMMEDIATE CONSTANT TO BE OCTAL
;			DON'T JUST PRINT A BLANK LINE FOR CODE 260
;			DO NOTHING FOR .BLKB  0
;			ADD THE NEW 11/44 AND 11/60 INSTRUCTIONS:-
;				CSM, LDUB, MED, MFPT, MNS, & MPP
;			FORCE ASSIGN OF SCRATCH FILE DEVICE TO SY: BECAUSE
;			OF ASG PROBLEM WHEN INSTALLED IN RUNNING SYSTEM.
;
; V01.4	5-May-83	Output messages in mixed case and print all ASCII chars,
;			even LC letters (requires .ENABL LC in header).
;
; V01.5 14-Aug-85 CJD	Merge in mods from [VAX83C.EVERHART.DGTETC] -- mainly
;			  switches for PSECT type setting.
;			Recognise MFPS, MTPS, TSTSET, WRTLCK, MED6X, MED74C,
;			  XFC, and CIS instructions.
;			Correct bug that .WORD x in I PSECT is treated as an
;			  instruction, even when x is an address (local or global)
;			Note that in several places CMPs with OBJLEN and OBLEN2
;			  are followed by signed branches -- should be UNsigned,
;			  in case the buffers ever get into high memory.
;			Correct some bugs in RLD handling caused by assumptions
;			  that all entries start at even addresses, giving odd
;			  address failures if they don't.
;			Handle .WORD x's, where x is local or global symbol, in
;			  instruction as well as data PSECTs. Also handle
;			  TRAP/EMT g correctly, where g is global.
;
; V01.6 20-Dec-85 CJD	Correct bug in ORCSUB induced by V01.5
;
; V01.7	16-Oct-86 CJD	Correct more V01.5 induced bugs in ORCSUB!
;			Make .BYTE global work in I PSECT.
;			Open temporary file using OPNT$D, for automatic deletion.
;			Add code to flush out all unassigned labels at end
;			  (includes symbol definitions XXX==1234 etc.)
;			Handle condition where object file text record ends in
;			  the middle of an "instruction" (which presumably wasn't!)
;			  -- used to put in junk and/or loop forever.

	.PSECT	$ORCID,D
IDENT::	.ASCII	/V01.7 /
	.END