c  common blocks for sgiof for flags and buffers
c
	integer outflg	!0 if output undefined
			!else > 0
	integer inflg	!0 if input undefined
			!1 if tty, 2 if disk, 3 if none, 5 if mbx
	integer outdsk	!0 if no disk output
			!-1 if need to open, 1 if open
			!-2 if turned off for terminal only stuff
	integer outtrm	!0 if no tty output
			!-1 if need to open, 1 if open
	integer outaux	!0 if no auxiliary output
			!-1 if need to open, 1 if open

cdec$	psect /sg_flag/ noshr
	common /sg_flag/ outflg,inflg,outdsk,outtrm,outaux
c
	byte tbuff(*)		!tty buffer
	pointer (tbufa,tbuff)	!pointer to tty buffer
	integer maxtb		!size of tty buffer
	integer ktptr		!index into tty buffer
	byte dbuff(*)		!disk buffer
	pointer (dbufa,dbuff)	!pointer to disk buffer
	integer maxdb		!size of disk buffer in bytes
	integer kdptr		!index into disk buffer
	integer ktqio		!qio channel for terminal output
	integer ktmbx		!mailbox channel for terminal broadcasts
	integer kxqio		!qio channels for auxil tty output
	integer kdqio		!qio channel for disk output
	integer kdsav(2)	!disk address of start of last frame
	integer keepc		!character to "keep" a disk frame

cdec$	psect /sg_buff/ noshr
	common /sg_buff/ tbufa,dbufa,maxtb,maxdb,ktptr,kdptr,
     >		ktqio,ktmbx,kxqio,kdqio,kdsav,keepc
