!*** MODULE $SDFWDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  Symbol definition with word of psect value
 ! 
	PARAMETER SDFW$K_NAME = '0000000B'X
	PARAMETER SDFW$C_NAME = '0000000B'X
	STRUCTURE /SDFWDEF/
	    UNION
	        MAP
	        BYTE      SDFW$B_GSDTYP			 ! Maps over GSY$B_GSDTYP 
	        END MAP
	        MAP
	            ! unsupported type CHARACTER*0 SDFW$T_START
	            BYTE      %FILL
	        END MAP
	    END UNION
	    BYTE      SDFW$B_DATYP			 ! Maps over GSY$B_DATYP 
	    INTEGER*2 SDFW$W_FLAGS			 ! Maps over GSY$W_FLAGS 
	    INTEGER*2 SDFW$W_PSINDX			 ! Owning psect number 
	    INTEGER*4 SDFW$L_VALUE			 ! Value of symbol 
	    BYTE      SDFW$B_NAMLNG			 ! Length of name 
	    CHARACTER*31 SDFW$T_NAME		 ! Symbol name 
	END STRUCTURE	! SDFWDEF
!DEC$ END OPTIONS