!*** MODULE $GSYDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  GSD entry - Symbol definition
 ! 
 !  common to definitions, references, and entry
 !  point definitions.
 ! 
	PARAMETER GSY$M_WEAK = '00000001'X
	PARAMETER GSY$M_DEF = '00000002'X
	PARAMETER GSY$M_UNI = '00000004'X
	PARAMETER GSY$M_REL = '00000008'X
	PARAMETER GSY$M_COMM = '00000010'X
	STRUCTURE /GSYDEF/
	    UNION
	        MAP
	        BYTE      GSY$B_GSDTYP			 ! Type field 
	        END MAP
	        MAP
	            ! unsupported type CHARACTER*0 GSY$T_START
	            BYTE      %FILL
	        END MAP
	    END UNION
	    BYTE      GSY$B_DATYP			 ! Symbol data type 
	    UNION
	        MAP
	        INTEGER*2 GSY$W_FLAGS			 ! Symbol flags 
	        END MAP
	        MAP
	            PARAMETER GSY$S_WEAK = 1
	            PARAMETER GSY$V_WEAK = 0		 ! Weak symbol 
	            PARAMETER GSY$S_DEF = 1
	            PARAMETER GSY$V_DEF = 1			 ! Definition 
	            PARAMETER GSY$S_UNI = 1
	            PARAMETER GSY$V_UNI = 2			 ! Universal 
	            PARAMETER GSY$S_REL = 1
	            PARAMETER GSY$V_REL = 3			 ! Relocatable 
	            PARAMETER GSY$S_COMM = 1
	            PARAMETER GSY$V_COMM = 4		 ! C common globaldef
	        BYTE %FILL (1)
	        END MAP
	    END UNION
	END STRUCTURE	! GSYDEF
!DEC$ END OPTIONS