

; Bliss-32 7.352	Saturday 22-AUG-1978 04:53:34	DBB3:[LINKER.SRC]LNKOBJFMT.B32;3				Page 1

; Digital Equipment Corporation

;

;00100  0001	MODULE OBJ_CON_DEFS (IDENT='X03.01') =

;00200  0002	

;00300  0003	BEGIN

;00400  0004	!

;00500  0005	!

;00600  0006	! Copyright (C) 1976, 1977, 1978

;00700  0007	! Digital Equipment Corporation,  Maynard, Massachusetts  01754

;00800  0008	!

;00900  0009	! This software is furnished under a license for use only on  a

;01000  0010	! single computer system and may be copied only with the inclu-

;01100  0011	! sion of the above copyright notice.  This  software,  or  any

;01200  0012	! other  copies  thereof, may not be provided or otherwise made

;01300  0013	! available to any other person except for use on  such  system

;01400  0014	! and  to  one who agrees to these license terms.  Title to and

;01500  0015	! ownership of the software shall at all times remain in DEC.

;01600  0016	!

;01700  0017	! The information in this software is subject to change without

;01800  0018	! notice and should not be construed as a commitment by Digital

;01900  0019	! Equipment Corporation.

;02000  0020	!

;02100  0021	! DEC assumes no responsibility for the use or  reliability  of

;02200  0022	! its software on equipment which is not supplied by DEC.

;02300  0023	!

;02400  0024	!

;02500  0025	!

;02600  0026	!

;02700  0027	!

;02800  0028	!++

;02900  0029	!

;03000  0030	! MODULE: OBJ_CON_DEFS

;03100  0031	!

;03200  0032	! FACILITY: LINKER

;03300  0033	!

;03400  0034	! ABSTRACT:

;03500  0035	!	THIS MODULE DEFINES CONSTANT PARAMETER VALUES OF

;03600  0036	!	THE STAR OBJECT LANGUAGE.

;03700  0037	!

;03800  0038	! HISTORY:

;03900  0039	!

;04000  0040	!	VERSION: X03.00

;04100  0041	!

;04200  0042	!	AUTHOR: T.J. PORTER 09-DEC-76

;04300  0043	!

;04400  0044	!	MODIFICATIONS:

;04500  0045	!

;04600  0046	! NO.	DATE		PROGRAMMER	PURPOSE

;04700  0047	! ---	----		----------	-------

;04800  0048	! 001	27-DEC-77	T.J. PORTER	DEFINE TRACEBACK DATA RECORDS

;04900  0049	!

;05000  0050	!--



; Bliss-32 7.352	Saturday 22-AUG-1978 04:53:34	DBB3:[LINKER.SRC]LNKOBJFMT.B32;3				Page 2

; Digital Equipment Corporation

;

;05100  0051	     

;05200  0052	!

;05300  0053	!++

;05400  0054	!

;05500  0055	! FUNCTIONAL DESCRIPTION:

;05600  0056	!	THIS IS A LINK TIME DEFINITION OF THE CONSTANT PARAMETERS

;05700  0057	!	OF THE STAR OBJECT LANGUAGE. EACH PARAMETER IS A GLOBAL

;05800  0058	!	LITERAL WITH THE PREFIX CONVENTION "OBJ$C_". REFER TO

;05900  0059	!	STARLET NAMING CONVENTIONS.  NOTE THAT THESE ARE

;06000  0060	!	NOT THE OFFSETS OF FIELDS WITHIN THE VARIOUS

;06100  0061	!	RECORD TYPES BUT THE ENCODING OF THINGS LIKE THE RECORD

;06200  0062	!	TYPE.

;06300  0063	!

;06400  0064	!--

;06500  0065	!

;06600  0066	GLOBAL LITERAL

;06700  0067	!

;06800  0068	!	DEFINE SOME OF THE OBJECT MODULE WIDE VALUES

;06900  0069	!

;07000  0070		OBJ$C_MAXRECSIZ	= 512,	! MAXIMUM ALLOWABLE RECORD SIZE

;07100  0071		OBJ$C_STRLVL	= 0,	! STRUCTURE LEVEL

;07200  0072		OBJ$C_SYMSIZ	= 15,	! MAXIMUM SYMBOL LENGTH

;07300  0073	!

;07400  0074	!	DEFINE RECORD TYPES AND THEIR RESPECTIVE SUB-TYPES

;07500  0075	!

;07600  0076		OBJ$C_HDR	= 0,	! MODULE HEADER RECORDS

;07700  0077	!

;07800  0078			OBJ$C_HDR_MHD	= 0,	! MAIN HEADER RECORD

;07900  0079			OBJ$C_HDR_LNM	= 1,	! LANGUAGE PROCESSOR NAME

;08000  0080			OBJ$C_HDR_SRC	= 2,	! SOURCE FILES DESCRIPTION

;08100  0081			OBJ$C_HDR_TTL	= 3,	! TITLE TEXT

;08200  0082			OBJ$C_HDR_CPR	= 4,	! COPYRIGHT TEXT

;08300  0083			OBJ$C_HDR_MTC	= 5,	! MAINTENANCE HISTORY

;08400  0084			OBJ$C_HDR_GTX	= 6,	! GENERAL TEXT

;08500  0085	!

;08600  0086		OBJ$C_GSD	= 1,	! SYMBOL SPECIFICATIONS AND P-SECT DEFS

;08700  0087	!

;08800  0088			OBJ$C_GSD_PSC	= 0,	! P-SECTION DEFINTION

;08900  0089	!

;09000  0090				OBJ$C_PSCALILIM = 9,	! MAXIMUM P-SECTION ALIGNMENT IS PAGE

;09100  0091	!

;09200  0092			OBJ$C_GSD_SYM	= 1,	! SYMBOL (SIMPLE) SPECIFICATION

;09300  0093			OBJ$C_GSD_EPM	= 2,	! ENTRY POINT DEFINITION

;09400  0094			OBJ$C_GSD_PRO	= 3,	! ENTRY POINT WITH FORMAL DESCRIPTIONS I.E. PROCEDURE DEFINITION

;09500  0095	!

;09600  0096		OBJ$C_TIR	= 2,	! TEXT AND RELOCATION RECORDS

;09700  0097	!

;09800  0098			OBJ$C_STOREPLIM = %X'FFFF',	! MAXIMUM REPEAT COUNT ON STORE COMMANDS.

;09900  0099	!

;10000  0100		OBJ$C_EOM	= 3,	! END OF MODULE RECORD

;10100  0101	!

;10200  0102		OBJ$C_DBG	= 4,	! DEBUGGER TEXT RECORDS

;10300  0103	!

;10400  0104		OBJ$C_TBT	= 5;	! TRACEBACK RECORDS FOR DEBUGGER

;10500  0105	END ELUDOM



; Bliss-32 7.352	Saturday 22-AUG-1978 04:53:34	DBB3:[LINKER.SRC]LNKOBJFMT.B32;3				Page 2-1

; Digital Equipment Corporation

;





							    .TITLE  OBJ_CON_DEFS

							    .IDENT  \X03.01\



						    OBJ$C_MAXRECSIZ==	512

						    OBJ$C_STRLVL==	0

						    OBJ$C_SYMSIZ==	15

						    OBJ$C_HDR==		0

						    OBJ$C_HDR_MHD==	0

						    OBJ$C_HDR_LNM==	1

						    OBJ$C_HDR_SRC==	2

						    OBJ$C_HDR_TTL==	3

						    OBJ$C_HDR_CPR==	4

						    OBJ$C_HDR_MTC==	5

						    OBJ$C_HDR_GTX==	6

						    OBJ$C_GSD==		1

						    OBJ$C_GSD_PSC==	0

						    OBJ$C_PSCALILIM==	9

						    OBJ$C_GSD_SYM==	1

						    OBJ$C_GSD_EPM==	2

						    OBJ$C_GSD_PRO==	3

						    OBJ$C_TIR==		2

						    OBJ$C_STOREPLIM==	65535

						    OBJ$C_EOM==		3

						    OBJ$C_DBG==		4

						    OBJ$C_TBT==		5







;				       PSECT SUMMARY

;

;	Name		 Bytes			       Attributes

;

;  $CODE$         	     0  NOWRT,  RD ,  EXE,NOSHR,  LCL,  REL,  CON,NOPIC,ALIGN(2)













; Bliss-32 7.352	Saturday 22-AUG-1978 04:53:34	DBB3:[LINKER.SRC]LNKOBJFMT.B32;3				Page 3

; Digital Equipment Corporation

;

;10600  0106	     

;10700  0107	MODULE	OBJ_REC_OFFS(IDENT = 'X03.00') =

;10800  0108	BEGIN

;10900  0109	!

;11000  0110	!++

;11100  0111	!

;11200  0112	! MODULE: OBJ_REC_OFFS

;11300  0113	!

;11400  0114	! FACILITY: LINKER

;11500  0115	! 

;11600  0116	!

;11700  0117	! ABSTRACT:

;11800  0118	!	   THIS MODULE PROVIDES LINK TIME OFFSETS WITHIN ALL

;11900  0119	!  	   FIXED PARTS OF ALL OBJECT RECORDS.

;12000  0120	!

;12100  0121	! HISTORY:

;12200  0122	!

;12300  0123	!	VERSION: X03.00

;12400  0124	!

;12500  0125	!	AUTHOR: T.J.PORTER	10-DEC-76

;12600  0126	!

;12700  0127	!	MODIFICATIONS:

;12800  0128	!

;12900  0129	! NO.	DATE	PROGRAMMER	PURPOSE

;13000  0130	!  --	----	----------	-------

;13100  0131	!--



; Bliss-32 7.352	Saturday 22-AUG-1978 04:53:34	DBB3:[LINKER.SRC]LNKOBJFMT.B32;3				Page 4

; Digital Equipment Corporation

;

;13200  0132	     

;13300  0133	!

;13400  0134	!++

;13500  0135	!

;13600  0136	! FUNCTIONAL DESCRIPTION

;13700  0137	!

;13800  0138	!	THIS MODULE DEFINES GLOBAL SYMBOLS WHICH MAY BE USED

;13900  0139	!	AS OFFSETS INTO AN OBJECT MODULE RECORD, AS IF THAT

;14000  0140	!	RECORD WERE A BYTE ARRAY.  IT PROVIDES OFFSETS ONLY

;14100  0141	!	TO THE START OF THE FIRST VARIABLE LENGTH FIELD OF

;14200  0142	!	ANY RECORD.

;14300  0143	!

;14400  0144	!	ALL SYMBOLS HAVE THE PREFIX OBJ$X_ WHERE X INDICATES

;14500  0145	!	THE WIDTH OF THE FIELD BEING IDENTIFIED.  REFER TO

;14600  0146	!	STARLET NAMING CONVENTIONS.

;14700  0147	!

;14800  0148	!--

;14900  0149	!

;15000  0150	GLOBAL LITERAL

;15100  0151	!

;15200  0152	!	DEFINE OFFSET TO RECORD TYPE FOR ANY RECORD

;15300  0153	!

;15400  0154		OBJ$B_RECTYP	= 0,	    		! FIRST BYTE OF ALL

;15500  0155	!

;15600  0156	!	NOW DEFINE OFFSETS TO ALL RECORD SUB-TYPES

;15700  0157	!

;15800  0158		OBJ$B_SUBTYP	= OBJ$B_RECTYP+1,	! RECORD SUB-TYPE BYTE

;15900  0159	

;16000  0160	!

;16100  0161	!	NOW OFFSETS OF THE MAIN MODULE HEADER

;16200  0162	!		SUB-TYPE (OBJ$C_HDR_MHD)

;16300  0163	!

;16400  0164		OBJ$B_MHD_STRLV	= OBJ$B_SUBTYP+1,	! STRUCTURE LEVEL

;16500  0165	

;16600  0166		OBJ$W_MHD_RECSZ	= OBJ$B_MHD_STRLV+1,	! MAXIMUM RECORD SIZE

;16700  0167	

;16800  0168		OBJ$T_MHD_NAME	= OBJ$W_MHD_RECSZ+2,	! MODULE NAME FIELD

;16900  0169	

;17000  0170	!

;17100  0171	!	NOW OFFSETS COMMON TO ALL GSD RECORDS

;17200  0172	!

;17300  0173		OBJ$B_GSD_TYP	= OBJ$B_RECTYP+1,		! GSD SUB-TYPE

;17400  0174	

;17500  0175	!

;17600  0176	!	OFFSETS OF A P-SECTION DEFINITION RECORD

;17700  0177	!		(OBJ$C_GSD_PSC)

;17800  0178		OBJ$B_PSC_ALIGN	= OBJ$B_GSD_TYP+1,	! P_SECTION ALIGNMENT

;17900  0179	

;18000  0180		OBJ$W_PSC_FLAGS	= OBJ$B_PSC_ALIGN+1,	! P-SECTION FLAGS

;18100  0181	

;18200  0182		OBJ$L_PSC_ALLOC	= OBJ$W_PSC_FLAGS+2,	! ALLOCATION

;18300  0183	

;18400  0184		OBJ$T_PSC_NAME	= OBJ$L_PSC_ALLOC+4,	! P-SECTION NAME

;18500  0185	

;18600  0186	!



; Bliss-32 7.352	Saturday 22-AUG-1978 04:53:34	DBB3:[LINKER.SRC]LNKOBJFMT.B32;3				Page 4-1

; Digital Equipment Corporation

;

;18700  0187	!	OFFSETS OF ALL SYMBOL GSD RECORD

;18800  0188	!

;18900  0189	

;19000  0190		OBJ$B_SYM_DATYP	= OBJ$B_GSD_TYP+1,	! SYMBOL DATA TYPE

;19100  0191	

;19200  0192		OBJ$W_SYM_FLAGS	= OBJ$B_SYM_DATYP+1,	! SYMBOL FLAGS

;19300  0193	

;19400  0194	!

;19500  0195	!	SYMBOL REFERENCE GSD RECORD OFFSETS

;19600  0196	!

;19700  0197		OBJ$T_SRF_NAME	= OBJ$W_SYM_FLAGS+2,	! NAME OF REFERENCED SYMBOL

;19800  0198	

;19900  0199	!

;20000  0200	!	OFFSETS OF ORDINARY SYMBOL DEFINITION

;20100  0201	!

;20200  0202		OBJ$B_SDF_PSIND	= OBJ$W_SYM_FLAGS+2,	! P-SECTION INDEX

;20300  0203	

;20400  0204		OBJ$L_SDF_VALUE	= OBJ$B_SDF_PSIND+1,	! SYMBOL VALUE

;20500  0205	

;20600  0206		OBJ$T_SDF_NAME	= OBJ$L_SDF_VALUE+4,	! SYMBOL NAME STRING

;20700  0207	

;20800  0208	!

;20900  0209	!	ENTRY POINT DEFINITION RECORD OFFSETS

;21000  0210	!

;21100  0211		OBJ$B_EPM_PSIND	= OBJ$B_SDF_PSIND,	! P-SECTION INDEX

;21200  0212	

;21300  0213		OBJ$L_EPM_ADDRS	= OBJ$L_SDF_VALUE,	! ENTRY POINT ADDRESS

;21400  0214	

;21500  0215		OBJ$W_EPM_MASK	= OBJ$L_EPM_ADDRS+4,	! REGISTER SAVE MASK

;21600  0216	

;21700  0217		OBJ$T_EPM_NAME	= OBJ$W_EPM_MASK+2,	! ENTRY POINT NAME

;21800  0218	

;21900  0219	!

;22000  0220	!	END OF MODULE RECORD OFFSETS

;22100  0221	!

;22200  0222	

;22300  0223		OBJ$B_EOM_LNGCD	= OBJ$B_RECTYP+1,	! LANGUAGE PROCESSOR

;22400  0224							! COMPLETION CODE

;22500  0225	

;22600  0226		OBJ$B_EOM_PSIND	= OBJ$B_EOM_LNGCD+1,	! NUMBER OF P-SECTION

;22700  0227							! CONTANING TRANSFER

;22800  0228							! ADDRESS

;22900  0229	

;23000  0230		OBJ$L_EOM_TXFR	= OBJ$B_EOM_PSIND+1;	! PROGRAM TRANSFER ADDRESS

;23100  0231	

;23200  0232	

;23300  0233	END ELUDOM





							    .TITLE  OBJ_REC_OFFS

							    .IDENT  \X03.00\



						    OBJ$B_RECTYP==	0

						    OBJ$B_SUBTYP==	1

						    OBJ$B_MHD_STRLV==	2



; Bliss-32 7.352	Saturday 22-AUG-1978 04:53:34	DBB3:[LINKER.SRC]LNKOBJFMT.B32;3				Page 4-2

; Digital Equipment Corporation

;

						    OBJ$W_MHD_RECSZ==	3

						    OBJ$T_MHD_NAME==	5

						    OBJ$B_GSD_TYP==	1

						    OBJ$B_PSC_ALIGN==	2

						    OBJ$W_PSC_FLAGS==	3

						    OBJ$L_PSC_ALLOC==	5

						    OBJ$T_PSC_NAME==	9

						    OBJ$B_SYM_DATYP==	2

						    OBJ$W_SYM_FLAGS==	3

						    OBJ$T_SRF_NAME==	5

						    OBJ$B_SDF_PSIND==	5

						    OBJ$L_SDF_VALUE==	6

						    OBJ$T_SDF_NAME==	10

						    OBJ$B_EPM_PSIND==	5

						    OBJ$L_EPM_ADDRS==	6

						    OBJ$W_EPM_MASK==	10

						    OBJ$T_EPM_NAME==	12

						    OBJ$B_EOM_LNGCD==	1

						    OBJ$B_EOM_PSIND==	2

						    OBJ$L_EOM_TXFR==	3







;				       PSECT SUMMARY

;

;	Name		 Bytes			       Attributes

;

;  $CODE$         	     0  NOWRT,  RD ,  EXE,NOSHR,  LCL,  REL,  CON,NOPIC,ALIGN(2)











; Size:		0 code + 0 data bytes

; Run Time:	00:01.7

; Elapsed Time:	00:01.9

; Memory Used:	10 pages

; Compilation Complete

