Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

!
! NAME: FORMAT.CTL
! DATE: 01-DEC-77
!
!
!THIS CONTROL FILE IS PROVIDED FOR INFORMATION PURPOSES ONLY.  THE
!PURPOSE OF THE FILE IS TO DOCUMENT THE PROCEDURES USED TO BUILD
!THE DISTRIBUTED SOFTWARE.  IT IS UNLIKELY THAT THIS CONTROL FILE
!WILL BE ABLE TO BE SUBMITTED WITHOUT MODIFICATION ON CONSUMER
!SYSTEMS.  PARTICULAR ATTENTION SHOULD BE GIVEN TO ERSATZ DEVICES
!AND STRUCTURE NAMES, PPN'S, AND OTHER SUCH PARAMETERS.  SUBMIT
!TIMES MAY VARY DEPENDING ON SYSTEM CONFIGURATION AND LOAD.  THE
!AVAILABILITY OF SUFFICIENT DISK SPACE AND CORE IS MANDATORY.
!
!
! FUNCTION:	THIS CONTROL FILE BUILDS FORMAT FROM ITS BASIC
!		SOURCES.

!		THE FILE PRODUCED ON <SUBSYS> BY THIS JOB IS:
!				FORMAT.EXE
!
!		THIS JOB ALSO PRODUCES A .CRF LISTING OF THE 
!		SOURCE CODE.
!
! SUBMIT WITH THE SWITCH "/TAG:CREF" TO OBTAIN
!   A .CRF LISTING OF THE SOURCE FILE
!
!
@DEF FOO: NUL:
@GOTO A
!
CREF:: @DEF FOO: DSK:
!
!
A::
!
!
@INFORMATION LOGICAL-NAMES ALL
!
! TAKE A CHECKSUMMED DIRECTORY OF ALL THE INPUT FILES
!
@VDIRECT SYS:MONSYM.UNV,SYS:MACRO.EXE,SYS:CREF.EXE,SYS:LINK.EXE,FORMAT.MAC,
@CHECKSUM SEQ
@
@
@
@RUN SYS:MACRO
@INFORMATION VERSION
@GET SYS:LINK
@INFORMATION VERSION
@GET SYS:CREF
@INFORMATION VERSION
!
@DELETE FORMAT.REL
@IF(ERROR) @GOTO E
E:: !REL FILE MAY NOE EXIST
@COMPILE /CREF FORMAT.MAC
!
@R CREF
*FOO:FORMAT.LST=FORMAT.CRF
!
@LOAD FORMAT
!
@SAVE FORMAT
@INFORMATION VERSION
!
@VDIRECT FORMAT.EXE,
@CHECKSUM SEQ
@
!
@DELETE FORMAT.REL
!
!