version	U12.1.00
uid	emptygen.u1-1786032980-0
impl	error
link	strings.u
global	60
	0,000005,main,0
	1,000005,Alt,2
	2,000005,Apply,2
	3,000005,Arg,1
	4,000005,Asgnop,3
	5,000005,Augscan,2
	6,000005,Bamper,2
	7,000005,Binop,3
	8,000005,Body,-1
	9,000005,Break,1
	10,000005,Case,2
	11,000005,Cclause,2
	12,000005,Clist,2
	13,000005,Clit,1
	14,000005,Compound,-1
	15,000005,Create,1
	16,000005,Default,1
	17,000005,End,0
	18,000005,Every,1
	19,000005,EveryDo,2
	20,000005,Fail,0
	21,000005,Field,2
	22,000005,Global,-1
	23,000005,If,2
	24,000005,IfElse,3
	25,000005,Ilit,1
	26,000005,Initial,1
	27,000005,Invocable,-1
	28,000005,Invoke,-2
	29,000005,Key,1
	30,000005,Limit,2
	31,000005,Link,-1
	32,000005,List,-1
	33,000005,Local,-1
	34,000005,Next,0
	35,000005,Not,1
	36,000005,Null,0
	37,000005,Paren,-1
	38,000005,Pdco,-2
	39,000005,Proc,-2
	40,000005,Record,-2
	41,000005,Repeat,1
	42,000005,Return,1
	43,000005,Rlit,1
	44,000005,Scan,2
	45,000005,Section,4
	46,000005,Slit,1
	47,000005,Static,-1
	48,000005,Subscript,2
	49,000005,Suspend,1
	50,000005,SuspendDo,2
	51,000005,To,2
	52,000005,ToBy,3
	53,000005,Repalt,1
	54,000005,Unop,2
	55,000005,Until,1
	56,000005,UntilDo,2
	57,000005,Var,1
	58,000005,While,1
	59,000005,WhileDo,2

proc main
	local	0,000000,Mp
	declend
	filen	emptygen.icn
	line	38
	colm	11
	synt	any
	mark	L1
	var	0
	line	40
	colm	6
	synt	any
	invoke	0
	unmark
lab L1
	pnull
	line	42
	colm	1
	synt	any
	pfail
	end
proc Alt
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	44
	colm	11
	synt	any
	line	45
	colm	1
	synt	any
	pfail
	end
proc Apply
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	47
	colm	11
	synt	any
	line	48
	colm	1
	synt	any
	pfail
	end
proc Arg
	local	0,001000,e
	declend
	line	50
	colm	11
	synt	any
	line	51
	colm	1
	synt	any
	pfail
	end
proc Asgnop
	local	0,001000,op
	local	1,001000,e1
	local	2,001000,e2
	declend
	line	53
	colm	11
	synt	any
	line	54
	colm	1
	synt	any
	pfail
	end
proc Augscan
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	56
	colm	11
	synt	any
	line	57
	colm	1
	synt	any
	pfail
	end
proc Bamper
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	59
	colm	11
	synt	any
	line	60
	colm	1
	synt	any
	pfail
	end
proc Binop
	local	0,001000,op
	local	1,001000,e1
	local	2,001000,e2
	declend
	line	62
	colm	11
	synt	any
	line	63
	colm	1
	synt	any
	pfail
	end
proc Body
	local	0,001000,es
	declend
	line	65
	colm	11
	synt	any
	line	66
	colm	1
	synt	any
	pfail
	end
proc Break
	local	0,001000,e
	declend
	line	68
	colm	11
	synt	any
	line	69
	colm	1
	synt	any
	pfail
	end
proc Case
	local	0,001000,e
	local	1,001000,clist
	declend
	line	71
	colm	11
	synt	any
	line	72
	colm	1
	synt	any
	pfail
	end
proc Cclause
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	74
	colm	11
	synt	any
	line	75
	colm	1
	synt	any
	pfail
	end
proc Clist
	local	0,001000,cclause1
	local	1,001000,cclause2
	declend
	line	77
	colm	11
	synt	any
	line	78
	colm	1
	synt	any
	pfail
	end
proc Clit
	local	0,001000,c
	declend
	line	80
	colm	11
	synt	any
	line	81
	colm	1
	synt	any
	pfail
	end
proc Compound
	local	0,001000,es
	declend
	line	83
	colm	11
	synt	any
	line	84
	colm	1
	synt	any
	pfail
	end
proc Create
	local	0,001000,e
	declend
	line	86
	colm	11
	synt	any
	line	87
	colm	1
	synt	any
	pfail
	end
proc Default
	local	0,001000,e
	declend
	line	89
	colm	11
	synt	any
	line	90
	colm	1
	synt	any
	pfail
	end
proc End
	declend
	line	92
	colm	11
	synt	any
	line	93
	colm	1
	synt	any
	pfail
	end
proc Every
	local	0,001000,e
	declend
	line	95
	colm	11
	synt	any
	line	96
	colm	1
	synt	any
	pfail
	end
proc EveryDo
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	98
	colm	11
	synt	any
	line	99
	colm	1
	synt	any
	pfail
	end
proc Fail
	declend
	line	101
	colm	11
	synt	any
	line	102
	colm	1
	synt	any
	pfail
	end
proc Field
	local	0,001000,e
	local	1,001000,f
	declend
	line	104
	colm	11
	synt	any
	line	105
	colm	1
	synt	any
	pfail
	end
proc Global
	local	0,001000,vs
	declend
	line	107
	colm	11
	synt	any
	line	108
	colm	1
	synt	any
	pfail
	end
proc If
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	110
	colm	11
	synt	any
	line	111
	colm	1
	synt	any
	pfail
	end
proc IfElse
	local	0,001000,e1
	local	1,001000,e2
	local	2,001000,e3
	declend
	line	113
	colm	11
	synt	any
	line	114
	colm	1
	synt	any
	pfail
	end
proc Ilit
	local	0,001000,i
	declend
	line	116
	colm	11
	synt	any
	line	117
	colm	1
	synt	any
	pfail
	end
proc Initial
	local	0,001000,e
	declend
	line	119
	colm	11
	synt	any
	line	120
	colm	1
	synt	any
	pfail
	end
proc Invocable
	local	0,001000,ss
	declend
	line	122
	colm	11
	synt	any
	line	123
	colm	1
	synt	any
	pfail
	end
proc Invoke
	local	0,001000,e
	local	1,001000,es
	declend
	line	125
	colm	11
	synt	any
	line	126
	colm	1
	synt	any
	pfail
	end
proc Key
	local	0,001000,s
	declend
	line	128
	colm	11
	synt	any
	line	129
	colm	1
	synt	any
	pfail
	end
proc Limit
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	131
	colm	11
	synt	any
	line	132
	colm	1
	synt	any
	pfail
	end
proc Link
	local	0,001000,vs
	declend
	line	134
	colm	11
	synt	any
	line	135
	colm	1
	synt	any
	pfail
	end
proc List
	local	0,001000,es
	declend
	line	137
	colm	11
	synt	any
	line	138
	colm	1
	synt	any
	pfail
	end
proc Local
	local	0,001000,vs
	declend
	line	140
	colm	11
	synt	any
	line	141
	colm	1
	synt	any
	pfail
	end
proc Next
	declend
	line	143
	colm	11
	synt	any
	line	144
	colm	1
	synt	any
	pfail
	end
proc Not
	local	0,001000,e
	declend
	line	146
	colm	11
	synt	any
	line	147
	colm	1
	synt	any
	pfail
	end
proc Null
	declend
	line	149
	colm	11
	synt	any
	line	150
	colm	1
	synt	any
	pfail
	end
proc Paren
	local	0,001000,es
	declend
	line	152
	colm	11
	synt	any
	line	153
	colm	1
	synt	any
	pfail
	end
proc Pdco
	local	0,001000,e
	local	1,001000,es
	declend
	line	155
	colm	11
	synt	any
	line	156
	colm	1
	synt	any
	pfail
	end
proc Proc
	local	0,001000,n
	local	1,001000,vs
	declend
	line	158
	colm	11
	synt	any
	line	159
	colm	1
	synt	any
	pfail
	end
proc Record
	local	0,001000,n
	local	1,001000,fs
	declend
	line	161
	colm	11
	synt	any
	line	162
	colm	1
	synt	any
	pfail
	end
proc Repeat
	local	0,001000,e
	declend
	line	164
	colm	11
	synt	any
	line	165
	colm	1
	synt	any
	pfail
	end
proc Return
	local	0,001000,e
	declend
	line	167
	colm	11
	synt	any
	line	168
	colm	1
	synt	any
	pfail
	end
proc Rlit
	local	0,001000,r
	declend
	line	170
	colm	11
	synt	any
	line	171
	colm	1
	synt	any
	pfail
	end
proc Scan
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	173
	colm	11
	synt	any
	line	174
	colm	1
	synt	any
	pfail
	end
proc Section
	local	0,001000,op
	local	1,001000,e1
	local	2,001000,e2
	local	3,001000,e3
	declend
	line	176
	colm	11
	synt	any
	line	177
	colm	1
	synt	any
	pfail
	end
proc Slit
	local	0,001000,s
	declend
	line	179
	colm	11
	synt	any
	line	180
	colm	1
	synt	any
	pfail
	end
proc Static
	local	0,001000,vs
	declend
	line	182
	colm	11
	synt	any
	line	183
	colm	1
	synt	any
	pfail
	end
proc Subscript
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	185
	colm	11
	synt	any
	line	186
	colm	1
	synt	any
	pfail
	end
proc Suspend
	local	0,001000,e
	declend
	line	188
	colm	11
	synt	any
	line	189
	colm	1
	synt	any
	pfail
	end
proc SuspendDo
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	191
	colm	11
	synt	any
	line	192
	colm	1
	synt	any
	pfail
	end
proc To
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	194
	colm	11
	synt	any
	line	195
	colm	1
	synt	any
	pfail
	end
proc ToBy
	local	0,001000,e1
	local	1,001000,e2
	local	2,001000,e3
	declend
	line	197
	colm	11
	synt	any
	line	198
	colm	1
	synt	any
	pfail
	end
proc Repalt
	local	0,001000,e
	declend
	line	200
	colm	11
	synt	any
	line	201
	colm	1
	synt	any
	pfail
	end
proc Unop
	local	0,001000,op
	local	1,001000,e
	declend
	line	203
	colm	11
	synt	any
	line	204
	colm	1
	synt	any
	pfail
	end
proc Until
	local	0,001000,e
	declend
	line	206
	colm	11
	synt	any
	line	207
	colm	1
	synt	any
	pfail
	end
proc UntilDo
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	209
	colm	11
	synt	any
	line	210
	colm	1
	synt	any
	pfail
	end
proc Var
	local	0,001000,v
	declend
	line	212
	colm	11
	synt	any
	line	213
	colm	1
	synt	any
	pfail
	end
proc While
	local	0,001000,e
	declend
	line	215
	colm	11
	synt	any
	line	216
	colm	1
	synt	any
	pfail
	end
proc WhileDo
	local	0,001000,e1
	local	1,001000,e2
	declend
	line	218
	colm	11
	synt	any
	line	219
	colm	1
	synt	any
	pfail
	end
