version	U12.1.00
uid	showdb.u1-1787877910-0
impl	local
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/databaseinfo.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/classinfo.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/packageinfo.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedobject.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedfunction.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parser.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedinitiallymethod.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedmethod.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedclass.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedprocedure.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedrecord.u
link	/local/pobj/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/parser/parsedprogram.u
global	1
	0,000005,main,1

proc main
	local	0,001000,a
	local	1,000000,parser__load_package_info
	local	2,000000,stop
	local	3,000000,f
	local	4,000000,open
	local	5,000000,x
	local	6,000000,key
	local	7,000000,s
	local	8,000000,fetch
	local	9,000000,match
	local	10,000000,parser__PackageInfo
	local	11,000000,parser__ClassInfo
	local	12,000000,write
	con	0,002000,1,2
	con	1,010000,4,154,141,156,147
	con	2,010000,2,156,157
	con	3,002000,1,1
	con	4,010000,1,144
	con	5,010000,8,160,141,143,153,141,147,145,040
	declend
	filen	showdb.icn
	line	11
	colm	11
	synt	any
	mark	L1
	mark	L2
	var	1
	mark	L4
	pnull
	pnull
	var	0
	int	0
	line	12
	colm	32
	synt	any
	subsc
	line	12
	colm	30
	synt	any
	nonnull
	line	12
	colm	35
	synt	any
	esusp
	goto	L5
lab L4
	str	1
lab L5
	line	12
	colm	29
	synt	any
	invoke	1
	line	12
	colm	43
	synt	any
	esusp
	goto	L3
lab L2
	var	2
	str	2
	line	12
	colm	48
	synt	any
	invoke	1
lab L3
	unmark
lab L1
	mark	L6
	pnull
	var	3
	var	4
	pnull
	var	0
	int	3
	line	13
	colm	14
	synt	any
	subsc
	str	4
	line	13
	colm	12
	synt	any
	invoke	2
	line	13
	colm	5
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	14
	colm	4
	synt	every
	mark0
	pnull
	var	5
	var	6
	var	3
	line	14
	colm	17
	synt	any
	invoke	1
	line	14
	colm	11
	synt	any
	asgn
	pop
	mark0
	mark	L10
	pnull
	var	7
	var	8
	var	3
	var	5
	line	15
	colm	17
	synt	any
	invoke	2
	line	15
	colm	9
	synt	any
	asgn
	unmark
lab L10
	mark	L11
	line	16
	colm	7
	synt	ifelse
	mark	L12
	var	9
	str	5
	var	7
	line	16
	colm	15
	synt	any
	invoke	2
	unmark
	mark	L14
	pnull
	var	5
	var	10
	line	17
	colm	34
	synt	any
	invoke	0
	line	17
	colm	12
	synt	any
	asgn
	unmark
lab L14
	mark	L15
	pnull
	var	5
	line	18
	colm	11
	synt	any
	field	init
	var	7
	line	18
	colm	16
	synt	any
	invoke	1
	line	18
	colm	20
	synt	any
	esusp
	goto	L16
lab L15
	var	2
	var	7
	line	18
	colm	26
	synt	any
	invoke	1
lab L16
	goto	L13
lab L12
	mark	L17
	pnull
	var	5
	var	11
	line	20
	colm	32
	synt	any
	invoke	0
	line	20
	colm	12
	synt	any
	asgn
	unmark
lab L17
	mark	L18
	pnull
	var	5
	line	21
	colm	11
	synt	any
	field	init
	var	7
	line	21
	colm	16
	synt	any
	invoke	1
	line	21
	colm	20
	synt	any
	esusp
	goto	L19
lab L18
	var	2
	var	7
	line	21
	colm	26
	synt	any
	invoke	1
lab L19
lab L13
	line	16
	colm	7
	synt	endifelse
	unmark
lab L11
	var	12
	pnull
	var	5
	line	23
	colm	14
	synt	any
	field	to_string
	line	23
	colm	24
	synt	any
	invoke	0
	line	23
	colm	12
	synt	any
	invoke	1
	unmark
lab L8
	efail
lab L9
	line	14
	colm	4
	synt	endevery
	unmark
lab L7
	pnull
	line	25
	colm	1
	synt	any
	pfail
	end
