Google
 

Trailing-Edge - PDP-10 Archives - bb-x130a-sb - failsa.opr
There are 6 other files named failsa.opr in the archive. Click here to see a list.
	FAILSA.OPR					2 AUG. 1971

$=ALTMODE

ASSEMBLY & LOADING INSTRUCTIONS FOR FAILSAFE FOR SYSTEMS NOT DESIRING
AUTOMATIC REWINDS EXCEPT AT END OF TAPE. THIS IS THE STANDARD VERSION.

.LOAD FAILSA.MAC

.SAVE DSK: FAILSA


ASSEMBLY AND LOADING INSTRUCTIONS FOR SYSTEMS DESIRING AUTOMATIC REWINDS
BEFORE AND AFTER EXECUTION OF EACH COMMAND.  SEE BELOW FOR OTHER OPTIONS.
NOTE THAT DETAILED EXPLANATIONS ARE AVAILABLE IN THE SOURCE,
SHOULD QUESTION ARISE AS TO WHAT IS BEING GENERATED.


[DISK FILE PARAMS.MAC CONSISTS OF: REWIND==1]



.R PIP
*DSK:FAILSA.NEW/B_PARAMS.MAC,FAILSA.MAC
*^C
.R MACRO
*DSK:FAILSA,_FAILSA.NEW
*^C
.R LOADER
*FAILSA$
EXIT
.SAVE DSK: FAILSA


	NOTE: TO MAKE FAILWC, INCLUDE IN PARAMS.MAC
	THE STATEMENT
	LEVELC==200000		;LEVELC COMPATIBILITY CODE TO BE ASSEMBLED
	CREATE FAILSA.NEW (AS ABOVE) BY COMBINING PARAMS.MAC AND FAILSA.MAC
	ASSEMBLE FAILSA.NEW, CREATING FAILSA.REL (AS ABOVE)
	LOAD FAILSA.REL(AS ABOVE)
	BUT SAVE AS FAILWC [SAVE DSK:FAILWC]






SIMILARLY, INCLUDING THE FOLLOWING DEFINITIONS IN PARAMS.MAC

DEBUG=1			(GENERATES CODE WHICH FACILITATES DEBUGGING)
			[NORMAL CASE IS DEBUG=0]
PRIVL=1			(GENERATES CODE WHICH RESTRICTS /G & /O TO 1,2)
			[NORMAL CASE IS PRIVL=0]
ALPJ1R=0		(ELIMINATES CODE WHICH BYPASSES PROJECT 1 FILES FROM /F AND /E CRITERIA CHECKS ON RESTORE)
			[NORMALLY, ALPJ1S AND ALPJ1R =NOT DEFINED EXPLICITLY
			AND ARE THEREFORE SET TO 1 INTERNALLY, SETTING UP THE BYPASS]
ALPJ1S=0		(ELIMINANTES CODE WHICH BYPASSES ALL PROJECT 1 FILES FROM /E AND /F CRITERIA CHECKS ON SAVE)

BELL=1			(GENERATES CODE WHICH GIVES ^G + * IN LIEU OF *)
			[NORMALLY, BELL=0]
LEVELC=200000		(GENERATES CODE WHICH ALLOWS 5-SERIES TAPES TO BE RESTORED TO 4-SERIES SYSTEMS)
			NOTE WELL:* IF LEVELC IS 000000, VERSION # IS INCREMENTED BY 1, WITH RESPECT TO LEVELC=200000! *

			[NORMALLY, LEVELC=0]
PAGING=1		(GENERATES LINKED LITERAL TEXT SUCH THAT IN-
			FREQUENTLY USED MESSAGES WILL RESIDE IN A CONTIGUOUS AREA, SOMEWHAT
			REMOVED FROM THE MAIN BODY OF EXECUTABLE CODE.  NOTE THAT THE LINK GEN-
			ERATED OFTEN TIMES INCREASES THE AMOUNT OF CORE NECESSARY TO DELIVER THE MESSAGE)
			[PAGING=0 NORMALLY]