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

	TITLE	CMSTOR	LIBRARY OF STORAGE LOCATIONS FOR CMLBXX
	SUBTTL	C.MITCHELL 1977

	;THE FOLLOWING LOCATIONS ARE NEEDED BY ROUTINES IN
	;LIBRARIES CMLBXX.

	;ORDER IS NOT IMPORTANT.

	SEARCH	MONSYM,MACSYM,CMLBSM

	ENTRY	SPACE,STACK

	;A SPARE BUFFER FOR GENERAL USE

SPACE:	BLOCK	^D100

	;THE PUSH DOWN STACK

STACK:	BLOCK	NPDL		;SIZE OF STACK

	PRGEND
	TITLE	FILSPC	SPACE FOR WRITING PARTS OF FILESPEC
	SUBTTL	C.MITCHELL 1977. 

	SEARCH	MONSYM,MACSYM,CMLBSM

	IFNDEF	.PSECT,<
	.DIRECT	.XTABM>

	SALL

	ENTRY	STRSPC,DIRSPC,NAMSPC,EXTSPC

STRSPC:	BLOCK	10		;STRUCTURE
DIRSPC:	BLOCK	20		;DIRECTORY
NAMSPC:	BLOCK	10		;NAME
EXTSPC:	BLOCK	10		;EXTENSION

	PRGEND
	TITLE	PAGTAB	TABLE FOR AVAILABLE PAGES ON THE SYSTEM
	SUBTTL	C.MITCHELL 1977

	SEARCH	MONSYM,MACSYM,CMLBSM

	ENTRY	PAGTAB,PAGTOP


	;SPACE FOR A TWO-BIT TABLE FOR AVAILABLE CORE PAGES.


PAGTAB:	BLOCK	MAXCOR/^D12+1	;3 BIT BYTES. ONE PER PAGE
PAGTOP:	BLOCK	1		;END

	PRGEND
	TITLE	CMDSPC	STORAGE FOR THE COMMAND JSYS.
	SUBTTL	C.MITCHELL 1977


	SEARCH 	MONSYM,MACSYM,CMLBSM

	ENTRY	CMDT1,CMDT2,CMDT3,FLUB,FLUB1,ATMBUF,BUFFER,CMDBLK,GTJBLK

	;LOCATIONS FOR SAVING ARGUMENTS.

CMDT1:	BLOCK	1	;SAVE T1 HERE
CMDT2:	BLOCK	1	;SAVE T2 HERE
CMDT3:	BLOCK	1	;SAVE T3 HERE

	;BLOCK FOR "FLDDB." TYPE FUNCTIONS.

FLUB:	BLOCK	4	;BLOCK FOR SETTING UP AN "FLDDB."
FLUB1:	BLOCK	4	;FOR SECOND ARG

	;BUFFERS FOR COMMAND PARSING.

ATMBUF:	BLOCK	ATMSIZ		;FOR ATOMS
BUFFER:	BLOCK	BUFSIZ		;TOTAL BUFFER
CMDBLK:	BLOCK	.CMGJB+5	;FOR COMMAND BLOCK
GTJBLK:	BLOCK	.GJRTY+2	;FOR GTJFN

	PRGEND
	TITLE	V52FLG	FLAGS FOR VT52
	SUBTTL	C.MITCHELL 1977. 

	SEARCH	MONSYM,MACSYM,CMLBSM

	SALL

	ENTRY	V52SET,VT52FG

	;FLAGS FOR CURSOR ADDRESSING.

V52SET:	BLOCK	1		;SET -1 IF VT52 ENABLED FOR CURSOR ADDR.
VT52FG:	BLOCK	1		;SET -1 IF TERMINAL IS A VT52.

	PRGEND
	TITLE	TABLES	LOCATIONS FOR STORING TABLE INFORMATION
	SUBTTL	CMITCHELL 1977


	ENTRY	JTTY%T,JBRT%T,TJOB%T,TICK%T,NCPG%T,DNAM%T,DCHR%T
	ENTRY	DUNT%T,DSER%T,DRER%T,SVER%T,STAT%T,QTIM%T,JNAM%T
	ENTRY	JPNM%T,SNAM%T,STIM%T,SFLT%T,SSIZ%T,SBLK%T,DBGS%T
	ENTRY	LGDS%T,PPAR%T,STAB%T,DNTM%T,BDTD%T,APID%T,HQLV%T
	ENTRY	LQLV%T

	;WHEN WE PERFORM THE "SYSGT" ROUTINE FOR THE FIRST TIME
	;WE STORE T1 AND T2 IN PAIRS OF WORDS TO SAVE FURTHER
	;CALLS TO THE "SYSGT" JSYS.

JTTY%T:	BLOCK	2		;JOBTTY
JBRT%T:	BLOCK	2		;JOBRT
TJOB%T:	BLOCK	2		;TTYJOB
TICK%T:	BLOCK	2		;TICKPS
NCPG%T:	BLOCK	2		;NCPGS
DNAM%T:	BLOCK	2		;DEVNAM
DCHR%T:	BLOCK	2		;DEVCHR
DUNT%T:	BLOCK	2		;DEVUNT
DSER%T:	BLOCK	2		;DSKERR
DRER%T:	BLOCK	2		;DRMERR
SVER%T:	BLOCK	2		;SYSVER
STAT%T:	BLOCK	2		;SYSTAT
QTIM%T:	BLOCK	2		;QTIMES
JNAM%T:	BLOCK	2		;JOBNAM
JPNM%T:	BLOCK	2		;JOBPNM
SNAM%T:	BLOCK	2		;SNAMES
STIM%T:	BLOCK	2		;STIMES
SFLT%T:	BLOCK	2		;SPFLTS
SSIZ%T:	BLOCK	2		;SSIZE
SBLK%T:	BLOCK	2		;SNBLKS
DBGS%T:	BLOCK	2		;DBUGSW
LGDS%T:	BLOCK	2		;LOGDES
PPAR%T:	BLOCK	2		;PTYPAR
STAB%T:	BLOCK	2		;SYMTAB
DNTM%T:	BLOCK	2		;DWNTIM
BDTD%T:	BLOCK	2		;BLDTD
APID%T:	BLOCK	2		;APRID
HQLV%T:	BLOCK	2		;HQLAV
LQLV%T:	BLOCK	2		;LQLAV

	END