/
/

/ fhd -- data segment header
/

.fc = 1
.if .fc-2
/ fc1 sizes
	symsize = 1600.
	linsize = 800.
	namsize = 1200.
	smblsize = 399.
.endif
.if .fc-1
/ fc2 sizes
	symsize = 1600.
	linsize = 1300.
	namsize = 1200.
	smblsize = 399.
.endif

	intcon = 4\<8+1			/ type of integer constant
	realcon = 4\<8+2
	logcon = 2\<8+3			/ type of logical constant
					/ 4 bytes to be ASA
	log1con = 1\<8+3
	int1con = 1\<8+1
	int2con = 2\<8+1
	dblcon = 10\<8+2
	dcplxcon = 20\<8+4
	cplxcon = 10\<8+4
	undefcon = 2\<8+6

.globl data
.globl ibuf
.globl obuf
.globl tbuf
.globl line
.globl eline
.globl ifno
.globl efno
.globl errp
.globl errb
.globl eerrb
.globl symtab
.globl esymtab
.globl esymp
.globl symtp
.globl namebuf
.globl enamebuf
.globl namep
.globl symbuf
.globl esymbuf
.globl ch
.globl ch1
.globl progt
.globl holquo
.globl nxtaloc
.globl imptab
.globl nerror
.globl temp
.globl functm
.globl edata
.globl	dsize

