SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)    3700  HISTORY			; DETAILED

   (1)    4600  DECLARATIONS

   (1)    7200  EXE$SETAST - SET AST ENABLES

   (1)   12600  EXE$DCLAST - DECLARE AST SYSTEM SERVICE

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   1

01                                                                                                                               (1)



                                     0000   100 

                                     0000   200 	.TITLE	SYSASTCON ASTCONTROL SYSTEM SERVICES

                                     0000   300 	.IDENT	/01/		;

                                     0000   400 

                                     0000   500 ;

                                     0000   600 ; COPYRIGHT (C) 1977

                                     0000   700 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000   800 ;

                                     0000   900 ; THIS SOFTWARE IS FURNISHED  UNDER A LICENSE FOR USE ONLY ON A SINGLE

                                     0000  1000 ; COMPUTER  SYSTEM AND  MAY BE  COPIED ONLY WITH  THE INCLUSION OF THE

                                     0000  1100 ; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE, OR ANY OTHER COPIES THEREOF,

                                     0000  1200 ; MAY NOT BE PROVIDED OR  OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON

                                     0000  1300 ; EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE

                                     0000  1400 ; TERMS.  TITLE TO AND  OWNERSHIP OF THE  SOFTWARE  SHALL AT ALL TIMES

                                     0000  1500 ; REMAIN IN DEC.

                                     0000  1600 ;

                                     0000  1700 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE

                                     0000  1800 ; AND SHOULD  NOT BE CONSTRUED  AS A COMMITMENT  BY DIGITAL  EQUIPMENT

                                     0000  1900 ; CORPORATION.

                                     0000  2000 ;

                                     0000  2100 ; DEC ASSUMES  NO  RESPONSIBILITY  FOR  THE USE OR  RELIABILITY OF ITS

                                     0000  2200 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.

                                     0000  2300 

                                     0000  2400 ;++

                                     0000  2500 ; FACILITY: EXECUTIVE, SYSTEM SERVICES

                                     0000  2600 ;

                                     0000  2700 ; ABSTRACT:

                                     0000  2800 ;	THIS MODULE CONTAINS THE SYSTEM SERVICES SETAST WHICH CONTROLS

                                     0000  2900 ;	THE STATE OF THE AST ENABLES AND DCLAST WHICH DECLARES AN

                                     0000  3000 ;	AST FOR A PARTICULAR ACCESS MODE.

                                     0000  3100 ;

                                     0000  3200 ; ENVIRONMENT:

                                     0000  3300 ;

                                     0000  3400 ;--

                                     0000  3500 ;

                                     0000  3600 ;	.PAGE

                                     0000  3700 	.SBTTL	HISTORY			; DETAILED

                                     0000  3800 ;

                                     0000  3900 ; AUTHOR:	R. HUSTVEDT	 CREATION DATE: 21-SEP-76

                                     0000  4000 ;

                                     0000  4100 ; MODIFIED BY:

                                     0000  4200 ;	, : VERSION

                                     0000  4300 ; 01	 -

                                     0000  4400 

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   2

01              DECLARATIONS                                                                                                     (1)



                                     0000  4600 	.SBTTL	DECLARATIONS

                                     0000  4700 

                                     0000  4800 ;

                                     0000  4900 ; INCLUDE FILES:

                                     0000  5000 ;

                                     0000  5100 	$ACBDEF				; DEFINE AST CONTROL BLOCK OFFSETS

                                     0000  5200 	$IPLDEF				; DEFINE IPL VALUES

                                     0000  5300 	$PCBDEF				; DEFINE PCB OFFSETS

                                     0000  5400 	$PRDEF				; DEFINE PROCESSOR REGISTER VALUES

                                     0000  5500 	$PSLDEF				; DEFINE PSL FIELDS

                                     0000  5600 	$RSNDEF				; DEFINE RESOURCE NUMBERS

                                     0000  5700 	$SSDEF				; DEFINE STATUS CODE VALUES

                                     0000  5800 

                                     0000  5900 ;

                                     0000  6000 ; EQUATES:

                                     0000  6100 ;

                                     0000  6200 

                           0000000C  0000  6300 ACMODE=12				; DISPLACEMENT TO ACCESS MODE

                           00000004  0000  6400 AST=4					; DISPLACEMENT TO AST ADDRESS

                           00000008  0000  6500 ASTPRM=8				; DISPLACEMENT TO AST PARAMETER

                           00000004  0000  6600 ENABLE=4				; DISPLACEMENT TO ENABLE ARGUMENT

                                     0000  6700 ;

                                     0000  6800 ; OWN STORAGE:

                                     0000  6900 ;

                                 00000000  7000 	.PSECT	Y$EXEPAGED,BYTE		; PAGED PSECT

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   3

01              EXE$SETAST - SET AST ENABLES                                                                                     (1)



                                     0000  7200 	.SBTTL	EXE$SETAST - SET AST ENABLES

                                     0000  7300 

                                     0000  7400 ;++

                                     0000  7500 ; FUNCTIONAL DESCRIPTION:

                                     0000  7600 ;	EXE$SETAST ALLOWS A PROCESS TO ENABLE OR DISABLE THE DELIVERY

                                     0000  7700 ;	OF ASTS FOR THE PROCESS AT THE ACCESS MODE ISSUING THE CALL TO

                                     0000  7800 ;	EXE$SETAST.   THE PREVIOUS STATE OF THE AST ENABLE FOR THAT

                                     0000  7900 ;	ACCESS MODE IS RETURNED IN BIT 1 OF REGISTER 0 AS PART OF

                                     0000  8000 ;	THE SUCCESSFUL COMPLETION STATUS CODE.

                                     0000  8100 ;

                                     0000  8200 ; CALLING SEQUENCE:

                                     0000  8300 ;	CALLG	ARGLIST,EXE$SETAST

                                     0000  8400 ;

                                     0000  8500 ; INPUT PARAMETERS:

                                     0000  8600 ;	04(AP) - NEW SETTING FOR AST ENABLE

                                     0000  8650 ;	R4 - PCB ADDRESS OF CURRENT PROCESS

                                     0000  8700 ;

                                     0000  8800 ; IMPLICIT INPUTS:

                                     0000  8900 ;	SCH$GL_CURPCB - POINTER TO CURRENT PROCESS PCB

                                     0000  9000 ;

                                     0000  9100 ; OUTPUT PARAMETERS:

                                     0000  9200 ;	R0 - COMPLETION STATUS CODE

                                     0000  9300 ;

                                     0000  9400 ; IMPLICIT OUTPUTS:

                                     0000  9500 ;	AST ENABLE FOR PREVIOUS MODE IS SET ACCORDING TO ARGUMENT

                                     0000  9600 ;

                                     0000  9700 ;	THE NEW SETTING FOR THE ASTLVL REGISTER IS PLACED BOTH IN

                                     0000  9800 ;	THE PROCESSOR REGISTER AND THE CURRENT HARDWARE PCB.

                                     0000  9900 ;

                                     0000 10000 ; COMPLETION CODES:

                                     0000 10100 ;	SS$_WASCLR  -  AST ENABLE FOR ACCESS MODE WAS CLEAR

                                     0000 10200 ;	SS$_WASSET  -  AST ENABLE FOR ACCESS MODE WAS SET

                                     0000 10300 ;

                                     0000 10400 ; SIDE EFFECTS:

                                     0000 10500 ;	ANY PENDING ASTS FOR THIS PROCESS WHICH BECOME DELIVERABLE

                                     0000 10600 ;	AS A RESULT OF SETTING AN AST ENABLE MAY BE DELIVERED UPON

                                     0000 10700 ;	EXIT FROM THIS SERVICE.

                                     0000 10800 ;

                                     0000 10900 ;--

                                     0000 11000 

                                     0000 11100 EXE$SETAST::				; SET AST ENABLE SYSTEM SERVICE

                               003C  0000 11200 	.WORD	^M<R2,R3,R4,R5>		; SAVE REGISTERS R2-R5

                          51     DC  0002 11300 	MOVPSL	R1			; GET CURRENT PSL

            02            16     EF  0004 11400 	EXTZV	#PSL$V_PRVMOD,#PSL$S_PRVMOD,R1,R1 ; EXTRACT PREVIOUS MODE

            51            51         0007       

            55            09     3C  0009 11500 	MOVZWL	#SS$_WASSET,R5		; ASSUME SET

         0D A4            51     E0  000C 11700 	BBS	R1,PCB$B_ASTEN(R4),10$	; TEST OLD ENABLE SETTING

                          03         0010       

            55            01     3C  0011 11800 	MOVZWL	#SS$_WASCLR,R5		; IT WAS CLEAR

            51         04 AC     F0  0014 11900 10$:	INSV	ENABLE(AP),R1,#1,PCB$B_ASTEN(R4)  ; SET NEW ENABLE VALUE

         0D A4            01         0018       

                          FFE2'  30  001B 12100 	BSBW	SCH$NEWLVL		;;; COMPUTE NEW ASTLVL 

            50            55     D0  001E 12300 	MOVL	R5,R0			; SET COMPLETION STATUS

                                 04  0021 12400 	RET				; AND RETURN TO CALLER

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   4

01              EXE$DCLAST - DECLARE AST SYSTEM SERVICE                                                                          (1)



                                     0022 12600 	.SBTTL	EXE$DCLAST - DECLARE AST SYSTEM SERVICE

                                     0022 12700 

                                     0022 12800 ;++

                                     0022 12900 ; FUNCTIONAL DESCRIPTION:

                                     0022 13000 ;	EXE$DCLAST ALLOWS A PROCESS TO ENQUEUE AN AST FOR THE ACCESS

                                     0022 13100 ;	MODE ISSUING THE CALL OR A LESS PRIVILEGED ACCESS MODE.

                                     0022 13200 ;

                                     0022 13300 ; CALLING SEQUENCE:

                                     0022 13400 ;	CALLG	ARGLIST,EXE$DCLAST

                                     0022 13500 ;

                                     0022 13600 ; INPUT PARAMETERS:

                                     0022 13700 ;	04(AP) - ADDRESS OF AST ROUTINE

                                     0022 13800 ;	08(AP) - AST PARAMETER

                                     0022 13900 ;	12(AP) - ACCESS MODE AT WHICH TO ENQUEUE AST

                                     0022 13950 ;	R4 - PCB ADDRESS OF CURRENT PROCESS

                                     0022 14000 ;

                                     0022 14100 ; IMPLICIT INPUTS:

                                     0022 14200 ;	CURRENT PCB

                                     0022 14300 ;

                                     0022 14400 ; OUTPUT PARAMETERS:

                                     0022 14500 ;	R0 - COMPLETION STATUS

                                     0022 14600 ;

                                     0022 14700 ; IMPLICIT OUTPUTS:

                                     0022 14800 ;	NONE

                                     0022 14900 ;

                                     0022 15000 ; SIDE EFFECTS:

                                     0022 15100 ;	THE ENQUEUING OF AN AST WILL EVENTUALLY CAUSE A DIVERSION

                                     0022 15200 ;	OF CONTROL TO OCCUR WHICH WILL CAUSE THE AST ROUTINE TO BE

                                     0022 15300 ;	CALLED.

                                     0022 15400 ;

                                     0022 15500 ; COMPLETION CODES:

                                     0022 15600 ;	SS$_NORMAL  -  NORMAL SUCCESSFUL COMPLETION STATUS

                                     0022 15700 ;	SS$_EXQUOTA -  QUOTA EXCEEDED FOR AST CONTROL BLOCKS

                                     0022 15800 ;	SS$_INSFMEM -  INSUFFICIENT DYNAMIC MEMORY

                                     0022 15900 ;

                                     0022 16000 ;--

                                     0022 16100 

                                     0022 16200 EXE$DCLAST::				; DECLARE AST SYSTEM SERVICE

                               003C  0022 16300 	.WORD	^M<R2,R3,R4,R5>		; SAVE REGISTERS R2-R5

                       3C A4     B5  0024 16500 	TSTW	PCB$W_ASTCNT(R4)		; TEST FOR QUOTA

                          33     15  0027 16600 	BLEQ	20$			; YES, ERROR RETURN

                          FFD4'  30  0029 16700 	BSBW	EXE$ALLOCIRP		; ALLOCATE PACKET

            29            50     E9  002C 16800 	BLBC	R0,10$			; DID NOT GET IT

                       3C A4     B7  002F 16900 	DECW	PCB$W_ASTCNT(R4)		;;; ACCOUNT FOR IT

            55            52     D0  0032 17000 	MOVL	R2,R5			;;; SAVE BASE ADDRESS OF ACB

            02            00     EF  0035 17100 	EXTZV	#0,#2,ACMODE(AP),R0	; GET ACCESS MODE ARGUMENT

            50         0C AC         0038       

                          FFC2'  30  003B 17200 	BSBW	EXE$MAXACMODE		; MAXIMIZE ACCESS MODE

            50         40 8F     88  003E 17300 	BISB	#<1@ACB$V_QUOTA>,R0	; SET QUOTA FLAG FOR PROCESS

         0B A5            50     90  0042 17400 	MOVB	R0,ACB$B_RMOD(R5)	; SET ACCESS MODE FOR AST

         0C A5         60 A4     D0  0046 17500 	MOVL	PCB$L_PID(R4),ACB$L_PID(R5)     ; SET PID IN AST CB

         10 A5         04 AC     7D  004B 17600 	MOVQ	AST(AP),ACB$L_AST(R5)	; STORE AST,ASTPRM

                          52     D4  0050 17650 	CLRL	R2			; NULL PRIORITY INCR

                          FFAB'  30  0052 17700 	BSBW	SCH$QAST		; AND ENQUEUE IT

            50            01     3C  0055 17800 	MOVZWL	#SS$_NORMAL,R0		; SET NORMAL STATUS

                                     0058 17900 10$:	SETIPL	#0			; ENABLE

                                 04  005B 18000 	RET				; AND RETURN TO CALLER

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   5

01              EXE$DCLAST - DECLARE AST SYSTEM SERVICE                                                                          (1)



            50            1C     3C  005C 18100 20$:	MOVZWL	#SS$_EXQUOTA,R0		; SET ERROR STATUS

                                 04  005F 18200 	RET				; RETURN

                                     0060 18300 	.END

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   6

SYMBOL TABLE                                                                                                                     (1)



ACB$B_RMOD       0000000B            PCB$L_WSSWP      00000024            PR$_P0BR       = 00000008            

ACB$B_TYPE       0000000A            PCB$L_WTIME      0000002C            PR$_P0LR       = 00000009            

ACB$L_AST        00000010            PCB$T_LNAME      0000006C            PR$_P1BR       = 0000000A            

ACB$L_ASTPRM     00000014            PCB$V_ASTPEN   = 00000011            PR$_P1LR       = 0000000B            

ACB$L_ASTQBL     00000004            PCB$V_BATCH    = 0000000E            PR$_PCBB       = 00000010            

ACB$L_ASTQFL     00000000            PCB$V_DELPEN   = 00000001            PR$_PME        = 0000003D            

ACB$L_KAST       00000018            PCB$V_FORCPEN  = 00000002            PR$_RXCS       = 00000020            

ACB$L_PID        0000000C            PCB$V_HIBER    = 00000013            PR$_RXDB       = 00000021            

ACB$M_QUOTA    = 00000040            PCB$V_INQUAN   = 00000003            PR$_SBIER      = 00000034            

ACB$S_MODE     = 00000002            PCB$V_LOGIN    = 00000014            PR$_SBIFS      = 00000030            

ACB$V_KAST     = 00000007            PCB$V_NETWRK   = 00000015            PR$_SBIMT      = 00000033            

ACB$V_MODE     = 00000000            PCB$V_NOACNT   = 0000000F            PR$_SBIQC      = 00000036            

ACB$V_QUOTA    = 00000006            PCB$V_NODELET  = 00000017            PR$_SBIS       = 00000031            

ACB$W_SIZE       00000008            PCB$V_PHDRES   = 00000012            PR$_SBISC      = 00000032            

ACMODE         = 0000000C            PCB$V_PSWAPM   = 00000004            PR$_SBITA      = 00000035            

AST            = 00000004            PCB$V_PWRAST   = 00000016            PR$_SBR        = 0000000C            

ASTPRM         = 00000008            PCB$V_RES      = 00000000            PR$_SCBB       = 00000011            

BIT...         = 00000000            PCB$V_RESPEN   = 00000005            PR$_SID        = 0000003E            

ENABLE         = 00000004            PCB$V_SSFEXC   = 00000006            PR$_SIRR       = 00000014            

EXE$ALLOCIRP     ********   X   03   PCB$V_SSFEXCE  = 00000007            PR$_SISR       = 00000015            

EXE$DCLAST       00000022 RG    03   PCB$V_SSFEXCS  = 00000008            PR$_SLR        = 0000000D            

EXE$MAXACMODE    ********   X   03   PCB$V_SSFEXCU  = 00000009            PR$_SSP        = 00000002            

EXE$SETAST       00000000 RG    03   PCB$V_SSRWAIT  = 0000000A            PR$_TBIA       = 00000039            

GBL...         = 00000000            PCB$V_SUSPEN   = 0000000B            PR$_TBIS       = 0000003A            

IPL$_ASTDEL    = 00000002            PCB$V_SWPVBN   = 00000010            PR$_TODR       = 0000001B            

IPL$_HWCLK     = 00000018            PCB$V_WAKEPEN  = 0000000C            PR$_TXCS       = 00000022            

IPL$_IOPOST    = 00000004            PCB$V_WALL     = 0000000D            PR$_TXDB       = 00000023            

IPL$_MAILBOX   = 0000000B            PCB$W_APTCNT     00000034            PR$_USP        = 00000003            

IPL$_POWER     = 0000001F            PCB$W_ASTCNT     0000003C            PR$_WCSA       = 0000002C            

IPL$_QUEUEAST  = 00000006            PCB$W_BIOCNT     0000003E            PR$_WCSD       = 0000002D            

IPL$_SCHED     = 00000003            PCB$W_BIOLM      00000040            PSL$C_EXEC     = 00000001            

IPL$_SYNCH     = 00000007            PCB$W_BYTCNT     00000042            PSL$C_KERNEL   = 00000000            

IPL$_TIMER     = 00000007            PCB$W_BYTLM      00000068            PSL$C_SUPER    = 00000002            

PCB$B_ASTACT     0000000C            PCB$W_DIOCNT     00000044            PSL$C_USER     = 00000003            

PCB$B_ASTEN      0000000D            PCB$W_DIOLM      00000046            PSL$M_CM       = 80000000            

PCB$B_PRI        0000000B            PCB$W_FILCNT     00000048            PSL$M_CURMOD   = 03000000            

PCB$B_PRIB       00000033            PCB$W_GPGCNT     00000038            PSL$M_DV       = 00000080            

PCB$B_TYPE       0000000A            PCB$W_GRP        00000022            PSL$M_FPD      = 08000000            

PCB$B_WEFC       00000032            PCB$W_MEM        00000020            PSL$M_FU       = 00000040            

PCB$C_LENGTH     0000007C            PCB$W_MTXCNT     0000000E            PSL$M_IPL      = 001F0000            

PCB$K_LENGTH     0000007C            PCB$W_PPGCNT     0000003A            PSL$M_IS       = 04000000            

PCB$L_ASTQBL     00000014            PCB$W_PRCCNT     0000006A            PSL$M_IV       = 00000020            

PCB$L_ASTQFL     00000010            PCB$W_SIZE       00000008            PSL$M_PRVMOD   = 00C00000            

PCB$L_EFC2P      00000058            PCB$W_STATE      00000030            PSL$M_SAFBITS  = 000037FF            

PCB$L_EFC3P      0000005C            PCB$W_TMBU       00000036            PSL$M_TBIT     = 00000010            

PCB$L_EFCS       00000050            PCB$W_TQCNT      0000004A            PSL$M_TP       = 40000000            

PCB$L_EFCU       00000054            PR$_ACCR       = 00000029            PSL$S_CURMOD   = 00000002            

PCB$L_EFWM       0000004C            PR$_ACCS       = 00000028            PSL$S_IPL      = 00000005            

PCB$L_OWNER      0000001C            PR$_ASTLVL     = 00000013            PSL$S_PRVMOD   = 00000002            

PCB$L_PHD        00000064            PR$_ESP        = 00000001            PSL$V_CM       = 0000001F            

PCB$L_PHYPCB     00000018            PR$_ICCS       = 00000018            PSL$V_CURMOD   = 00000018            

PCB$L_PID        00000060            PR$_ICR        = 0000001A            PSL$V_DV       = 00000007            

PCB$L_PQB        0000004C            PR$_IPL        = 00000012            PSL$V_FPD      = 0000001B            

PCB$L_SQBL       00000004            PR$_ISP        = 00000004            PSL$V_FU       = 00000006            

PCB$L_SQFL       00000000            PR$_KSP        = 00000000            PSL$V_IPL      = 00000010            

PCB$L_STS        00000028            PR$_MAPEN      = 00000038            PSL$V_IS       = 0000001A            

PCB$L_UIC        00000020            PR$_NICR       = 00000019            PSL$V_IV       = 00000005            

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   7

SYMBOL TABLE                                                                                                                     (1)



PSL$V_PRVMOD   = 00000016            SS$_DEVNOTALLOC= 00000858            SS$_IVGSDNAM   = 0000014C            

PSL$V_TBIT     = 00000004            SS$_DEVNOTMBX  = 00000074            SS$_IVLOGNAM   = 00000154            

PSL$V_TP       = 0000001E            SS$_DEVNOTMOUNT= 0000007C            SS$_IVLOGTAB   = 0000015C            

RSN$_ASTWAIT   = 00000001            SS$_DEVOFFLINE = 00000084            SS$_IVPROTECT  = 000002F4            

RSN$_BRKTHRU   = 00000006            SS$_DIRFULL    = 00000860            SS$_IVQUOTAL   = 00000164            

RSN$_IACLOCK   = 00000007            SS$_DRVERR     = 0000008C            SS$_IVSECFLG   = 0000016C            

RSN$_MAILBOX   = 00000002            SS$_DUPFILENAME= 00000868            SS$_IVSECIDCTL = 000002E4            

RSN$_NPDYNMEM  = 00000003            SS$_DUPLNAM    = 00000094            SS$_IVSSRQ     = 00000174            

RSN$_PGDYNMEM  = 00000005            SS$_ENDOFFILE  = 00000870            SS$_IVSTSFLG   = 0000017C            

RSN$_PGFILE    = 00000004            SS$_ENDOFTAPE  = 00000878            SS$_IVTIME     = 00000184            

SCH$NEWLVL       ********   X   03   SS$_ENDOFUSRLBL= 00000970            SS$_LCKPAGFUL  = 000000D4            

SCH$QAST         ********   X   03   SS$_EXQUOTA    = 0000001C            SS$_LENVIO     = 0000018C            

SS$_ABORT      = 0000002C            SS$_EXTIDXFILE = 00000880            SS$_LKWSETFUL  = 00000194            

SS$_ACCONFLICT = 00000800            SS$_FCPREADERR = 00000888            SS$_MBFULL     = 000008D8            

SS$_ACCVIO     = 0000000C            SS$_FCPREPSTN  = 00000988            SS$_MBTOOSML   = 0000019C            

SS$_ACPVAFUL   = 000002FC            SS$_FCPREWNDERR= 00000890            SS$_MCHECK     = 000002BC            

SS$_ARTRES     = 00000474            SS$_FCPSPACERR = 00000898            SS$_MEDOFL     = 000001A4            

SS$_ASTFLT     = 0000040C            SS$_FCPWRITERR = 000008A0            SS$_MSGNOTFND  = 00000621            

SS$_BADATTRIB  = 00000034            SS$_FILACCERR  = 0000009C            SS$_MTLBLLONG  = 00000304            

SS$_BADCHKSUM  = 00000808            SS$_FILALRACC  = 000000A4            SS$_MUSTCLOSEFL= 00000948            

SS$_BADESCAPE  = 0000003C            SS$_FILELOCKED = 000008A8            SS$_NOAQB      = 00000314            

SS$_BADFILEHDR = 00000810            SS$_FILENUMCHK = 000008B0            SS$_NODATA     = 000001AC            

SS$_BADFILENAME= 00000818            SS$_FILESEQCHK = 000008B8            SS$_NOHANDLER  = 000008F8            

SS$_BADFILEVER = 00000820            SS$_FILESTRUCT = 000008C0            SS$_NOHOMEBLK  = 000008E0            

SS$_BADIMGHDR  = 00000044            SS$_FILNOTACC  = 000000AC            SS$_NOIOCHAN   = 000001B4            

SS$_BADIRECTORY= 00000828            SS$_FILNOTCNTG = 000002AC            SS$_NOLINKS    = 0000027C            

SS$_BADPARAM   = 00000014            SS$_FILNOTEXP  = 000000B4            SS$_NOLOGNAM   = 000001BC            

SS$_BADSTACK   = 000002B4            SS$_FLTDIV     = 00000494            SS$_NOMBX      = 00000274            

SS$_BEGOFFILE  = 00000938            SS$_FLTOVF     = 0000048C            SS$_NOMOREFILES= 00000930            

SS$_BLOCKCNTERR= 00000940            SS$_FLTUND     = 0000049C            SS$_NONEXDRV   = 000001C4            

SS$_BREAK      = 00000414            SS$_FORMAT     = 000000BC            SS$_NONEXPR    = 000008E8            

SS$_BUFBYTALI  = 0000030C            SS$_GPTFULL    = 000000C4            SS$_NONLOCAL   = 000008F0            

SS$_BUFFEROVF  = 00000601            SS$_GSDFULL    = 000000CC            SS$_NOPRIV     = 00000024            

SS$_BUGCHECK   = 000002A4            SS$_HANGUP     = 000002CC            SS$_NORMAL     = 00000001            

SS$_CANCEL     = 00000830            SS$_HEADERFULL = 000008C8            SS$_NOSIGNAL   = 00000900            

SS$_CHANINTLK  = 0000004C            SS$_IDXFILEFULL= 000008D0            SS$_NOSOLICIT  = 00000284            

SS$_CLIFRCEXT  = 00000980            SS$_ILLBLKNUM  = 000000DC            SS$_NOSUCHDEV  = 00000908            

SS$_CMODSUPR   = 0000041C            SS$_ILLCNTRFUNC= 000000E4            SS$_NOSUCHFILE = 00000910            

SS$_CMODUSER   = 00000424            SS$_ILLEFC     = 000000EC            SS$_NOSUCHNODE = 0000028C            

SS$_COMPAT     = 0000042C            SS$_ILLIOFUNC  = 000000F4            SS$_NOSUCHSEC  = 00000978            

SS$_CONTINUE   = 00000001            SS$_ILLLBLAST  = 00000968            SS$_NOTAPEOP   = 00000264            

SS$_CONTROLC   = 00000651            SS$_ILLPAGCNT  = 000000FC            SS$_NOTFILEDEV = 000001CC            

SS$_CONTROLO   = 00000609            SS$_ILLSEQOP   = 000002DC            SS$_NOTINTBLSZ = 000001D4            

SS$_CONTROLY   = 00000611            SS$_ILLSER     = 00000104            SS$_NOTLABELMT = 000001DC            

SS$_CREATED    = 00000619            SS$_ILLUSRLBLRD= 00000958            SS$_NOTMODIFIED= 00000659            

SS$_CTRLERR    = 00000054            SS$_ILLUSRLBLWT= 00000960            SS$_NOTNETDEV  = 000002EC            

SS$_DATACHECK  = 0000005C            SS$_INCVOLLABEL= 0000010C            SS$_NOTRAN     = 00000629            

SS$_DATAOVERUN = 00000838            SS$_INSFARG    = 00000114            SS$_NOTSQDEV   = 000001E4            

SS$_DEBUG      = 0000046C            SS$_INSFMEM    = 00000124            SS$_OPCCUS     = 00000434            

SS$_DECOVF     = 000004A4            SS$_INSFRAME   = 0000012C            SS$_OPCDEC     = 0000043C            

SS$_DEVACTIVE  = 000002C4            SS$_INSFWSL    = 0000011C            SS$_OPINCOMPL  = 000002D4            

SS$_DEVALLOC   = 00000840            SS$_INTDIV     = 00000484            SS$_PAGOWNVIO  = 000001EC            

SS$_DEVALRALLOC= 00000641            SS$_INTOVF     = 0000047C            SS$_PAGRDERR   = 00000444            

SS$_DEVASSIGN  = 00000848            SS$_IVADDR     = 00000134            SS$_PARITY     = 000001F4            

SS$_DEVFOREIGN = 00000064            SS$_IVCHAN     = 0000013C            SS$_PARTESCAPE = 000001FC            

SS$_DEVICEFULL = 00000850            SS$_IVCHNLSEC  = 0000026C            SS$_PFMBSY     = 00000204            

SS$_DEVMOUNT   = 0000006C            SS$_IVDEVNAM   = 00000144            SS$_PLHLDR     = 00000404            

SYSASTCON       ASTCONTROL SYSTEM SERVICES                       21-AUG-1978 20:19:55   VAX-11 MACRO X0.3-11               Page   8

SYMBOL TABLE                                                                                                                     (1)



SS$_PSTFULL    = 0000020C            

SS$_RADRMOD    = 0000044C            

SS$_REJECT     = 00000294            

SS$_REMOTE     = 00000649            

SS$_RESIGNAL   = 00000918            

SS$_RESULTOVF  = 00000214            

SS$_ROPRAND    = 00000454            

SS$_SECTBLFUL  = 0000021C            

SS$_SSFAIL     = 0000045C            

SS$_SUBRNG     = 000004AC            

SS$_SUPERSEDE  = 00000631            

SS$_TAPEPOSLOST= 00000224            

SS$_TBIT       = 00000464            

SS$_TIMEOUT    = 0000022C            

SS$_TOOMANYVER = 00000990            

SS$_TOOMUCHDATA= 0000029C            

SS$_UNASEFC    = 00000234            

SS$_UNSAFE     = 0000023C            

SS$_UNWIND     = 00000920            

SS$_UNWINDING  = 00000928            

SS$_VASFULL    = 00000244            

SS$_VECINUSE   = 0000024C            

SS$_VOLINV     = 00000254            

SS$_WAITUSRLBL = 00000950            

SS$_WASCLR     = 00000001            

SS$_WASECC     = 00000639            

SS$_WASSET     = 00000009            

SS$_WRITLCK    = 0000025C            

SS$_WRONGACP   = 0000031C            





PROGRAM SECTION SYNOPSIS



.  ABS  .        00000000      00     NOPIC   USR   CON   ABS   LCL NOSHR NOEXE NORD  NOWRT BYTE  

. BLANK .        00000000      01     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  

$ABS$            0000007C      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

Y$EXEPAGED       00000060      03     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

14828. BYTES LEFT IN FREE MEMORY POOL.

3706. BYTES OF RECLAIMED MEMORY.

OBJ$:SYSASTCON,LIS$:SYSASTCON/-SP=EXECML$/ML,SRC$:SYSASTCON

4 MLB DIR RDS - 598 GETS TO DEFINE 17 MACROS. 44 INTER. FILE WRITES. 

