version	U12.1.00
uid	UniForm.u1-1786033096-0
record	UniDoc__Sequence__state,4
	0,__s
	1,__m
	2,contents
	3,comments
record	UniDoc__Sequence__methods,30
	0,size
	1,set
	2,add
	3,get
	4,contains
	5,setComments
	6,getComments
	7,addComment
	8,startNewComments
	9,itemsHaveComments
	10,initially
	11,clone
	12,to_string
	13,equals
	14,hash_code
	15,get_class_name
	16,get_id
	17,get_class
	18,is_instance
	19,Type
	20,instanceOf
	21,className
	22,invoke
	23,getField
	24,setField
	25,hasField
	26,fieldNames
	27,genMethods
	28,hasMethod
	29,lang__Object
record	UniDoc__Set__state,4
	0,__s
	1,__m
	2,contents
	3,comments
record	UniDoc__Set__methods,33
	0,size
	1,set
	2,add
	3,del
	4,get
	5,getByName
	6,getNames
	7,contains
	8,containsName
	9,setComments
	10,getComments
	11,addComment
	12,startNewComments
	13,initially
	14,clone
	15,to_string
	16,equals
	17,hash_code
	18,get_class_name
	19,get_id
	20,get_class
	21,is_instance
	22,Type
	23,instanceOf
	24,className
	25,invoke
	26,getField
	27,setField
	28,hasField
	29,fieldNames
	30,genMethods
	31,hasMethod
	32,lang__Object
record	UniDoc__UEntity__state,6
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,srcFile
record	UniDoc__UEntity__methods,32
	0,setName
	1,getName
	2,setParent
	3,getParent
	4,setSrcFile
	5,getSrcFile
	6,getFormType
	7,setComments
	8,getComments
	9,addComment
	10,startNewComments
	11,mergeComments
	12,initially
	13,clone
	14,to_string
	15,equals
	16,hash_code
	17,get_class_name
	18,get_id
	19,get_class
	20,is_instance
	21,Type
	22,instanceOf
	23,className
	24,invoke
	25,getField
	26,setField
	27,hasField
	28,fieldNames
	29,genMethods
	30,hasMethod
	31,lang__Object
record	UniDoc__UName__state,9
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,category
	6,defValue
	7,typeValue
	8,srcFile
record	UniDoc__UName__methods,39
	0,setCategory
	1,getCategory
	2,setDefValue
	3,getDefValue
	4,setTypeValue
	5,getTypeValue
	6,initially
	7,setName
	8,getName
	9,setParent
	10,getParent
	11,setSrcFile
	12,getSrcFile
	13,getFormType
	14,setComments
	15,getComments
	16,addComment
	17,startNewComments
	18,mergeComments
	19,clone
	20,to_string
	21,equals
	22,hash_code
	23,get_class_name
	24,get_id
	25,get_class
	26,is_instance
	27,Type
	28,instanceOf
	29,className
	30,invoke
	31,getField
	32,setField
	33,hasField
	34,fieldNames
	35,genMethods
	36,hasMethod
	37,UniDoc__UEntity
	38,lang__Object
record	UniDoc__UGlobal__state,8
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,defValue
	6,typeValue
	7,srcFile
record	UniDoc__UGlobal__methods,37
	0,setDefValue
	1,getDefValue
	2,setTypeValue
	3,getTypeValue
	4,initially
	5,setName
	6,getName
	7,setParent
	8,getParent
	9,setSrcFile
	10,getSrcFile
	11,getFormType
	12,setComments
	13,getComments
	14,addComment
	15,startNewComments
	16,mergeComments
	17,clone
	18,to_string
	19,equals
	20,hash_code
	21,get_class_name
	22,get_id
	23,get_class
	24,is_instance
	25,Type
	26,instanceOf
	27,className
	28,invoke
	29,getField
	30,setField
	31,hasField
	32,fieldNames
	33,genMethods
	34,hasMethod
	35,UniDoc__UEntity
	36,lang__Object
record	UniDoc__UMethod__state,7
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,params
	6,srcFile
record	UniDoc__UMethod__methods,36
	0,setParams
	1,getParams
	2,addParam
	3,initially
	4,setName
	5,getName
	6,setParent
	7,getParent
	8,setSrcFile
	9,getSrcFile
	10,getFormType
	11,setComments
	12,getComments
	13,addComment
	14,startNewComments
	15,mergeComments
	16,clone
	17,to_string
	18,equals
	19,hash_code
	20,get_class_name
	21,get_id
	22,get_class
	23,is_instance
	24,Type
	25,instanceOf
	26,className
	27,invoke
	28,getField
	29,setField
	30,hasField
	31,fieldNames
	32,genMethods
	33,hasMethod
	34,UniDoc__UEntity
	35,lang__Object
record	UniDoc__UProc__state,7
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,params
	6,srcFile
record	UniDoc__UProc__methods,36
	0,setParams
	1,getParams
	2,addParam
	3,initially
	4,setName
	5,getName
	6,setParent
	7,getParent
	8,setSrcFile
	9,getSrcFile
	10,getFormType
	11,setComments
	12,getComments
	13,addComment
	14,startNewComments
	15,mergeComments
	16,clone
	17,to_string
	18,equals
	19,hash_code
	20,get_class_name
	21,get_id
	22,get_class
	23,is_instance
	24,Type
	25,instanceOf
	26,className
	27,invoke
	28,getField
	29,setField
	30,hasField
	31,fieldNames
	32,genMethods
	33,hasMethod
	34,UniDoc__UEntity
	35,lang__Object
record	UniDoc__URecord__state,7
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,fields
	6,srcFile
record	UniDoc__URecord__methods,36
	0,setParams
	1,getParams
	2,addField
	3,initially
	4,setName
	5,getName
	6,setParent
	7,getParent
	8,setSrcFile
	9,getSrcFile
	10,getFormType
	11,setComments
	12,getComments
	13,addComment
	14,startNewComments
	15,mergeComments
	16,clone
	17,to_string
	18,equals
	19,hash_code
	20,get_class_name
	21,get_id
	22,get_class
	23,is_instance
	24,Type
	25,instanceOf
	26,className
	27,invoke
	28,getField
	29,setField
	30,hasField
	31,fieldNames
	32,genMethods
	33,hasMethod
	34,UniDoc__UEntity
	35,lang__Object
record	UniDoc__UImport__state,6
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,srcFile
record	UniDoc__UImport__methods,33
	0,initially
	1,setName
	2,getName
	3,setParent
	4,getParent
	5,setSrcFile
	6,getSrcFile
	7,getFormType
	8,setComments
	9,getComments
	10,addComment
	11,startNewComments
	12,mergeComments
	13,clone
	14,to_string
	15,equals
	16,hash_code
	17,get_class_name
	18,get_id
	19,get_class
	20,is_instance
	21,Type
	22,instanceOf
	23,className
	24,invoke
	25,getField
	26,setField
	27,hasField
	28,fieldNames
	29,genMethods
	30,hasMethod
	31,UniDoc__UEntity
	32,lang__Object
record	UniDoc__ULink__state,6
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,srcFile
record	UniDoc__ULink__methods,33
	0,initially
	1,setName
	2,getName
	3,setParent
	4,getParent
	5,setSrcFile
	6,getSrcFile
	7,getFormType
	8,setComments
	9,getComments
	10,addComment
	11,startNewComments
	12,mergeComments
	13,clone
	14,to_string
	15,equals
	16,hash_code
	17,get_class_name
	18,get_id
	19,get_class
	20,is_instance
	21,Type
	22,instanceOf
	23,className
	24,invoke
	25,getField
	26,setField
	27,hasField
	28,fieldNames
	29,genMethods
	30,hasMethod
	31,UniDoc__UEntity
	32,lang__Object
record	UniDoc__UClass__state,12
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,constructor
	6,superClasses
	7,fields
	8,methods
	9,pack
	10,file
	11,srcFile
record	UniDoc__UClass__methods,50
	0,setName
	1,getFullName
	2,setSuperClasses
	3,getSuperClasses
	4,addSuperClass
	5,setParams
	6,getParams
	7,addField
	8,setMethods
	9,getMethods
	10,addMethod
	11,hasMethod
	12,getMethod
	13,setConstructor
	14,getConstructor
	15,setPackage
	16,getPackage
	17,setFile
	18,getFile
	19,initially
	20,getName
	21,setParent
	22,getParent
	23,setSrcFile
	24,getSrcFile
	25,getFormType
	26,setComments
	27,getComments
	28,addComment
	29,startNewComments
	30,mergeComments
	31,clone
	32,to_string
	33,equals
	34,hash_code
	35,get_class_name
	36,get_id
	37,get_class
	38,is_instance
	39,Type
	40,instanceOf
	41,className
	42,invoke
	43,getField
	44,setField
	45,hasField
	46,fieldNames
	47,genMethods
	48,UniDoc__UEntity
	49,lang__Object
record	UniDoc__UConstructor__state,7
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,params
	6,srcFile
record	UniDoc__UConstructor__methods,36
	0,setParams
	1,getParams
	2,addParam
	3,initially
	4,setName
	5,getName
	6,setParent
	7,getParent
	8,setSrcFile
	9,getSrcFile
	10,getFormType
	11,setComments
	12,getComments
	13,addComment
	14,startNewComments
	15,mergeComments
	16,clone
	17,to_string
	18,equals
	19,hash_code
	20,get_class_name
	21,get_id
	22,get_class
	23,is_instance
	24,Type
	25,instanceOf
	26,className
	27,invoke
	28,getField
	29,setField
	30,hasField
	31,fieldNames
	32,genMethods
	33,hasMethod
	34,UniDoc__UEntity
	35,lang__Object
record	UniDoc__UPackage__state,12
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,files
	6,procs
	7,imports
	8,classes
	9,globals
	10,records
	11,srcFile
record	UniDoc__UPackage__methods,59
	0,setFiles
	1,getFiles
	2,addFile
	3,delFile
	4,getFileNames
	5,setImports
	6,getImports
	7,addImport
	8,getImportNames
	9,setProcedures
	10,getProcedures
	11,addProcedure
	12,getProcedureNames
	13,setClasses
	14,getClasses
	15,getClass
	16,addClass
	17,getClassNames
	18,setGlobals
	19,getGlobals
	20,addGlobal
	21,getGlobalNames
	22,setRecords
	23,getRecords
	24,addRecord
	25,getRecordNames
	26,initially
	27,setName
	28,getName
	29,setParent
	30,getParent
	31,setSrcFile
	32,getSrcFile
	33,getFormType
	34,setComments
	35,getComments
	36,addComment
	37,startNewComments
	38,mergeComments
	39,clone
	40,to_string
	41,equals
	42,hash_code
	43,get_class_name
	44,get_id
	45,get_class
	46,is_instance
	47,Type
	48,instanceOf
	49,className
	50,invoke
	51,getField
	52,setField
	53,hasField
	54,fieldNames
	55,genMethods
	56,hasMethod
	57,UniDoc__UEntity
	58,lang__Object
record	UniDoc__UFile__state,13
	0,__s
	1,__m
	2,name
	3,parent
	4,comments
	5,imports
	6,links
	7,pack
	8,procs
	9,classes
	10,globals
	11,records
	12,srcFile
record	UniDoc__UFile__methods,61
	0,setImports
	1,getImports
	2,addImport
	3,getImportNames
	4,setLinks
	5,getLinks
	6,addLink
	7,getLinkNames
	8,setPackage
	9,getPackage
	10,getPackageName
	11,setProcedures
	12,getProcedures
	13,addProcedure
	14,getProcedureNames
	15,setClasses
	16,getClasses
	17,getClass
	18,addClass
	19,getClassNames
	20,setGlobals
	21,getGlobals
	22,addGlobal
	23,getGlobalNames
	24,setRecords
	25,getRecords
	26,addRecord
	27,getRecordNames
	28,initially
	29,setName
	30,getName
	31,setParent
	32,getParent
	33,setSrcFile
	34,getSrcFile
	35,getFormType
	36,setComments
	37,getComments
	38,addComment
	39,startNewComments
	40,mergeComments
	41,clone
	42,to_string
	43,equals
	44,hash_code
	45,get_class_name
	46,get_id
	47,get_class
	48,is_instance
	49,Type
	50,instanceOf
	51,className
	52,invoke
	53,getField
	54,setField
	55,hasField
	56,fieldNames
	57,genMethods
	58,hasMethod
	59,UniDoc__UEntity
	60,lang__Object
record	UniDoc__Comments__state,4
	0,__s
	1,__m
	2,head
	3,tail
record	UniDoc__Comments__methods,26
	0,size
	1,add
	2,get
	3,newBlock
	4,append
	5,getFirstSentence
	6,initially
	7,clone
	8,to_string
	9,equals
	10,hash_code
	11,get_class_name
	12,get_id
	13,get_class
	14,is_instance
	15,Type
	16,instanceOf
	17,className
	18,invoke
	19,getField
	20,setField
	21,hasField
	22,fieldNames
	23,genMethods
	24,hasMethod
	25,lang__Object
record	UniDoc__CommentBlock__state,5
	0,__s
	1,__m
	2,legacy
	3,comments
	4,nextblock
record	UniDoc__CommentBlock__methods,26
	0,size
	1,isLegacy
	2,put
	3,firstNonBlank
	4,get
	5,getFirstSentence
	6,initially
	7,clone
	8,to_string
	9,equals
	10,hash_code
	11,get_class_name
	12,get_id
	13,get_class
	14,is_instance
	15,Type
	16,instanceOf
	17,className
	18,invoke
	19,getField
	20,setField
	21,hasField
	22,fieldNames
	23,genMethods
	24,hasMethod
	25,lang__Object
impl	local
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/object.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/error.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/format.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/stringbuff.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/cltable.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/comparator.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/md5.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/notification.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/listener.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/connectable.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/setfields.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/timezone.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/time.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/mapbytes.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/money.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/pushback.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/qsort.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/args.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/blockread.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/notifier.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/scan_util.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/misc_util.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/str_util.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/str_replacer.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/matrix_util.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/classcoding.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/basicclasscoding.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/method.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/class.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/langprocs.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/object.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/decode.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/encode.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/fcn_util.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/selectiveclasscoding.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/predicat.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/runnable.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/process.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/property.u
global	240
	0,000005,UniDoc__Sequence_size,1
	1,000005,UniDoc__Sequence_set,2
	2,000005,UniDoc__Sequence_add,2
	3,000005,UniDoc__Sequence_get,1
	4,000005,UniDoc__Sequence_contains,2
	5,000005,UniDoc__Sequence_setComments,2
	6,000005,UniDoc__Sequence_getComments,1
	7,000005,UniDoc__Sequence_addComment,2
	8,000005,UniDoc__Sequence_startNewComments,2
	9,000005,UniDoc__Sequence_itemsHaveComments,1
	10,000005,UniDoc__Sequence_initially,1
	11,000011,UniDoc__Sequence__state,4
	12,000011,UniDoc__Sequence__methods,30
	13,000001,UniDoc__Sequence__oprec,0
	14,000001,lang__Object__oprec,0
	15,000005,UniDoc__Sequence,2
	16,000005,UniDoc__Sequenceinitialize,0
	17,000005,UniDoc__Set_size,1
	18,000005,UniDoc__Set_set,2
	19,000005,UniDoc__Set_add,3
	20,000005,UniDoc__Set_del,2
	21,000005,UniDoc__Set_get,1
	22,000005,UniDoc__Set_getByName,2
	23,000005,UniDoc__Set_getNames,1
	24,000005,UniDoc__Set_contains,2
	25,000005,UniDoc__Set_containsName,2
	26,000005,UniDoc__Set_setComments,2
	27,000005,UniDoc__Set_getComments,1
	28,000005,UniDoc__Set_addComment,2
	29,000005,UniDoc__Set_startNewComments,2
	30,000005,UniDoc__Set_initially,1
	31,000011,UniDoc__Set__state,4
	32,000011,UniDoc__Set__methods,33
	33,000001,UniDoc__Set__oprec,0
	34,000005,UniDoc__Set,2
	35,000005,UniDoc__Setinitialize,0
	36,000005,UniDoc__UEntity_setName,2
	37,000005,UniDoc__UEntity_getName,1
	38,000005,UniDoc__UEntity_setParent,2
	39,000005,UniDoc__UEntity_getParent,1
	40,000005,UniDoc__UEntity_setSrcFile,2
	41,000005,UniDoc__UEntity_getSrcFile,1
	42,000005,UniDoc__UEntity_getFormType,1
	43,000005,UniDoc__UEntity_setComments,2
	44,000005,UniDoc__UEntity_getComments,1
	45,000005,UniDoc__UEntity_addComment,2
	46,000005,UniDoc__UEntity_startNewComments,2
	47,000005,UniDoc__UEntity_mergeComments,2
	48,000005,UniDoc__UEntity_initially,1
	49,000011,UniDoc__UEntity__state,6
	50,000011,UniDoc__UEntity__methods,32
	51,000001,UniDoc__UEntity__oprec,0
	52,000005,UniDoc__UEntity,4
	53,000005,UniDoc__UEntityinitialize,0
	54,000005,UniDoc__UName_setCategory,2
	55,000005,UniDoc__UName_getCategory,1
	56,000005,UniDoc__UName_setDefValue,2
	57,000005,UniDoc__UName_getDefValue,1
	58,000005,UniDoc__UName_setTypeValue,2
	59,000005,UniDoc__UName_getTypeValue,1
	60,000005,UniDoc__UName_initially,1
	61,000011,UniDoc__UName__state,9
	62,000011,UniDoc__UName__methods,39
	63,000001,UniDoc__UName__oprec,0
	64,000005,UniDoc__UName,7
	65,000005,UniDoc__UNameinitialize,0
	66,000005,UniDoc__UGlobal_setDefValue,2
	67,000005,UniDoc__UGlobal_getDefValue,1
	68,000005,UniDoc__UGlobal_setTypeValue,2
	69,000005,UniDoc__UGlobal_getTypeValue,1
	70,000005,UniDoc__UGlobal_initially,1
	71,000011,UniDoc__UGlobal__state,8
	72,000011,UniDoc__UGlobal__methods,37
	73,000001,UniDoc__UGlobal__oprec,0
	74,000005,UniDoc__UGlobal,6
	75,000005,UniDoc__UGlobalinitialize,0
	76,000005,UniDoc__UMethod_setParams,2
	77,000005,UniDoc__UMethod_getParams,1
	78,000005,UniDoc__UMethod_addParam,2
	79,000005,UniDoc__UMethod_initially,1
	80,000011,UniDoc__UMethod__state,7
	81,000011,UniDoc__UMethod__methods,36
	82,000001,UniDoc__UMethod__oprec,0
	83,000005,UniDoc__UMethod,5
	84,000005,UniDoc__UMethodinitialize,0
	85,000005,UniDoc__UProc_setParams,2
	86,000005,UniDoc__UProc_getParams,1
	87,000005,UniDoc__UProc_addParam,2
	88,000005,UniDoc__UProc_initially,1
	89,000011,UniDoc__UProc__state,7
	90,000011,UniDoc__UProc__methods,36
	91,000001,UniDoc__UProc__oprec,0
	92,000005,UniDoc__UProc,5
	93,000005,UniDoc__UProcinitialize,0
	94,000005,UniDoc__URecord_setParams,2
	95,000005,UniDoc__URecord_getParams,1
	96,000005,UniDoc__URecord_addField,2
	97,000005,UniDoc__URecord_initially,1
	98,000011,UniDoc__URecord__state,7
	99,000011,UniDoc__URecord__methods,36
	100,000001,UniDoc__URecord__oprec,0
	101,000005,UniDoc__URecord,5
	102,000005,UniDoc__URecordinitialize,0
	103,000005,UniDoc__UImport_initially,1
	104,000011,UniDoc__UImport__state,6
	105,000011,UniDoc__UImport__methods,33
	106,000001,UniDoc__UImport__oprec,0
	107,000005,UniDoc__UImport,4
	108,000005,UniDoc__UImportinitialize,0
	109,000005,UniDoc__ULink_initially,1
	110,000011,UniDoc__ULink__state,6
	111,000011,UniDoc__ULink__methods,33
	112,000001,UniDoc__ULink__oprec,0
	113,000005,UniDoc__ULink,4
	114,000005,UniDoc__ULinkinitialize,0
	115,000005,UniDoc__UClass_setName,2
	116,000005,UniDoc__UClass_getFullName,1
	117,000005,UniDoc__UClass_setSuperClasses,2
	118,000005,UniDoc__UClass_getSuperClasses,1
	119,000005,UniDoc__UClass_addSuperClass,2
	120,000005,UniDoc__UClass_setParams,2
	121,000005,UniDoc__UClass_getParams,1
	122,000005,UniDoc__UClass_addField,2
	123,000005,UniDoc__UClass_setMethods,2
	124,000005,UniDoc__UClass_getMethods,1
	125,000005,UniDoc__UClass_addMethod,2
	126,000005,UniDoc__UClass_hasMethod,2
	127,000005,UniDoc__UClass_getMethod,2
	128,000005,UniDoc__UClass_setConstructor,2
	129,000005,UniDoc__UClass_getConstructor,1
	130,000005,UniDoc__UClass_setPackage,2
	131,000005,UniDoc__UClass_getPackage,1
	132,000005,UniDoc__UClass_setFile,2
	133,000005,UniDoc__UClass_getFile,1
	134,000005,UniDoc__UClass_initially,1
	135,000011,UniDoc__UClass__state,12
	136,000011,UniDoc__UClass__methods,50
	137,000001,UniDoc__UClass__oprec,0
	138,000005,UniDoc__UClass,10
	139,000005,UniDoc__UClassinitialize,0
	140,000005,UniDoc__UConstructor_setParams,2
	141,000005,UniDoc__UConstructor_getParams,1
	142,000005,UniDoc__UConstructor_addParam,2
	143,000005,UniDoc__UConstructor_initially,1
	144,000011,UniDoc__UConstructor__state,7
	145,000011,UniDoc__UConstructor__methods,36
	146,000001,UniDoc__UConstructor__oprec,0
	147,000005,UniDoc__UConstructor,5
	148,000005,UniDoc__UConstructorinitialize,0
	149,000005,UniDoc__UPackage_setFiles,2
	150,000005,UniDoc__UPackage_getFiles,1
	151,000005,UniDoc__UPackage_addFile,2
	152,000005,UniDoc__UPackage_delFile,2
	153,000005,UniDoc__UPackage_getFileNames,1
	154,000005,UniDoc__UPackage_setImports,2
	155,000005,UniDoc__UPackage_getImports,1
	156,000005,UniDoc__UPackage_addImport,2
	157,000005,UniDoc__UPackage_getImportNames,1
	158,000005,UniDoc__UPackage_setProcedures,2
	159,000005,UniDoc__UPackage_getProcedures,1
	160,000005,UniDoc__UPackage_addProcedure,2
	161,000005,UniDoc__UPackage_getProcedureNames,1
	162,000005,UniDoc__UPackage_setClasses,2
	163,000005,UniDoc__UPackage_getClasses,1
	164,000005,UniDoc__UPackage_getClass,2
	165,000005,UniDoc__UPackage_addClass,2
	166,000005,UniDoc__UPackage_getClassNames,1
	167,000005,UniDoc__UPackage_setGlobals,2
	168,000005,UniDoc__UPackage_getGlobals,1
	169,000005,UniDoc__UPackage_addGlobal,2
	170,000005,UniDoc__UPackage_getGlobalNames,1
	171,000005,UniDoc__UPackage_setRecords,2
	172,000005,UniDoc__UPackage_getRecords,1
	173,000005,UniDoc__UPackage_addRecord,2
	174,000005,UniDoc__UPackage_getRecordNames,1
	175,000005,UniDoc__UPackage_initially,1
	176,000011,UniDoc__UPackage__state,12
	177,000011,UniDoc__UPackage__methods,59
	178,000001,UniDoc__UPackage__oprec,0
	179,000005,UniDoc__UPackage,10
	180,000005,UniDoc__UPackageinitialize,0
	181,000005,UniDoc__UFile_setImports,2
	182,000005,UniDoc__UFile_getImports,1
	183,000005,UniDoc__UFile_addImport,2
	184,000005,UniDoc__UFile_getImportNames,1
	185,000005,UniDoc__UFile_setLinks,2
	186,000005,UniDoc__UFile_getLinks,1
	187,000005,UniDoc__UFile_addLink,2
	188,000005,UniDoc__UFile_getLinkNames,1
	189,000005,UniDoc__UFile_setPackage,2
	190,000005,UniDoc__UFile_getPackage,1
	191,000005,UniDoc__UFile_getPackageName,1
	192,000005,UniDoc__UFile_setProcedures,2
	193,000005,UniDoc__UFile_getProcedures,1
	194,000005,UniDoc__UFile_addProcedure,2
	195,000005,UniDoc__UFile_getProcedureNames,1
	196,000005,UniDoc__UFile_setClasses,2
	197,000005,UniDoc__UFile_getClasses,1
	198,000005,UniDoc__UFile_getClass,2
	199,000005,UniDoc__UFile_addClass,2
	200,000005,UniDoc__UFile_getClassNames,1
	201,000005,UniDoc__UFile_setGlobals,2
	202,000005,UniDoc__UFile_getGlobals,1
	203,000005,UniDoc__UFile_addGlobal,2
	204,000005,UniDoc__UFile_getGlobalNames,1
	205,000005,UniDoc__UFile_setRecords,2
	206,000005,UniDoc__UFile_getRecords,1
	207,000005,UniDoc__UFile_addRecord,2
	208,000005,UniDoc__UFile_getRecordNames,1
	209,000005,UniDoc__UFile_initially,1
	210,000011,UniDoc__UFile__state,13
	211,000011,UniDoc__UFile__methods,61
	212,000001,UniDoc__UFile__oprec,0
	213,000005,UniDoc__UFile,11
	214,000005,UniDoc__UFileinitialize,0
	215,000005,UniDoc__Comments_size,1
	216,000005,UniDoc__Comments_add,2
	217,000005,UniDoc__Comments_get,1
	218,000005,UniDoc__Comments_newBlock,1
	219,000005,UniDoc__Comments_append,2
	220,000005,UniDoc__Comments_getFirstSentence,1
	221,000005,UniDoc__Comments_initially,1
	222,000011,UniDoc__Comments__state,4
	223,000011,UniDoc__Comments__methods,26
	224,000001,UniDoc__Comments__oprec,0
	225,000005,UniDoc__Comments,2
	226,000005,UniDoc__Commentsinitialize,0
	227,000005,UniDoc__CommentBlock_size,1
	228,000005,UniDoc__CommentBlock_isLegacy,1
	229,000005,UniDoc__CommentBlock_put,2
	230,000005,UniDoc__CommentBlock_firstNonBlank,1
	231,000005,UniDoc__CommentBlock_get,1
	232,000005,UniDoc__CommentBlock_getFirstSentence,1
	233,000005,UniDoc__CommentBlock_initially,1
	234,000011,UniDoc__CommentBlock__state,5
	235,000011,UniDoc__CommentBlock__methods,26
	236,000001,UniDoc__CommentBlock__oprec,0
	237,000005,UniDoc__CommentBlock,3
	238,000005,UniDoc__CommentBlockinitialize,0
	239,000005,UniDoc__getFormType,1

proc UniDoc__Sequence_size
	local	0,001000,self
	declend
	filen	UniForm.icn
	line	31
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	32
	colm	21
	synt	any
	field	contents
	line	32
	colm	16
	synt	any
	size
	line	32
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	33
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_set
	local	0,001000,self
	local	1,001000,newContents
	declend
	line	37
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	38
	colm	13
	synt	any
	field	contents
	var	1
	line	38
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	39
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_add
	local	0,001000,self
	local	1,001000,item
	local	2,000000,put
	declend
	line	43
	colm	11
	synt	any
	mark	L1
	var	2
	pnull
	var	0
	line	44
	colm	17
	synt	any
	field	contents
	var	1
	line	44
	colm	12
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	45
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_get
	local	0,001000,self
	declend
	line	49
	colm	11
	synt	any
	mark	L1
	line	50
	colm	9
	synt	suspend
	mark0
	pnull
	pnull
	pnull
	var	0
	line	50
	colm	23
	synt	any
	field	contents
	line	50
	colm	18
	synt	any
	bang
	line	50
	colm	17
	synt	any
	nonnull
	line	50
	colm	9
	synt	any
	psusp
	pop
lab L2
	efail
lab L3
	line	50
	colm	9
	synt	endsuspend
	unmark
lab L1
	pnull
	line	51
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_contains
	local	0,001000,self
	local	1,001000,item
	declend
	line	56
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	pnull
	pnull
	var	0
	line	57
	colm	30
	synt	any
	field	contents
	line	57
	colm	25
	synt	any
	bang
	line	57
	colm	21
	synt	any
	eqv
	line	57
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	58
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_setComments
	local	0,001000,self
	local	1,001000,newComments
	local	2,000000,UniDoc__Comments
	declend
	line	63
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	64
	colm	13
	synt	any
	field	comments
	mark	L2
	pnull
	var	1
	line	64
	colm	24
	synt	any
	nonnull
	line	64
	colm	36
	synt	any
	esusp
	goto	L3
lab L2
	var	2
	line	64
	colm	53
	synt	any
	invoke	0
lab L3
	line	64
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	65
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_getComments
	local	0,001000,self
	declend
	line	69
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	70
	colm	20
	synt	any
	field	comments
	line	70
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	71
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_addComment
	local	0,001000,self
	local	1,001000,newComment
	declend
	line	75
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	76
	colm	13
	synt	any
	field	comments
	line	76
	colm	22
	synt	any
	field	addComment
	var	1
	line	76
	colm	33
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	77
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_startNewComments
	local	0,001000,self
	local	1,001000,newComment
	declend
	line	81
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	82
	colm	13
	synt	any
	field	comments
	line	82
	colm	22
	synt	any
	field	newBlock
	line	82
	colm	31
	synt	any
	invoke	0
	unmark
lab L1
	mark	L2
	pnull
	var	0
	line	83
	colm	13
	synt	any
	field	addComment
	var	1
	line	83
	colm	24
	synt	any
	invoke	1
	unmark
lab L2
	pnull
	line	84
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_itemsHaveComments
	local	0,001000,self
	local	1,000020,item
	local	2,000020,c
	con	0,002000,1,0
	declend
	line	93
	colm	11
	synt	any
	mark	L1
	line	96
	colm	9
	synt	every
	mark0
	pnull
	var	1
	pnull
	pnull
	var	0
	line	96
	colm	28
	synt	any
	field	contents
	line	96
	colm	23
	synt	any
	bang
	line	96
	colm	20
	synt	any
	asgn
	pop
	mark0
	line	97
	colm	13
	synt	if
	mark0
	pnull
	var	2
	pnull
	pnull
	var	1
	line	97
	colm	22
	synt	any
	nonnull
	line	97
	colm	28
	synt	any
	field	getComments
	line	97
	colm	40
	synt	any
	invoke	0
	line	97
	colm	18
	synt	any
	asgn
	unmark
	line	98
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	2
	line	98
	colm	21
	synt	any
	field	size
	line	98
	colm	26
	synt	any
	invoke	0
	int	0
	line	98
	colm	29
	synt	any
	numgt
	unmark
	mark	L4
	pnull
	line	98
	colm	38
	synt	any
	pret
lab L4
	synt	any
	pfail
	line	98
	colm	17
	synt	endif
	line	97
	colm	13
	synt	endif
	unmark
lab L2
	efail
lab L3
	line	96
	colm	9
	synt	endevery
	unmark
lab L1
	pnull
	line	101
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	declend
	line	103
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	104
	colm	14
	synt	any
	field	contents
	line	104
	colm	9
	synt	any
	null
	pnull
	line	104
	colm	25
	synt	any
	llist	0
	line	104
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	105
	colm	14
	synt	any
	field	comments
	line	105
	colm	9
	synt	any
	null
	var	1
	line	105
	colm	41
	synt	any
	invoke	0
	line	105
	colm	23
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	mark	L4
	pnull
	line	106
	colm	7
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	107
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequence
	local	0,001000,contents
	local	1,001000,comments
	local	2,000020,self
	local	3,000020,clone
	local	4,000000,UniDoc__Sequence__oprec
	local	5,000000,UniDoc__Sequenceinitialize
	local	6,000000,lang__Object__oprec
	local	7,000000,lang__Objectinitialize
	local	8,000000,UniDoc__Sequence__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	4
	line	8
	colm	6
	synt	any
	null
	unmark
	var	5
	line	8
	colm	62
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	6
	line	9
	colm	6
	synt	any
	null
	unmark
	var	7
	line	9
	colm	54
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	4
	line	10
	colm	26
	synt	any
	field	lang__Object
	var	6
	line	10
	colm	40
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	2
	var	8
	line	12
	colm	35
	synt	any
	keywd	null
	var	4
	var	0
	var	1
	line	12
	colm	34
	synt	any
	invoke	4
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	2
	line	13
	colm	7
	synt	any
	field	__s
	var	2
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	2
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	2
	line	14
	colm	21
	synt	any
	invoke	1
	line	14
	colm	28
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	30
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	2
	line	15
	colm	3
	synt	any
	pret
lab L12
	synt	any
	pfail
	unmark
lab L11
	pnull
	line	16
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Sequenceinitialize
	local	0,000000,UniDoc__Sequence__oprec
	local	1,000000,UniDoc__Sequence__methods
	local	2,000000,UniDoc__Sequence_size
	local	3,000000,UniDoc__Sequence_set
	local	4,000000,UniDoc__Sequence_add
	local	5,000000,UniDoc__Sequence_get
	local	6,000000,UniDoc__Sequence_contains
	local	7,000000,UniDoc__Sequence_setComments
	local	8,000000,UniDoc__Sequence_getComments
	local	9,000000,UniDoc__Sequence_addComment
	local	10,000000,UniDoc__Sequence_startNewComments
	local	11,000000,UniDoc__Sequence_itemsHaveComments
	local	12,000000,UniDoc__Sequence_initially
	local	13,000000,lang__Object_clone
	local	14,000000,lang__Object_to_string
	local	15,000000,lang__Object_equals
	local	16,000000,lang__Object_hash_code
	local	17,000000,lang__Object_get_class_name
	local	18,000000,lang__Object_get_id
	local	19,000000,lang__Object_get_class
	local	20,000000,lang__Object_is_instance
	local	21,000000,lang__Object_Type
	local	22,000000,lang__Object_instanceOf
	local	23,000000,lang__Object_className
	local	24,000000,lang__Object_invoke
	local	25,000000,lang__Object_getField
	local	26,000000,lang__Object_setField
	local	27,000000,lang__Object_hasField
	local	28,000000,lang__Object_fieldNames
	local	29,000000,lang__Object_genMethods
	local	30,000000,lang__Object_hasMethod
	declend
	line	18
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	line	19
	colm	63
	synt	any
	invoke	29
	line	19
	colm	35
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_size
	local	0,001000,self
	declend
	filen	UniForm.icn
	line	116
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	117
	colm	21
	synt	any
	field	contents
	line	117
	colm	16
	synt	any
	size
	line	117
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	118
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_set
	local	0,001000,self
	local	1,001000,newContents
	declend
	line	122
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	123
	colm	13
	synt	any
	field	contents
	var	1
	line	123
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	124
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_add
	local	0,001000,self
	local	1,001000,iName
	local	2,001000,item
	declend
	line	128
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	129
	colm	13
	synt	any
	field	contents
	var	1
	line	129
	colm	22
	synt	any
	subsc
	var	2
	line	129
	colm	29
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	130
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_del
	local	0,001000,self
	local	1,001000,iName
	declend
	line	134
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	135
	colm	13
	synt	any
	field	contents
	var	1
	line	135
	colm	22
	synt	any
	subsc
	line	135
	colm	31
	synt	any
	keywd	null
	line	135
	colm	29
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	136
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_get
	local	0,001000,self
	local	1,000000,sort
	con	0,002000,1,2
	declend
	line	140
	colm	11
	synt	any
	mark	L1
	line	141
	colm	9
	synt	suspend
	mark0
	pnull
	pnull
	pnull
	var	1
	pnull
	var	0
	line	141
	colm	29
	synt	any
	field	contents
	line	141
	colm	24
	synt	any
	invoke	1
	line	141
	colm	19
	synt	any
	bang
	int	0
	line	141
	colm	40
	synt	any
	subsc
	line	141
	colm	17
	synt	any
	nonnull
	line	141
	colm	9
	synt	any
	psusp
	pop
lab L2
	efail
lab L3
	line	141
	colm	9
	synt	endsuspend
	unmark
lab L1
	pnull
	line	142
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_getByName
	local	0,001000,self
	local	1,001000,iName
	declend
	line	146
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	147
	colm	20
	synt	any
	field	contents
	var	1
	line	147
	colm	29
	synt	any
	subsc
	line	147
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	148
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_getNames
	local	0,001000,self
	local	1,000000,sort
	con	0,002000,1,1
	declend
	line	152
	colm	11
	synt	any
	mark	L1
	line	153
	colm	9
	synt	suspend
	mark0
	pnull
	pnull
	pnull
	var	1
	pnull
	var	0
	line	153
	colm	29
	synt	any
	field	contents
	line	153
	colm	24
	synt	any
	invoke	1
	line	153
	colm	19
	synt	any
	bang
	int	0
	line	153
	colm	40
	synt	any
	subsc
	line	153
	colm	17
	synt	any
	nonnull
	line	153
	colm	9
	synt	any
	psusp
	pop
lab L2
	efail
lab L3
	line	153
	colm	9
	synt	endsuspend
	unmark
lab L1
	pnull
	line	154
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_contains
	local	0,001000,self
	local	1,001000,item
	declend
	line	159
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	pnull
	pnull
	var	0
	line	160
	colm	30
	synt	any
	field	contents
	line	160
	colm	25
	synt	any
	bang
	line	160
	colm	21
	synt	any
	eqv
	line	160
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	161
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_containsName
	local	0,001000,self
	local	1,001000,iName
	local	2,000000,key
	declend
	line	165
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	var	2
	pnull
	var	0
	line	166
	colm	33
	synt	any
	field	contents
	line	166
	colm	28
	synt	any
	invoke	1
	line	166
	colm	22
	synt	any
	lexeq
	line	166
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	167
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_setComments
	local	0,001000,self
	local	1,001000,newComments
	local	2,000000,UniDoc__Comments
	declend
	line	172
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	173
	colm	13
	synt	any
	field	comments
	mark	L2
	pnull
	var	1
	line	173
	colm	24
	synt	any
	nonnull
	line	173
	colm	36
	synt	any
	esusp
	goto	L3
lab L2
	var	2
	line	173
	colm	53
	synt	any
	invoke	0
lab L3
	line	173
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	174
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_getComments
	local	0,001000,self
	declend
	line	178
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	179
	colm	20
	synt	any
	field	comments
	line	179
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	180
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_addComment
	local	0,001000,self
	local	1,001000,newComment
	declend
	line	184
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	185
	colm	13
	synt	any
	field	comments
	line	185
	colm	22
	synt	any
	field	addComment
	var	1
	line	185
	colm	33
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	186
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_startNewComments
	local	0,001000,self
	local	1,001000,newComment
	declend
	line	190
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	191
	colm	13
	synt	any
	field	comments
	line	191
	colm	22
	synt	any
	field	newBlock
	line	191
	colm	31
	synt	any
	invoke	0
	unmark
lab L1
	mark	L2
	pnull
	var	0
	line	192
	colm	13
	synt	any
	field	addComment
	var	1
	line	192
	colm	24
	synt	any
	invoke	1
	unmark
lab L2
	pnull
	line	193
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set_initially
	local	0,001000,self
	local	1,000000,table
	local	2,000000,UniDoc__Comments
	declend
	line	195
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	196
	colm	14
	synt	any
	field	contents
	line	196
	colm	9
	synt	any
	null
	var	1
	line	196
	colm	30
	synt	any
	invoke	0
	line	196
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	197
	colm	14
	synt	any
	field	comments
	line	197
	colm	9
	synt	any
	null
	var	2
	line	197
	colm	41
	synt	any
	invoke	0
	line	197
	colm	23
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	mark	L4
	pnull
	line	198
	colm	7
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	199
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Set
	local	0,001000,contents
	local	1,001000,comments
	local	2,000020,self
	local	3,000020,clone
	local	4,000000,UniDoc__Set__oprec
	local	5,000000,UniDoc__Setinitialize
	local	6,000000,lang__Object__oprec
	local	7,000000,lang__Objectinitialize
	local	8,000000,UniDoc__Set__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	4
	line	8
	colm	6
	synt	any
	null
	unmark
	var	5
	line	8
	colm	52
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	6
	line	9
	colm	6
	synt	any
	null
	unmark
	var	7
	line	9
	colm	54
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	4
	line	10
	colm	21
	synt	any
	field	lang__Object
	var	6
	line	10
	colm	35
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	2
	var	8
	line	12
	colm	30
	synt	any
	keywd	null
	var	4
	var	0
	var	1
	line	12
	colm	29
	synt	any
	invoke	4
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	2
	line	13
	colm	7
	synt	any
	field	__s
	var	2
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	2
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	2
	line	14
	colm	21
	synt	any
	invoke	1
	line	14
	colm	28
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	30
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	2
	line	15
	colm	3
	synt	any
	pret
lab L12
	synt	any
	pfail
	unmark
lab L11
	pnull
	line	16
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Setinitialize
	local	0,000000,UniDoc__Set__oprec
	local	1,000000,UniDoc__Set__methods
	local	2,000000,UniDoc__Set_size
	local	3,000000,UniDoc__Set_set
	local	4,000000,UniDoc__Set_add
	local	5,000000,UniDoc__Set_del
	local	6,000000,UniDoc__Set_get
	local	7,000000,UniDoc__Set_getByName
	local	8,000000,UniDoc__Set_getNames
	local	9,000000,UniDoc__Set_contains
	local	10,000000,UniDoc__Set_containsName
	local	11,000000,UniDoc__Set_setComments
	local	12,000000,UniDoc__Set_getComments
	local	13,000000,UniDoc__Set_addComment
	local	14,000000,UniDoc__Set_startNewComments
	local	15,000000,UniDoc__Set_initially
	local	16,000000,lang__Object_clone
	local	17,000000,lang__Object_to_string
	local	18,000000,lang__Object_equals
	local	19,000000,lang__Object_hash_code
	local	20,000000,lang__Object_get_class_name
	local	21,000000,lang__Object_get_id
	local	22,000000,lang__Object_get_class
	local	23,000000,lang__Object_is_instance
	local	24,000000,lang__Object_Type
	local	25,000000,lang__Object_instanceOf
	local	26,000000,lang__Object_className
	local	27,000000,lang__Object_invoke
	local	28,000000,lang__Object_getField
	local	29,000000,lang__Object_setField
	local	30,000000,lang__Object_hasField
	local	31,000000,lang__Object_fieldNames
	local	32,000000,lang__Object_genMethods
	local	33,000000,lang__Object_hasMethod
	declend
	line	18
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	line	19
	colm	53
	synt	any
	invoke	32
	line	19
	colm	30
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_setName
	local	0,001000,self
	local	1,001000,newName
	declend
	filen	UniForm.icn
	line	208
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	209
	colm	13
	synt	any
	field	name
	var	1
	line	209
	colm	18
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	210
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_getName
	local	0,001000,self
	declend
	line	214
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	215
	colm	21
	synt	any
	field	name
	line	215
	colm	16
	synt	any
	nonnull
	line	215
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	216
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_setParent
	local	0,001000,self
	local	1,001000,newParent
	declend
	line	221
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	222
	colm	13
	synt	any
	field	parent
	var	1
	line	222
	colm	20
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	223
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_getParent
	local	0,001000,self
	con	0,010000,0
	declend
	line	227
	colm	11
	synt	any
	mark	L1
	mark	L2
	mark	L3
	pnull
	pnull
	var	0
	line	228
	colm	21
	synt	any
	field	parent
	line	228
	colm	16
	synt	any
	nonnull
	line	228
	colm	28
	synt	any
	esusp
	goto	L4
lab L3
	str	0
lab L4
	line	228
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	229
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_setSrcFile
	local	0,001000,self
	local	1,001000,fName
	declend
	line	234
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	235
	colm	13
	synt	any
	field	srcFile
	var	1
	line	235
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	236
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_getSrcFile
	local	0,001000,self
	declend
	line	240
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	241
	colm	21
	synt	any
	field	srcFile
	line	241
	colm	16
	synt	any
	nonnull
	line	241
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	242
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_getFormType
	local	0,001000,self
	local	1,000000,UniDoc__getFormType
	declend
	line	247
	colm	11
	synt	any
	mark	L1
	mark	L2
	var	1
	var	0
	line	248
	colm	35
	synt	any
	invoke	1
	line	248
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	249
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_setComments
	local	0,001000,self
	local	1,001000,newComments
	local	2,000000,UniDoc__Comments
	declend
	line	254
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	255
	colm	13
	synt	any
	field	comments
	mark	L2
	pnull
	var	1
	line	255
	colm	24
	synt	any
	nonnull
	line	255
	colm	36
	synt	any
	esusp
	goto	L3
lab L2
	var	2
	line	255
	colm	53
	synt	any
	invoke	0
lab L3
	line	255
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	256
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_getComments
	local	0,001000,self
	declend
	line	260
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	261
	colm	20
	synt	any
	field	comments
	line	261
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	262
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_addComment
	local	0,001000,self
	local	1,001000,newComment
	declend
	line	266
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	267
	colm	13
	synt	any
	field	comments
	line	267
	colm	22
	synt	any
	field	add
	var	1
	line	267
	colm	26
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	268
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_startNewComments
	local	0,001000,self
	local	1,001000,newComment
	declend
	line	272
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	273
	colm	13
	synt	any
	field	comments
	line	273
	colm	22
	synt	any
	field	newBlock
	line	273
	colm	31
	synt	any
	invoke	0
	unmark
lab L1
	mark	L2
	pnull
	pnull
	var	0
	line	274
	colm	13
	synt	any
	field	comments
	line	274
	colm	22
	synt	any
	field	add
	var	1
	line	274
	colm	26
	synt	any
	invoke	1
	unmark
lab L2
	pnull
	line	275
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_mergeComments
	local	0,001000,self
	local	1,001000,newComments
	declend
	line	279
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	280
	colm	13
	synt	any
	field	comments
	line	280
	colm	22
	synt	any
	field	append
	var	1
	line	280
	colm	29
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	281
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	declend
	line	283
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	284
	colm	14
	synt	any
	field	comments
	line	284
	colm	9
	synt	any
	null
	var	1
	line	284
	colm	41
	synt	any
	invoke	0
	line	284
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	285
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	286
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntity
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,srcFile
	local	4,000020,self
	local	5,000020,clone
	local	6,000000,UniDoc__UEntity__oprec
	local	7,000000,UniDoc__UEntityinitialize
	local	8,000000,lang__Object__oprec
	local	9,000000,lang__Objectinitialize
	local	10,000000,UniDoc__UEntity__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	6
	line	8
	colm	6
	synt	any
	null
	unmark
	var	7
	line	8
	colm	60
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	8
	line	9
	colm	6
	synt	any
	null
	unmark
	var	9
	line	9
	colm	54
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	6
	line	10
	colm	25
	synt	any
	field	lang__Object
	var	8
	line	10
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	4
	var	10
	line	12
	colm	34
	synt	any
	keywd	null
	var	6
	var	0
	var	1
	var	2
	var	3
	line	12
	colm	33
	synt	any
	invoke	6
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	4
	line	13
	colm	7
	synt	any
	field	__s
	var	4
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	4
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	4
	line	14
	colm	21
	synt	any
	invoke	1
	line	14
	colm	28
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	30
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	4
	line	15
	colm	3
	synt	any
	pret
lab L12
	synt	any
	pfail
	unmark
lab L11
	pnull
	line	16
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UEntityinitialize
	local	0,000000,UniDoc__UEntity__oprec
	local	1,000000,UniDoc__UEntity__methods
	local	2,000000,UniDoc__UEntity_setName
	local	3,000000,UniDoc__UEntity_getName
	local	4,000000,UniDoc__UEntity_setParent
	local	5,000000,UniDoc__UEntity_getParent
	local	6,000000,UniDoc__UEntity_setSrcFile
	local	7,000000,UniDoc__UEntity_getSrcFile
	local	8,000000,UniDoc__UEntity_getFormType
	local	9,000000,UniDoc__UEntity_setComments
	local	10,000000,UniDoc__UEntity_getComments
	local	11,000000,UniDoc__UEntity_addComment
	local	12,000000,UniDoc__UEntity_startNewComments
	local	13,000000,UniDoc__UEntity_mergeComments
	local	14,000000,UniDoc__UEntity_initially
	local	15,000000,lang__Object_clone
	local	16,000000,lang__Object_to_string
	local	17,000000,lang__Object_equals
	local	18,000000,lang__Object_hash_code
	local	19,000000,lang__Object_get_class_name
	local	20,000000,lang__Object_get_id
	local	21,000000,lang__Object_get_class
	local	22,000000,lang__Object_is_instance
	local	23,000000,lang__Object_Type
	local	24,000000,lang__Object_instanceOf
	local	25,000000,lang__Object_className
	local	26,000000,lang__Object_invoke
	local	27,000000,lang__Object_getField
	local	28,000000,lang__Object_setField
	local	29,000000,lang__Object_hasField
	local	30,000000,lang__Object_fieldNames
	local	31,000000,lang__Object_genMethods
	local	32,000000,lang__Object_hasMethod
	declend
	line	18
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	line	19
	colm	61
	synt	any
	invoke	31
	line	19
	colm	34
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName_setCategory
	local	0,001000,self
	local	1,001000,newCategory
	declend
	filen	UniForm.icn
	line	296
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	297
	colm	13
	synt	any
	field	category
	var	1
	line	297
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	298
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName_getCategory
	local	0,001000,self
	declend
	line	302
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	303
	colm	20
	synt	any
	field	category
	line	303
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	304
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName_setDefValue
	local	0,001000,self
	local	1,001000,newDefValue
	declend
	line	309
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	310
	colm	13
	synt	any
	field	defValue
	var	1
	line	310
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	311
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName_getDefValue
	local	0,001000,self
	declend
	line	315
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	316
	colm	21
	synt	any
	field	defValue
	line	316
	colm	16
	synt	any
	nonnull
	line	316
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	317
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName_setTypeValue
	local	0,001000,self
	local	1,001000,newTypeValue
	declend
	line	322
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	323
	colm	13
	synt	any
	field	typeValue
	var	1
	line	323
	colm	23
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	324
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName_getTypeValue
	local	0,001000,self
	declend
	line	328
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	329
	colm	21
	synt	any
	field	typeValue
	line	329
	colm	16
	synt	any
	nonnull
	line	329
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	330
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	declend
	line	332
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	333
	colm	14
	synt	any
	field	comments
	line	333
	colm	9
	synt	any
	null
	var	1
	line	333
	colm	41
	synt	any
	invoke	0
	line	333
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	334
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	335
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UName
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,category
	local	4,001000,defValue
	local	5,001000,typeValue
	local	6,001000,srcFile
	local	7,000020,self
	local	8,000020,clone
	local	9,000000,UniDoc__UName__oprec
	local	10,000000,UniDoc__UNameinitialize
	local	11,000000,UniDoc__UEntity__oprec
	local	12,000000,UniDoc__UEntityinitialize
	local	13,000000,lang__Object__oprec
	local	14,000000,lang__Objectinitialize
	local	15,000000,UniDoc__UName__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	9
	line	8
	colm	6
	synt	any
	null
	unmark
	var	10
	line	8
	colm	56
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	11
	line	9
	colm	6
	synt	any
	null
	unmark
	var	12
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	9
	line	10
	colm	23
	synt	any
	field	UniDoc__UEntity
	var	11
	line	10
	colm	40
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	13
	line	11
	colm	6
	synt	any
	null
	unmark
	var	14
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	9
	line	12
	colm	23
	synt	any
	field	lang__Object
	var	13
	line	12
	colm	37
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	7
	var	15
	line	14
	colm	32
	synt	any
	keywd	null
	var	9
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	line	14
	colm	31
	synt	any
	invoke	9
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	7
	line	15
	colm	7
	synt	any
	field	__s
	var	7
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	7
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	7
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	7
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UNameinitialize
	local	0,000000,UniDoc__UName__oprec
	local	1,000000,UniDoc__UName__methods
	local	2,000000,UniDoc__UName_setCategory
	local	3,000000,UniDoc__UName_getCategory
	local	4,000000,UniDoc__UName_setDefValue
	local	5,000000,UniDoc__UName_getDefValue
	local	6,000000,UniDoc__UName_setTypeValue
	local	7,000000,UniDoc__UName_getTypeValue
	local	8,000000,UniDoc__UName_initially
	local	9,000000,UniDoc__UEntity_setName
	local	10,000000,UniDoc__UEntity_getName
	local	11,000000,UniDoc__UEntity_setParent
	local	12,000000,UniDoc__UEntity_getParent
	local	13,000000,UniDoc__UEntity_setSrcFile
	local	14,000000,UniDoc__UEntity_getSrcFile
	local	15,000000,UniDoc__UEntity_getFormType
	local	16,000000,UniDoc__UEntity_setComments
	local	17,000000,UniDoc__UEntity_getComments
	local	18,000000,UniDoc__UEntity_addComment
	local	19,000000,UniDoc__UEntity_startNewComments
	local	20,000000,UniDoc__UEntity_mergeComments
	local	21,000000,lang__Object_clone
	local	22,000000,lang__Object_to_string
	local	23,000000,lang__Object_equals
	local	24,000000,lang__Object_hash_code
	local	25,000000,lang__Object_get_class_name
	local	26,000000,lang__Object_get_id
	local	27,000000,lang__Object_get_class
	local	28,000000,lang__Object_is_instance
	local	29,000000,lang__Object_Type
	local	30,000000,lang__Object_instanceOf
	local	31,000000,lang__Object_className
	local	32,000000,lang__Object_invoke
	local	33,000000,lang__Object_getField
	local	34,000000,lang__Object_setField
	local	35,000000,lang__Object_hasField
	local	36,000000,lang__Object_fieldNames
	local	37,000000,lang__Object_genMethods
	local	38,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	var	36
	var	37
	var	38
	line	21
	colm	57
	synt	any
	invoke	37
	line	21
	colm	32
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UGlobal_setDefValue
	local	0,001000,self
	local	1,001000,newDefValue
	declend
	filen	UniForm.icn
	line	344
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	345
	colm	13
	synt	any
	field	defValue
	var	1
	line	345
	colm	22
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	346
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UGlobal_getDefValue
	local	0,001000,self
	declend
	line	350
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	351
	colm	21
	synt	any
	field	defValue
	line	351
	colm	16
	synt	any
	nonnull
	line	351
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	352
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UGlobal_setTypeValue
	local	0,001000,self
	local	1,001000,newTypeValue
	declend
	line	357
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	358
	colm	13
	synt	any
	field	typeValue
	var	1
	line	358
	colm	23
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	359
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UGlobal_getTypeValue
	local	0,001000,self
	declend
	line	363
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	364
	colm	21
	synt	any
	field	typeValue
	line	364
	colm	16
	synt	any
	nonnull
	line	364
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	365
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UGlobal_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	declend
	line	367
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	368
	colm	14
	synt	any
	field	comments
	line	368
	colm	9
	synt	any
	null
	var	1
	line	368
	colm	41
	synt	any
	invoke	0
	line	368
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	369
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	370
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UGlobal
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,defValue
	local	4,001000,typeValue
	local	5,001000,srcFile
	local	6,000020,self
	local	7,000020,clone
	local	8,000000,UniDoc__UGlobal__oprec
	local	9,000000,UniDoc__UGlobalinitialize
	local	10,000000,UniDoc__UEntity__oprec
	local	11,000000,UniDoc__UEntityinitialize
	local	12,000000,lang__Object__oprec
	local	13,000000,lang__Objectinitialize
	local	14,000000,UniDoc__UGlobal__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	8
	line	8
	colm	6
	synt	any
	null
	unmark
	var	9
	line	8
	colm	60
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	10
	line	9
	colm	6
	synt	any
	null
	unmark
	var	11
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	8
	line	10
	colm	25
	synt	any
	field	UniDoc__UEntity
	var	10
	line	10
	colm	42
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	12
	line	11
	colm	6
	synt	any
	null
	unmark
	var	13
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	8
	line	12
	colm	25
	synt	any
	field	lang__Object
	var	12
	line	12
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	6
	var	14
	line	14
	colm	34
	synt	any
	keywd	null
	var	8
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	line	14
	colm	33
	synt	any
	invoke	8
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	6
	line	15
	colm	7
	synt	any
	field	__s
	var	6
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	6
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	6
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	6
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UGlobalinitialize
	local	0,000000,UniDoc__UGlobal__oprec
	local	1,000000,UniDoc__UGlobal__methods
	local	2,000000,UniDoc__UGlobal_setDefValue
	local	3,000000,UniDoc__UGlobal_getDefValue
	local	4,000000,UniDoc__UGlobal_setTypeValue
	local	5,000000,UniDoc__UGlobal_getTypeValue
	local	6,000000,UniDoc__UGlobal_initially
	local	7,000000,UniDoc__UEntity_setName
	local	8,000000,UniDoc__UEntity_getName
	local	9,000000,UniDoc__UEntity_setParent
	local	10,000000,UniDoc__UEntity_getParent
	local	11,000000,UniDoc__UEntity_setSrcFile
	local	12,000000,UniDoc__UEntity_getSrcFile
	local	13,000000,UniDoc__UEntity_getFormType
	local	14,000000,UniDoc__UEntity_setComments
	local	15,000000,UniDoc__UEntity_getComments
	local	16,000000,UniDoc__UEntity_addComment
	local	17,000000,UniDoc__UEntity_startNewComments
	local	18,000000,UniDoc__UEntity_mergeComments
	local	19,000000,lang__Object_clone
	local	20,000000,lang__Object_to_string
	local	21,000000,lang__Object_equals
	local	22,000000,lang__Object_hash_code
	local	23,000000,lang__Object_get_class_name
	local	24,000000,lang__Object_get_id
	local	25,000000,lang__Object_get_class
	local	26,000000,lang__Object_is_instance
	local	27,000000,lang__Object_Type
	local	28,000000,lang__Object_instanceOf
	local	29,000000,lang__Object_className
	local	30,000000,lang__Object_invoke
	local	31,000000,lang__Object_getField
	local	32,000000,lang__Object_setField
	local	33,000000,lang__Object_hasField
	local	34,000000,lang__Object_fieldNames
	local	35,000000,lang__Object_genMethods
	local	36,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	var	36
	line	21
	colm	61
	synt	any
	invoke	35
	line	21
	colm	34
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UMethod_setParams
	local	0,001000,self
	local	1,001000,newParams
	declend
	filen	UniForm.icn
	line	379
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	380
	colm	13
	synt	any
	field	params
	var	1
	line	380
	colm	20
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	381
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UMethod_getParams
	local	0,001000,self
	declend
	line	385
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	386
	colm	20
	synt	any
	field	params
	line	386
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	387
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UMethod_addParam
	local	0,001000,self
	local	1,001000,newParam
	declend
	line	391
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	392
	colm	13
	synt	any
	field	params
	line	392
	colm	20
	synt	any
	field	add
	var	1
	line	392
	colm	24
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	393
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UMethod_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	local	2,000000,UniDoc__Sequence
	declend
	line	395
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	396
	colm	14
	synt	any
	field	comments
	line	396
	colm	9
	synt	any
	null
	var	1
	line	396
	colm	41
	synt	any
	invoke	0
	line	396
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	397
	colm	14
	synt	any
	field	params
	line	397
	colm	9
	synt	any
	null
	var	2
	line	397
	colm	39
	synt	any
	invoke	0
	line	397
	colm	21
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	mark	L4
	pnull
	line	398
	colm	7
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	399
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UMethod
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,params
	local	4,001000,srcFile
	local	5,000020,self
	local	6,000020,clone
	local	7,000000,UniDoc__UMethod__oprec
	local	8,000000,UniDoc__UMethodinitialize
	local	9,000000,UniDoc__UEntity__oprec
	local	10,000000,UniDoc__UEntityinitialize
	local	11,000000,lang__Object__oprec
	local	12,000000,lang__Objectinitialize
	local	13,000000,UniDoc__UMethod__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	7
	line	8
	colm	6
	synt	any
	null
	unmark
	var	8
	line	8
	colm	60
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	9
	line	9
	colm	6
	synt	any
	null
	unmark
	var	10
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	7
	line	10
	colm	25
	synt	any
	field	UniDoc__UEntity
	var	9
	line	10
	colm	42
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	11
	line	11
	colm	6
	synt	any
	null
	unmark
	var	12
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	7
	line	12
	colm	25
	synt	any
	field	lang__Object
	var	11
	line	12
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	5
	var	13
	line	14
	colm	34
	synt	any
	keywd	null
	var	7
	var	0
	var	1
	var	2
	var	3
	var	4
	line	14
	colm	33
	synt	any
	invoke	7
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	5
	line	15
	colm	7
	synt	any
	field	__s
	var	5
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	5
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	5
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	5
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UMethodinitialize
	local	0,000000,UniDoc__UMethod__oprec
	local	1,000000,UniDoc__UMethod__methods
	local	2,000000,UniDoc__UMethod_setParams
	local	3,000000,UniDoc__UMethod_getParams
	local	4,000000,UniDoc__UMethod_addParam
	local	5,000000,UniDoc__UMethod_initially
	local	6,000000,UniDoc__UEntity_setName
	local	7,000000,UniDoc__UEntity_getName
	local	8,000000,UniDoc__UEntity_setParent
	local	9,000000,UniDoc__UEntity_getParent
	local	10,000000,UniDoc__UEntity_setSrcFile
	local	11,000000,UniDoc__UEntity_getSrcFile
	local	12,000000,UniDoc__UEntity_getFormType
	local	13,000000,UniDoc__UEntity_setComments
	local	14,000000,UniDoc__UEntity_getComments
	local	15,000000,UniDoc__UEntity_addComment
	local	16,000000,UniDoc__UEntity_startNewComments
	local	17,000000,UniDoc__UEntity_mergeComments
	local	18,000000,lang__Object_clone
	local	19,000000,lang__Object_to_string
	local	20,000000,lang__Object_equals
	local	21,000000,lang__Object_hash_code
	local	22,000000,lang__Object_get_class_name
	local	23,000000,lang__Object_get_id
	local	24,000000,lang__Object_get_class
	local	25,000000,lang__Object_is_instance
	local	26,000000,lang__Object_Type
	local	27,000000,lang__Object_instanceOf
	local	28,000000,lang__Object_className
	local	29,000000,lang__Object_invoke
	local	30,000000,lang__Object_getField
	local	31,000000,lang__Object_setField
	local	32,000000,lang__Object_hasField
	local	33,000000,lang__Object_fieldNames
	local	34,000000,lang__Object_genMethods
	local	35,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	line	21
	colm	61
	synt	any
	invoke	34
	line	21
	colm	34
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UProc_setParams
	local	0,001000,self
	local	1,001000,newParams
	declend
	filen	UniForm.icn
	line	408
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	409
	colm	13
	synt	any
	field	params
	var	1
	line	409
	colm	20
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	410
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UProc_getParams
	local	0,001000,self
	declend
	line	414
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	415
	colm	20
	synt	any
	field	params
	line	415
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	416
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UProc_addParam
	local	0,001000,self
	local	1,001000,newParam
	declend
	line	420
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	421
	colm	13
	synt	any
	field	params
	line	421
	colm	20
	synt	any
	field	add
	var	1
	line	421
	colm	24
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	422
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UProc_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	local	2,000000,UniDoc__Sequence
	declend
	line	424
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	425
	colm	14
	synt	any
	field	comments
	line	425
	colm	9
	synt	any
	null
	var	1
	line	425
	colm	41
	synt	any
	invoke	0
	line	425
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	426
	colm	14
	synt	any
	field	params
	line	426
	colm	9
	synt	any
	null
	var	2
	line	426
	colm	39
	synt	any
	invoke	0
	line	426
	colm	21
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	mark	L4
	pnull
	line	427
	colm	7
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	428
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UProc
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,params
	local	4,001000,srcFile
	local	5,000020,self
	local	6,000020,clone
	local	7,000000,UniDoc__UProc__oprec
	local	8,000000,UniDoc__UProcinitialize
	local	9,000000,UniDoc__UEntity__oprec
	local	10,000000,UniDoc__UEntityinitialize
	local	11,000000,lang__Object__oprec
	local	12,000000,lang__Objectinitialize
	local	13,000000,UniDoc__UProc__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	7
	line	8
	colm	6
	synt	any
	null
	unmark
	var	8
	line	8
	colm	56
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	9
	line	9
	colm	6
	synt	any
	null
	unmark
	var	10
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	7
	line	10
	colm	23
	synt	any
	field	UniDoc__UEntity
	var	9
	line	10
	colm	40
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	11
	line	11
	colm	6
	synt	any
	null
	unmark
	var	12
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	7
	line	12
	colm	23
	synt	any
	field	lang__Object
	var	11
	line	12
	colm	37
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	5
	var	13
	line	14
	colm	32
	synt	any
	keywd	null
	var	7
	var	0
	var	1
	var	2
	var	3
	var	4
	line	14
	colm	31
	synt	any
	invoke	7
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	5
	line	15
	colm	7
	synt	any
	field	__s
	var	5
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	5
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	5
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	5
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UProcinitialize
	local	0,000000,UniDoc__UProc__oprec
	local	1,000000,UniDoc__UProc__methods
	local	2,000000,UniDoc__UProc_setParams
	local	3,000000,UniDoc__UProc_getParams
	local	4,000000,UniDoc__UProc_addParam
	local	5,000000,UniDoc__UProc_initially
	local	6,000000,UniDoc__UEntity_setName
	local	7,000000,UniDoc__UEntity_getName
	local	8,000000,UniDoc__UEntity_setParent
	local	9,000000,UniDoc__UEntity_getParent
	local	10,000000,UniDoc__UEntity_setSrcFile
	local	11,000000,UniDoc__UEntity_getSrcFile
	local	12,000000,UniDoc__UEntity_getFormType
	local	13,000000,UniDoc__UEntity_setComments
	local	14,000000,UniDoc__UEntity_getComments
	local	15,000000,UniDoc__UEntity_addComment
	local	16,000000,UniDoc__UEntity_startNewComments
	local	17,000000,UniDoc__UEntity_mergeComments
	local	18,000000,lang__Object_clone
	local	19,000000,lang__Object_to_string
	local	20,000000,lang__Object_equals
	local	21,000000,lang__Object_hash_code
	local	22,000000,lang__Object_get_class_name
	local	23,000000,lang__Object_get_id
	local	24,000000,lang__Object_get_class
	local	25,000000,lang__Object_is_instance
	local	26,000000,lang__Object_Type
	local	27,000000,lang__Object_instanceOf
	local	28,000000,lang__Object_className
	local	29,000000,lang__Object_invoke
	local	30,000000,lang__Object_getField
	local	31,000000,lang__Object_setField
	local	32,000000,lang__Object_hasField
	local	33,000000,lang__Object_fieldNames
	local	34,000000,lang__Object_genMethods
	local	35,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	line	21
	colm	57
	synt	any
	invoke	34
	line	21
	colm	32
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__URecord_setParams
	local	0,001000,self
	local	1,001000,newFields
	declend
	filen	UniForm.icn
	line	437
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	438
	colm	13
	synt	any
	field	fields
	var	1
	line	438
	colm	20
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	439
	colm	1
	synt	any
	pfail
	end
proc UniDoc__URecord_getParams
	local	0,001000,self
	declend
	line	443
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	444
	colm	20
	synt	any
	field	fields
	line	444
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	445
	colm	1
	synt	any
	pfail
	end
proc UniDoc__URecord_addField
	local	0,001000,self
	local	1,001000,newField
	declend
	line	449
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	450
	colm	13
	synt	any
	field	fields
	line	450
	colm	20
	synt	any
	field	add
	var	1
	line	450
	colm	24
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	451
	colm	1
	synt	any
	pfail
	end
proc UniDoc__URecord_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	local	2,000000,UniDoc__Sequence
	declend
	line	453
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	454
	colm	14
	synt	any
	field	comments
	line	454
	colm	9
	synt	any
	null
	var	1
	line	454
	colm	41
	synt	any
	invoke	0
	line	454
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	455
	colm	14
	synt	any
	field	fields
	line	455
	colm	9
	synt	any
	null
	var	2
	line	455
	colm	39
	synt	any
	invoke	0
	line	455
	colm	21
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	mark	L4
	pnull
	line	456
	colm	7
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	457
	colm	1
	synt	any
	pfail
	end
proc UniDoc__URecord
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,fields
	local	4,001000,srcFile
	local	5,000020,self
	local	6,000020,clone
	local	7,000000,UniDoc__URecord__oprec
	local	8,000000,UniDoc__URecordinitialize
	local	9,000000,UniDoc__UEntity__oprec
	local	10,000000,UniDoc__UEntityinitialize
	local	11,000000,lang__Object__oprec
	local	12,000000,lang__Objectinitialize
	local	13,000000,UniDoc__URecord__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	7
	line	8
	colm	6
	synt	any
	null
	unmark
	var	8
	line	8
	colm	60
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	9
	line	9
	colm	6
	synt	any
	null
	unmark
	var	10
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	7
	line	10
	colm	25
	synt	any
	field	UniDoc__UEntity
	var	9
	line	10
	colm	42
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	11
	line	11
	colm	6
	synt	any
	null
	unmark
	var	12
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	7
	line	12
	colm	25
	synt	any
	field	lang__Object
	var	11
	line	12
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	5
	var	13
	line	14
	colm	34
	synt	any
	keywd	null
	var	7
	var	0
	var	1
	var	2
	var	3
	var	4
	line	14
	colm	33
	synt	any
	invoke	7
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	5
	line	15
	colm	7
	synt	any
	field	__s
	var	5
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	5
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	5
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	5
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__URecordinitialize
	local	0,000000,UniDoc__URecord__oprec
	local	1,000000,UniDoc__URecord__methods
	local	2,000000,UniDoc__URecord_setParams
	local	3,000000,UniDoc__URecord_getParams
	local	4,000000,UniDoc__URecord_addField
	local	5,000000,UniDoc__URecord_initially
	local	6,000000,UniDoc__UEntity_setName
	local	7,000000,UniDoc__UEntity_getName
	local	8,000000,UniDoc__UEntity_setParent
	local	9,000000,UniDoc__UEntity_getParent
	local	10,000000,UniDoc__UEntity_setSrcFile
	local	11,000000,UniDoc__UEntity_getSrcFile
	local	12,000000,UniDoc__UEntity_getFormType
	local	13,000000,UniDoc__UEntity_setComments
	local	14,000000,UniDoc__UEntity_getComments
	local	15,000000,UniDoc__UEntity_addComment
	local	16,000000,UniDoc__UEntity_startNewComments
	local	17,000000,UniDoc__UEntity_mergeComments
	local	18,000000,lang__Object_clone
	local	19,000000,lang__Object_to_string
	local	20,000000,lang__Object_equals
	local	21,000000,lang__Object_hash_code
	local	22,000000,lang__Object_get_class_name
	local	23,000000,lang__Object_get_id
	local	24,000000,lang__Object_get_class
	local	25,000000,lang__Object_is_instance
	local	26,000000,lang__Object_Type
	local	27,000000,lang__Object_instanceOf
	local	28,000000,lang__Object_className
	local	29,000000,lang__Object_invoke
	local	30,000000,lang__Object_getField
	local	31,000000,lang__Object_setField
	local	32,000000,lang__Object_hasField
	local	33,000000,lang__Object_fieldNames
	local	34,000000,lang__Object_genMethods
	local	35,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	line	21
	colm	61
	synt	any
	invoke	34
	line	21
	colm	34
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UImport_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	declend
	filen	UniForm.icn
	line	463
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	464
	colm	14
	synt	any
	field	comments
	line	464
	colm	9
	synt	any
	null
	var	1
	line	464
	colm	41
	synt	any
	invoke	0
	line	464
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	465
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	466
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UImport
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,srcFile
	local	4,000020,self
	local	5,000020,clone
	local	6,000000,UniDoc__UImport__oprec
	local	7,000000,UniDoc__UImportinitialize
	local	8,000000,UniDoc__UEntity__oprec
	local	9,000000,UniDoc__UEntityinitialize
	local	10,000000,lang__Object__oprec
	local	11,000000,lang__Objectinitialize
	local	12,000000,UniDoc__UImport__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	6
	line	8
	colm	6
	synt	any
	null
	unmark
	var	7
	line	8
	colm	60
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	8
	line	9
	colm	6
	synt	any
	null
	unmark
	var	9
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	6
	line	10
	colm	25
	synt	any
	field	UniDoc__UEntity
	var	8
	line	10
	colm	42
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	10
	line	11
	colm	6
	synt	any
	null
	unmark
	var	11
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	6
	line	12
	colm	25
	synt	any
	field	lang__Object
	var	10
	line	12
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	4
	var	12
	line	14
	colm	34
	synt	any
	keywd	null
	var	6
	var	0
	var	1
	var	2
	var	3
	line	14
	colm	33
	synt	any
	invoke	6
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	4
	line	15
	colm	7
	synt	any
	field	__s
	var	4
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	4
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	4
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	4
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UImportinitialize
	local	0,000000,UniDoc__UImport__oprec
	local	1,000000,UniDoc__UImport__methods
	local	2,000000,UniDoc__UImport_initially
	local	3,000000,UniDoc__UEntity_setName
	local	4,000000,UniDoc__UEntity_getName
	local	5,000000,UniDoc__UEntity_setParent
	local	6,000000,UniDoc__UEntity_getParent
	local	7,000000,UniDoc__UEntity_setSrcFile
	local	8,000000,UniDoc__UEntity_getSrcFile
	local	9,000000,UniDoc__UEntity_getFormType
	local	10,000000,UniDoc__UEntity_setComments
	local	11,000000,UniDoc__UEntity_getComments
	local	12,000000,UniDoc__UEntity_addComment
	local	13,000000,UniDoc__UEntity_startNewComments
	local	14,000000,UniDoc__UEntity_mergeComments
	local	15,000000,lang__Object_clone
	local	16,000000,lang__Object_to_string
	local	17,000000,lang__Object_equals
	local	18,000000,lang__Object_hash_code
	local	19,000000,lang__Object_get_class_name
	local	20,000000,lang__Object_get_id
	local	21,000000,lang__Object_get_class
	local	22,000000,lang__Object_is_instance
	local	23,000000,lang__Object_Type
	local	24,000000,lang__Object_instanceOf
	local	25,000000,lang__Object_className
	local	26,000000,lang__Object_invoke
	local	27,000000,lang__Object_getField
	local	28,000000,lang__Object_setField
	local	29,000000,lang__Object_hasField
	local	30,000000,lang__Object_fieldNames
	local	31,000000,lang__Object_genMethods
	local	32,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	line	21
	colm	61
	synt	any
	invoke	31
	line	21
	colm	34
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__ULink_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	declend
	filen	UniForm.icn
	line	472
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	473
	colm	14
	synt	any
	field	comments
	line	473
	colm	9
	synt	any
	null
	var	1
	line	473
	colm	41
	synt	any
	invoke	0
	line	473
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	474
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	475
	colm	1
	synt	any
	pfail
	end
proc UniDoc__ULink
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,srcFile
	local	4,000020,self
	local	5,000020,clone
	local	6,000000,UniDoc__ULink__oprec
	local	7,000000,UniDoc__ULinkinitialize
	local	8,000000,UniDoc__UEntity__oprec
	local	9,000000,UniDoc__UEntityinitialize
	local	10,000000,lang__Object__oprec
	local	11,000000,lang__Objectinitialize
	local	12,000000,UniDoc__ULink__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	6
	line	8
	colm	6
	synt	any
	null
	unmark
	var	7
	line	8
	colm	56
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	8
	line	9
	colm	6
	synt	any
	null
	unmark
	var	9
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	6
	line	10
	colm	23
	synt	any
	field	UniDoc__UEntity
	var	8
	line	10
	colm	40
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	10
	line	11
	colm	6
	synt	any
	null
	unmark
	var	11
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	6
	line	12
	colm	23
	synt	any
	field	lang__Object
	var	10
	line	12
	colm	37
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	4
	var	12
	line	14
	colm	32
	synt	any
	keywd	null
	var	6
	var	0
	var	1
	var	2
	var	3
	line	14
	colm	31
	synt	any
	invoke	6
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	4
	line	15
	colm	7
	synt	any
	field	__s
	var	4
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	4
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	4
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	4
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__ULinkinitialize
	local	0,000000,UniDoc__ULink__oprec
	local	1,000000,UniDoc__ULink__methods
	local	2,000000,UniDoc__ULink_initially
	local	3,000000,UniDoc__UEntity_setName
	local	4,000000,UniDoc__UEntity_getName
	local	5,000000,UniDoc__UEntity_setParent
	local	6,000000,UniDoc__UEntity_getParent
	local	7,000000,UniDoc__UEntity_setSrcFile
	local	8,000000,UniDoc__UEntity_getSrcFile
	local	9,000000,UniDoc__UEntity_getFormType
	local	10,000000,UniDoc__UEntity_setComments
	local	11,000000,UniDoc__UEntity_getComments
	local	12,000000,UniDoc__UEntity_addComment
	local	13,000000,UniDoc__UEntity_startNewComments
	local	14,000000,UniDoc__UEntity_mergeComments
	local	15,000000,lang__Object_clone
	local	16,000000,lang__Object_to_string
	local	17,000000,lang__Object_equals
	local	18,000000,lang__Object_hash_code
	local	19,000000,lang__Object_get_class_name
	local	20,000000,lang__Object_get_id
	local	21,000000,lang__Object_get_class
	local	22,000000,lang__Object_is_instance
	local	23,000000,lang__Object_Type
	local	24,000000,lang__Object_instanceOf
	local	25,000000,lang__Object_className
	local	26,000000,lang__Object_invoke
	local	27,000000,lang__Object_getField
	local	28,000000,lang__Object_setField
	local	29,000000,lang__Object_hasField
	local	30,000000,lang__Object_fieldNames
	local	31,000000,lang__Object_genMethods
	local	32,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	line	21
	colm	57
	synt	any
	invoke	31
	line	21
	colm	32
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_setName
	local	0,001000,self
	local	1,001000,newName
	local	2,000000,util__tabSkip
	local	3,000000,tab
	con	0,010000,2,072,072
	con	1,002000,1,0
	declend
	filen	UniForm.icn
	line	485
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	sdup
	line	486
	colm	17
	synt	any
	bscan
	mark	L2
	var	2
	str	0
	line	487
	colm	27
	synt	any
	invoke	1
	unmark
lab L2
	var	3
	int	1
	line	488
	colm	17
	synt	any
	invoke	1
	line	486
	colm	17
	synt	any
	escan
	asgn
	unmark
lab L1
	mark	L3
	pnull
	pnull
	var	0
	line	490
	colm	13
	synt	any
	field	name
	var	1
	line	490
	colm	18
	synt	any
	asgn
	unmark
lab L3
	pnull
	line	491
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getFullName
	local	0,001000,self
	con	0,010000,2,072,072
	declend
	line	496
	colm	11
	synt	any
	mark	L1
	line	497
	colm	9
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	497
	colm	17
	synt	any
	field	pack
	line	497
	colm	12
	synt	any
	nonnull
	unmark
	mark	L2
	pnull
	pnull
	pnull
	pnull
	var	0
	line	498
	colm	24
	synt	any
	field	pack
	line	498
	colm	29
	synt	any
	field	getName
	line	498
	colm	37
	synt	any
	invoke	0
	str	0
	line	498
	colm	39
	synt	any
	cat
	pnull
	var	0
	line	498
	colm	51
	synt	any
	field	getName
	line	498
	colm	59
	synt	any
	invoke	0
	line	498
	colm	45
	synt	any
	cat
	line	498
	colm	13
	synt	any
	pret
lab L2
	synt	any
	pfail
	line	497
	colm	9
	synt	endif
	unmark
lab L1
	mark	L3
	mark	L4
	pnull
	str	0
	pnull
	var	0
	line	500
	colm	26
	synt	any
	field	getName
	line	500
	colm	34
	synt	any
	invoke	0
	line	500
	colm	20
	synt	any
	cat
	line	500
	colm	9
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	501
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_setSuperClasses
	local	0,001000,self
	local	1,001000,newSuperClasses
	declend
	line	506
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	507
	colm	13
	synt	any
	field	superClasses
	var	1
	line	507
	colm	26
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	508
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getSuperClasses
	local	0,001000,self
	declend
	line	512
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	513
	colm	20
	synt	any
	field	superClasses
	line	513
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	514
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_addSuperClass
	local	0,001000,self
	local	1,001000,superClass
	declend
	line	518
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	519
	colm	13
	synt	any
	field	superClasses
	line	519
	colm	26
	synt	any
	field	add
	var	1
	line	519
	colm	30
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	520
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_setParams
	local	0,001000,self
	local	1,001000,newParams
	declend
	line	527
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	528
	colm	13
	synt	any
	field	fields
	var	1
	line	528
	colm	20
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	529
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getParams
	local	0,001000,self
	declend
	line	533
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	534
	colm	20
	synt	any
	field	fields
	line	534
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	535
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_addField
	local	0,001000,self
	local	1,001000,newField
	declend
	line	539
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	540
	colm	13
	synt	any
	field	fields
	line	540
	colm	20
	synt	any
	field	add
	var	1
	line	540
	colm	24
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	541
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_setMethods
	local	0,001000,self
	local	1,001000,newMethods
	declend
	line	546
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	547
	colm	13
	synt	any
	field	methods
	var	1
	line	547
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	548
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getMethods
	local	0,001000,self
	declend
	line	552
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	553
	colm	20
	synt	any
	field	methods
	line	553
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	554
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_addMethod
	local	0,001000,self
	local	1,001000,aMethod
	declend
	line	558
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	559
	colm	13
	synt	any
	field	methods
	line	559
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	559
	colm	33
	synt	any
	field	getName
	line	559
	colm	41
	synt	any
	invoke	0
	var	1
	line	559
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	560
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_hasMethod
	local	0,001000,self
	local	1,001000,aMethodName
	declend
	line	565
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	566
	colm	20
	synt	any
	field	methods
	line	566
	colm	28
	synt	any
	field	containsName
	var	1
	line	566
	colm	41
	synt	any
	invoke	1
	line	566
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	567
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getMethod
	local	0,001000,self
	local	1,001000,aMethodName
	declend
	line	572
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	573
	colm	20
	synt	any
	field	methods
	line	573
	colm	28
	synt	any
	field	getByName
	var	1
	line	573
	colm	38
	synt	any
	invoke	1
	line	573
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	574
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_setConstructor
	local	0,001000,self
	local	1,001000,newConstructor
	declend
	line	579
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	580
	colm	13
	synt	any
	field	constructor
	var	1
	line	580
	colm	25
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	581
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getConstructor
	local	0,001000,self
	declend
	line	585
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	586
	colm	20
	synt	any
	field	constructor
	line	586
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	587
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_setPackage
	local	0,001000,self
	local	1,001000,aPack
	declend
	line	593
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	594
	colm	13
	synt	any
	field	pack
	var	1
	line	594
	colm	18
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	595
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getPackage
	local	0,001000,self
	declend
	line	599
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	600
	colm	20
	synt	any
	field	pack
	line	600
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	601
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_setFile
	local	0,001000,self
	local	1,001000,aFile
	declend
	line	606
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	607
	colm	13
	synt	any
	field	file
	var	1
	line	607
	colm	18
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	608
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_getFile
	local	0,001000,self
	declend
	line	612
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	613
	colm	20
	synt	any
	field	file
	line	613
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	614
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	local	2,000000,UniDoc__Sequence
	local	3,000000,UniDoc__Set
	declend
	line	616
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	617
	colm	14
	synt	any
	field	comments
	line	617
	colm	9
	synt	any
	null
	var	1
	line	617
	colm	41
	synt	any
	invoke	0
	line	617
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	618
	colm	14
	synt	any
	field	superClasses
	line	618
	colm	9
	synt	any
	null
	var	2
	line	618
	colm	45
	synt	any
	invoke	0
	line	618
	colm	27
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	pnull
	pnull
	var	0
	line	619
	colm	14
	synt	any
	field	methods
	line	619
	colm	9
	synt	any
	null
	var	3
	line	619
	colm	37
	synt	any
	invoke	0
	line	619
	colm	23
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	pnull
	pnull
	var	0
	line	620
	colm	14
	synt	any
	field	fields
	line	620
	colm	9
	synt	any
	null
	var	2
	line	620
	colm	42
	synt	any
	invoke	0
	line	620
	colm	23
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	line	621
	colm	9
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	621
	colm	17
	synt	any
	field	name
	line	621
	colm	12
	synt	any
	nonnull
	unmark
	pnull
	var	0
	line	622
	colm	17
	synt	any
	field	setName
	pnull
	var	0
	line	622
	colm	30
	synt	any
	field	name
	line	622
	colm	25
	synt	any
	invoke	1
	line	621
	colm	9
	synt	endif
	unmark
lab L5
	mark	L6
	mark	L7
	pnull
	line	624
	colm	7
	synt	any
	pret
lab L7
	synt	any
	pfail
	unmark
lab L6
	pnull
	line	625
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClass
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,constructor
	local	4,001000,superClasses
	local	5,001000,fields
	local	6,001000,methods
	local	7,001000,pack
	local	8,001000,file
	local	9,001000,srcFile
	local	10,000020,self
	local	11,000020,clone
	local	12,000000,UniDoc__UClass__oprec
	local	13,000000,UniDoc__UClassinitialize
	local	14,000000,UniDoc__UEntity__oprec
	local	15,000000,UniDoc__UEntityinitialize
	local	16,000000,lang__Object__oprec
	local	17,000000,lang__Objectinitialize
	local	18,000000,UniDoc__UClass__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	12
	line	8
	colm	6
	synt	any
	null
	unmark
	var	13
	line	8
	colm	58
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	14
	line	9
	colm	6
	synt	any
	null
	unmark
	var	15
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	12
	line	10
	colm	24
	synt	any
	field	UniDoc__UEntity
	var	14
	line	10
	colm	41
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	16
	line	11
	colm	6
	synt	any
	null
	unmark
	var	17
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	12
	line	12
	colm	24
	synt	any
	field	lang__Object
	var	16
	line	12
	colm	38
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	10
	var	18
	line	14
	colm	33
	synt	any
	keywd	null
	var	12
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	line	14
	colm	32
	synt	any
	invoke	12
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	10
	line	15
	colm	7
	synt	any
	field	__s
	var	10
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	10
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	10
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	10
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UClassinitialize
	local	0,000000,UniDoc__UClass__oprec
	local	1,000000,UniDoc__UClass__methods
	local	2,000000,UniDoc__UClass_setName
	local	3,000000,UniDoc__UClass_getFullName
	local	4,000000,UniDoc__UClass_setSuperClasses
	local	5,000000,UniDoc__UClass_getSuperClasses
	local	6,000000,UniDoc__UClass_addSuperClass
	local	7,000000,UniDoc__UClass_setParams
	local	8,000000,UniDoc__UClass_getParams
	local	9,000000,UniDoc__UClass_addField
	local	10,000000,UniDoc__UClass_setMethods
	local	11,000000,UniDoc__UClass_getMethods
	local	12,000000,UniDoc__UClass_addMethod
	local	13,000000,UniDoc__UClass_hasMethod
	local	14,000000,UniDoc__UClass_getMethod
	local	15,000000,UniDoc__UClass_setConstructor
	local	16,000000,UniDoc__UClass_getConstructor
	local	17,000000,UniDoc__UClass_setPackage
	local	18,000000,UniDoc__UClass_getPackage
	local	19,000000,UniDoc__UClass_setFile
	local	20,000000,UniDoc__UClass_getFile
	local	21,000000,UniDoc__UClass_initially
	local	22,000000,UniDoc__UEntity_getName
	local	23,000000,UniDoc__UEntity_setParent
	local	24,000000,UniDoc__UEntity_getParent
	local	25,000000,UniDoc__UEntity_setSrcFile
	local	26,000000,UniDoc__UEntity_getSrcFile
	local	27,000000,UniDoc__UEntity_getFormType
	local	28,000000,UniDoc__UEntity_setComments
	local	29,000000,UniDoc__UEntity_getComments
	local	30,000000,UniDoc__UEntity_addComment
	local	31,000000,UniDoc__UEntity_startNewComments
	local	32,000000,UniDoc__UEntity_mergeComments
	local	33,000000,lang__Object_clone
	local	34,000000,lang__Object_to_string
	local	35,000000,lang__Object_equals
	local	36,000000,lang__Object_hash_code
	local	37,000000,lang__Object_get_class_name
	local	38,000000,lang__Object_get_id
	local	39,000000,lang__Object_get_class
	local	40,000000,lang__Object_is_instance
	local	41,000000,lang__Object_Type
	local	42,000000,lang__Object_instanceOf
	local	43,000000,lang__Object_className
	local	44,000000,lang__Object_invoke
	local	45,000000,lang__Object_getField
	local	46,000000,lang__Object_setField
	local	47,000000,lang__Object_hasField
	local	48,000000,lang__Object_fieldNames
	local	49,000000,lang__Object_genMethods
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	var	36
	var	37
	var	38
	var	39
	var	40
	var	41
	var	42
	var	43
	var	44
	var	45
	var	46
	var	47
	var	48
	var	49
	line	21
	colm	59
	synt	any
	invoke	48
	line	21
	colm	33
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UConstructor_setParams
	local	0,001000,self
	local	1,001000,newParams
	declend
	filen	UniForm.icn
	line	636
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	637
	colm	13
	synt	any
	field	params
	var	1
	line	637
	colm	20
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	638
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UConstructor_getParams
	local	0,001000,self
	declend
	line	639
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	640
	colm	20
	synt	any
	field	params
	line	640
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	641
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UConstructor_addParam
	local	0,001000,self
	local	1,001000,newParam
	local	2,000000,UniDoc__Sequence
	declend
	line	642
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	643
	colm	14
	synt	any
	field	params
	line	643
	colm	9
	synt	any
	null
	var	2
	line	643
	colm	39
	synt	any
	invoke	0
	line	643
	colm	21
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	var	0
	line	644
	colm	13
	synt	any
	field	params
	line	644
	colm	20
	synt	any
	field	add
	var	1
	line	644
	colm	24
	synt	any
	invoke	1
	unmark
lab L2
	pnull
	line	645
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UConstructor_initially
	local	0,001000,self
	local	1,000000,UniDoc__Comments
	declend
	line	647
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	648
	colm	14
	synt	any
	field	comments
	line	648
	colm	9
	synt	any
	null
	var	1
	line	648
	colm	41
	synt	any
	invoke	0
	line	648
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	649
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	650
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UConstructor
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,params
	local	4,001000,srcFile
	local	5,000020,self
	local	6,000020,clone
	local	7,000000,UniDoc__UConstructor__oprec
	local	8,000000,UniDoc__UConstructorinitialize
	local	9,000000,UniDoc__UEntity__oprec
	local	10,000000,UniDoc__UEntityinitialize
	local	11,000000,lang__Object__oprec
	local	12,000000,lang__Objectinitialize
	local	13,000000,UniDoc__UConstructor__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	7
	line	8
	colm	6
	synt	any
	null
	unmark
	var	8
	line	8
	colm	70
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	9
	line	9
	colm	6
	synt	any
	null
	unmark
	var	10
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	7
	line	10
	colm	30
	synt	any
	field	UniDoc__UEntity
	var	9
	line	10
	colm	47
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	11
	line	11
	colm	6
	synt	any
	null
	unmark
	var	12
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	7
	line	12
	colm	30
	synt	any
	field	lang__Object
	var	11
	line	12
	colm	44
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	5
	var	13
	line	14
	colm	39
	synt	any
	keywd	null
	var	7
	var	0
	var	1
	var	2
	var	3
	var	4
	line	14
	colm	38
	synt	any
	invoke	7
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	5
	line	15
	colm	7
	synt	any
	field	__s
	var	5
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	5
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	5
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	5
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UConstructorinitialize
	local	0,000000,UniDoc__UConstructor__oprec
	local	1,000000,UniDoc__UConstructor__methods
	local	2,000000,UniDoc__UConstructor_setParams
	local	3,000000,UniDoc__UConstructor_getParams
	local	4,000000,UniDoc__UConstructor_addParam
	local	5,000000,UniDoc__UConstructor_initially
	local	6,000000,UniDoc__UEntity_setName
	local	7,000000,UniDoc__UEntity_getName
	local	8,000000,UniDoc__UEntity_setParent
	local	9,000000,UniDoc__UEntity_getParent
	local	10,000000,UniDoc__UEntity_setSrcFile
	local	11,000000,UniDoc__UEntity_getSrcFile
	local	12,000000,UniDoc__UEntity_getFormType
	local	13,000000,UniDoc__UEntity_setComments
	local	14,000000,UniDoc__UEntity_getComments
	local	15,000000,UniDoc__UEntity_addComment
	local	16,000000,UniDoc__UEntity_startNewComments
	local	17,000000,UniDoc__UEntity_mergeComments
	local	18,000000,lang__Object_clone
	local	19,000000,lang__Object_to_string
	local	20,000000,lang__Object_equals
	local	21,000000,lang__Object_hash_code
	local	22,000000,lang__Object_get_class_name
	local	23,000000,lang__Object_get_id
	local	24,000000,lang__Object_get_class
	local	25,000000,lang__Object_is_instance
	local	26,000000,lang__Object_Type
	local	27,000000,lang__Object_instanceOf
	local	28,000000,lang__Object_className
	local	29,000000,lang__Object_invoke
	local	30,000000,lang__Object_getField
	local	31,000000,lang__Object_setField
	local	32,000000,lang__Object_hasField
	local	33,000000,lang__Object_fieldNames
	local	34,000000,lang__Object_genMethods
	local	35,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	line	21
	colm	71
	synt	any
	invoke	34
	line	21
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_setFiles
	local	0,001000,self
	local	1,001000,newFiles
	declend
	filen	UniForm.icn
	line	661
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	662
	colm	13
	synt	any
	field	files
	var	1
	line	662
	colm	19
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	663
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getFiles
	local	0,001000,self
	declend
	line	667
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	668
	colm	20
	synt	any
	field	files
	line	668
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	669
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_addFile
	local	0,001000,self
	local	1,001000,newFile
	declend
	line	674
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	675
	colm	13
	synt	any
	field	files
	line	675
	colm	19
	synt	any
	field	add
	pnull
	var	1
	line	675
	colm	31
	synt	any
	field	getName
	line	675
	colm	39
	synt	any
	invoke	0
	var	1
	line	675
	colm	23
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	676
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_delFile
	local	0,001000,self
	local	1,001000,fName
	declend
	line	681
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	682
	colm	13
	synt	any
	field	files
	line	682
	colm	19
	synt	any
	field	del
	var	1
	line	682
	colm	23
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	683
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getFileNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	688
	colm	11
	synt	any
	mark	L1
	line	691
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	691
	colm	28
	synt	any
	llist	0
	line	691
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	691
	colm	36
	synt	any
	field	files
	line	691
	colm	42
	synt	any
	field	getNames
	line	691
	colm	51
	synt	any
	invoke	0
	line	691
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	691
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	692
	colm	20
	synt	any
	invoke	1
	line	692
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	693
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_setImports
	local	0,001000,self
	local	1,001000,newImports
	declend
	line	698
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	699
	colm	13
	synt	any
	field	imports
	var	1
	line	699
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	700
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getImports
	local	0,001000,self
	declend
	line	704
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	705
	colm	20
	synt	any
	field	imports
	line	705
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	706
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_addImport
	local	0,001000,self
	local	1,001000,newImport
	declend
	line	710
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	711
	colm	13
	synt	any
	field	imports
	line	711
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	711
	colm	35
	synt	any
	field	getName
	line	711
	colm	43
	synt	any
	invoke	0
	var	1
	line	711
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	712
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getImportNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	716
	colm	11
	synt	any
	mark	L1
	line	719
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	719
	colm	28
	synt	any
	llist	0
	line	719
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	719
	colm	36
	synt	any
	field	imports
	line	719
	colm	44
	synt	any
	field	getNames
	line	719
	colm	53
	synt	any
	invoke	0
	line	719
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	719
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	720
	colm	20
	synt	any
	invoke	1
	line	720
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	721
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_setProcedures
	local	0,001000,self
	local	1,001000,newProcs
	declend
	line	726
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	727
	colm	13
	synt	any
	field	procs
	var	1
	line	727
	colm	19
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	728
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getProcedures
	local	0,001000,self
	declend
	line	732
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	733
	colm	20
	synt	any
	field	procs
	line	733
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	734
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_addProcedure
	local	0,001000,self
	local	1,001000,newProc
	declend
	line	738
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	739
	colm	13
	synt	any
	field	procs
	line	739
	colm	19
	synt	any
	field	add
	pnull
	var	1
	line	739
	colm	31
	synt	any
	field	getName
	line	739
	colm	39
	synt	any
	invoke	0
	var	1
	line	739
	colm	23
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	740
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getProcedureNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	744
	colm	11
	synt	any
	mark	L1
	line	747
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	747
	colm	28
	synt	any
	llist	0
	line	747
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	747
	colm	36
	synt	any
	field	procs
	line	747
	colm	42
	synt	any
	field	getNames
	line	747
	colm	51
	synt	any
	invoke	0
	line	747
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	747
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	748
	colm	20
	synt	any
	invoke	1
	line	748
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	749
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_setClasses
	local	0,001000,self
	local	1,001000,newClasses
	declend
	line	754
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	755
	colm	13
	synt	any
	field	classes
	var	1
	line	755
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	756
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getClasses
	local	0,001000,self
	declend
	line	760
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	761
	colm	20
	synt	any
	field	classes
	line	761
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	762
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getClass
	local	0,001000,self
	local	1,001000,cName
	declend
	line	767
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	768
	colm	20
	synt	any
	field	classes
	line	768
	colm	28
	synt	any
	field	getByName
	var	1
	line	768
	colm	38
	synt	any
	invoke	1
	line	768
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	769
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_addClass
	local	0,001000,self
	local	1,001000,newClass
	declend
	line	773
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	774
	colm	13
	synt	any
	field	classes
	line	774
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	774
	colm	34
	synt	any
	field	getName
	line	774
	colm	42
	synt	any
	invoke	0
	var	1
	line	774
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	775
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getClassNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	779
	colm	11
	synt	any
	mark	L1
	line	782
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	782
	colm	28
	synt	any
	llist	0
	line	782
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	782
	colm	36
	synt	any
	field	classes
	line	782
	colm	44
	synt	any
	field	getNames
	line	782
	colm	53
	synt	any
	invoke	0
	line	782
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	782
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	783
	colm	20
	synt	any
	invoke	1
	line	783
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	784
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_setGlobals
	local	0,001000,self
	local	1,001000,newGlobals
	declend
	line	789
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	790
	colm	13
	synt	any
	field	globals
	var	1
	line	790
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	791
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getGlobals
	local	0,001000,self
	declend
	line	795
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	796
	colm	20
	synt	any
	field	globals
	line	796
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	797
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_addGlobal
	local	0,001000,self
	local	1,001000,newGlobal
	declend
	line	801
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	802
	colm	13
	synt	any
	field	globals
	line	802
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	802
	colm	35
	synt	any
	field	getName
	line	802
	colm	43
	synt	any
	invoke	0
	var	1
	line	802
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	803
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getGlobalNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	807
	colm	11
	synt	any
	mark	L1
	line	810
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	810
	colm	28
	synt	any
	llist	0
	line	810
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	810
	colm	36
	synt	any
	field	globals
	line	810
	colm	44
	synt	any
	field	getNames
	line	810
	colm	53
	synt	any
	invoke	0
	line	810
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	810
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	811
	colm	20
	synt	any
	invoke	1
	line	811
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	812
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_setRecords
	local	0,001000,self
	local	1,001000,newRecords
	declend
	line	817
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	818
	colm	13
	synt	any
	field	records
	var	1
	line	818
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	819
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getRecords
	local	0,001000,self
	declend
	line	823
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	824
	colm	20
	synt	any
	field	records
	line	824
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	825
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_addRecord
	local	0,001000,self
	local	1,001000,newRecord
	declend
	line	829
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	830
	colm	13
	synt	any
	field	records
	line	830
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	830
	colm	35
	synt	any
	field	getName
	line	830
	colm	43
	synt	any
	invoke	0
	var	1
	line	830
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	831
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_getRecordNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	836
	colm	11
	synt	any
	mark	L1
	line	839
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	839
	colm	28
	synt	any
	llist	0
	line	839
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	839
	colm	36
	synt	any
	field	records
	line	839
	colm	44
	synt	any
	field	getNames
	line	839
	colm	53
	synt	any
	invoke	0
	line	839
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	839
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	840
	colm	20
	synt	any
	invoke	1
	line	840
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	841
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage_initially
	local	0,001000,self
	local	1,000000,UniDoc__Set
	local	2,000000,UniDoc__Comments
	declend
	line	843
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	844
	colm	14
	synt	any
	field	files
	line	844
	colm	9
	synt	any
	null
	var	1
	line	844
	colm	33
	synt	any
	invoke	0
	line	844
	colm	20
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	845
	colm	14
	synt	any
	field	imports
	line	845
	colm	9
	synt	any
	null
	var	1
	line	845
	colm	35
	synt	any
	invoke	0
	line	845
	colm	22
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	pnull
	pnull
	var	0
	line	846
	colm	14
	synt	any
	field	procs
	line	846
	colm	9
	synt	any
	null
	var	1
	line	846
	colm	33
	synt	any
	invoke	0
	line	846
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	pnull
	pnull
	var	0
	line	847
	colm	14
	synt	any
	field	classes
	line	847
	colm	9
	synt	any
	null
	var	1
	line	847
	colm	35
	synt	any
	invoke	0
	line	847
	colm	22
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	pnull
	pnull
	var	0
	line	848
	colm	14
	synt	any
	field	globals
	line	848
	colm	9
	synt	any
	null
	var	1
	line	848
	colm	35
	synt	any
	invoke	0
	line	848
	colm	22
	synt	any
	asgn
	unmark
lab L5
	mark	L6
	pnull
	pnull
	pnull
	var	0
	line	849
	colm	14
	synt	any
	field	records
	line	849
	colm	9
	synt	any
	null
	var	1
	line	849
	colm	35
	synt	any
	invoke	0
	line	849
	colm	22
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	pnull
	var	0
	line	850
	colm	14
	synt	any
	field	comments
	line	850
	colm	9
	synt	any
	null
	var	2
	line	850
	colm	41
	synt	any
	invoke	0
	line	850
	colm	23
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	line	851
	colm	7
	synt	any
	pret
lab L9
	synt	any
	pfail
	unmark
lab L8
	pnull
	line	852
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackage
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,files
	local	4,001000,procs
	local	5,001000,imports
	local	6,001000,classes
	local	7,001000,globals
	local	8,001000,records
	local	9,001000,srcFile
	local	10,000020,self
	local	11,000020,clone
	local	12,000000,UniDoc__UPackage__oprec
	local	13,000000,UniDoc__UPackageinitialize
	local	14,000000,UniDoc__UEntity__oprec
	local	15,000000,UniDoc__UEntityinitialize
	local	16,000000,lang__Object__oprec
	local	17,000000,lang__Objectinitialize
	local	18,000000,UniDoc__UPackage__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	12
	line	8
	colm	6
	synt	any
	null
	unmark
	var	13
	line	8
	colm	62
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	14
	line	9
	colm	6
	synt	any
	null
	unmark
	var	15
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	12
	line	10
	colm	26
	synt	any
	field	UniDoc__UEntity
	var	14
	line	10
	colm	43
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	16
	line	11
	colm	6
	synt	any
	null
	unmark
	var	17
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	12
	line	12
	colm	26
	synt	any
	field	lang__Object
	var	16
	line	12
	colm	40
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	10
	var	18
	line	14
	colm	35
	synt	any
	keywd	null
	var	12
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	line	14
	colm	34
	synt	any
	invoke	12
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	10
	line	15
	colm	7
	synt	any
	field	__s
	var	10
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	10
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	10
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	10
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UPackageinitialize
	local	0,000000,UniDoc__UPackage__oprec
	local	1,000000,UniDoc__UPackage__methods
	local	2,000000,UniDoc__UPackage_setFiles
	local	3,000000,UniDoc__UPackage_getFiles
	local	4,000000,UniDoc__UPackage_addFile
	local	5,000000,UniDoc__UPackage_delFile
	local	6,000000,UniDoc__UPackage_getFileNames
	local	7,000000,UniDoc__UPackage_setImports
	local	8,000000,UniDoc__UPackage_getImports
	local	9,000000,UniDoc__UPackage_addImport
	local	10,000000,UniDoc__UPackage_getImportNames
	local	11,000000,UniDoc__UPackage_setProcedures
	local	12,000000,UniDoc__UPackage_getProcedures
	local	13,000000,UniDoc__UPackage_addProcedure
	local	14,000000,UniDoc__UPackage_getProcedureNames
	local	15,000000,UniDoc__UPackage_setClasses
	local	16,000000,UniDoc__UPackage_getClasses
	local	17,000000,UniDoc__UPackage_getClass
	local	18,000000,UniDoc__UPackage_addClass
	local	19,000000,UniDoc__UPackage_getClassNames
	local	20,000000,UniDoc__UPackage_setGlobals
	local	21,000000,UniDoc__UPackage_getGlobals
	local	22,000000,UniDoc__UPackage_addGlobal
	local	23,000000,UniDoc__UPackage_getGlobalNames
	local	24,000000,UniDoc__UPackage_setRecords
	local	25,000000,UniDoc__UPackage_getRecords
	local	26,000000,UniDoc__UPackage_addRecord
	local	27,000000,UniDoc__UPackage_getRecordNames
	local	28,000000,UniDoc__UPackage_initially
	local	29,000000,UniDoc__UEntity_setName
	local	30,000000,UniDoc__UEntity_getName
	local	31,000000,UniDoc__UEntity_setParent
	local	32,000000,UniDoc__UEntity_getParent
	local	33,000000,UniDoc__UEntity_setSrcFile
	local	34,000000,UniDoc__UEntity_getSrcFile
	local	35,000000,UniDoc__UEntity_getFormType
	local	36,000000,UniDoc__UEntity_setComments
	local	37,000000,UniDoc__UEntity_getComments
	local	38,000000,UniDoc__UEntity_addComment
	local	39,000000,UniDoc__UEntity_startNewComments
	local	40,000000,UniDoc__UEntity_mergeComments
	local	41,000000,lang__Object_clone
	local	42,000000,lang__Object_to_string
	local	43,000000,lang__Object_equals
	local	44,000000,lang__Object_hash_code
	local	45,000000,lang__Object_get_class_name
	local	46,000000,lang__Object_get_id
	local	47,000000,lang__Object_get_class
	local	48,000000,lang__Object_is_instance
	local	49,000000,lang__Object_Type
	local	50,000000,lang__Object_instanceOf
	local	51,000000,lang__Object_className
	local	52,000000,lang__Object_invoke
	local	53,000000,lang__Object_getField
	local	54,000000,lang__Object_setField
	local	55,000000,lang__Object_hasField
	local	56,000000,lang__Object_fieldNames
	local	57,000000,lang__Object_genMethods
	local	58,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	var	36
	var	37
	var	38
	var	39
	var	40
	var	41
	var	42
	var	43
	var	44
	var	45
	var	46
	var	47
	var	48
	var	49
	var	50
	var	51
	var	52
	var	53
	var	54
	var	55
	var	56
	var	57
	var	58
	line	21
	colm	63
	synt	any
	invoke	57
	line	21
	colm	35
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_setImports
	local	0,001000,self
	local	1,001000,newImports
	declend
	filen	UniForm.icn
	line	862
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	863
	colm	13
	synt	any
	field	imports
	var	1
	line	863
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	864
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getImports
	local	0,001000,self
	declend
	line	868
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	869
	colm	20
	synt	any
	field	imports
	line	869
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	870
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_addImport
	local	0,001000,self
	local	1,001000,newImport
	declend
	line	874
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	875
	colm	13
	synt	any
	field	imports
	line	875
	colm	21
	synt	any
	field	add
	var	1
	line	875
	colm	25
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	876
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getImportNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	880
	colm	11
	synt	any
	mark	L1
	line	883
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	883
	colm	28
	synt	any
	llist	0
	line	883
	colm	25
	synt	any
	asgn
	pnull
	pnull
	pnull
	var	0
	line	883
	colm	36
	synt	any
	field	imports
	line	883
	colm	44
	synt	any
	field	get
	line	883
	colm	48
	synt	any
	invoke	0
	line	883
	colm	50
	synt	any
	field	getName
	line	883
	colm	58
	synt	any
	invoke	0
	line	883
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	883
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	884
	colm	20
	synt	any
	invoke	1
	line	884
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	885
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_setLinks
	local	0,001000,self
	local	1,001000,newLinks
	declend
	line	890
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	891
	colm	13
	synt	any
	field	links
	var	1
	line	891
	colm	19
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	892
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getLinks
	local	0,001000,self
	declend
	line	896
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	897
	colm	20
	synt	any
	field	links
	line	897
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	898
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_addLink
	local	0,001000,self
	local	1,001000,newLink
	declend
	line	902
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	903
	colm	13
	synt	any
	field	links
	line	903
	colm	19
	synt	any
	field	add
	var	1
	line	903
	colm	23
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	904
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getLinkNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	908
	colm	11
	synt	any
	mark	L1
	line	911
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	911
	colm	28
	synt	any
	llist	0
	line	911
	colm	25
	synt	any
	asgn
	pnull
	pnull
	pnull
	var	0
	line	911
	colm	36
	synt	any
	field	links
	line	911
	colm	42
	synt	any
	field	get
	line	911
	colm	46
	synt	any
	invoke	0
	line	911
	colm	48
	synt	any
	field	getName
	line	911
	colm	56
	synt	any
	invoke	0
	line	911
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	911
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	912
	colm	20
	synt	any
	invoke	1
	line	912
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	913
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_setPackage
	local	0,001000,self
	local	1,001000,newPack
	declend
	line	918
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	919
	colm	13
	synt	any
	field	pack
	var	1
	line	919
	colm	18
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	920
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getPackage
	local	0,001000,self
	declend
	line	924
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	925
	colm	20
	synt	any
	field	pack
	line	925
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	926
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getPackageName
	local	0,001000,self
	declend
	line	930
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	931
	colm	20
	synt	any
	field	pack
	line	931
	colm	25
	synt	any
	field	getName
	line	931
	colm	33
	synt	any
	invoke	0
	line	931
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	932
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_setProcedures
	local	0,001000,self
	local	1,001000,newProcs
	declend
	line	937
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	938
	colm	13
	synt	any
	field	procs
	var	1
	line	938
	colm	19
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	939
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getProcedures
	local	0,001000,self
	declend
	line	943
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	944
	colm	20
	synt	any
	field	procs
	line	944
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	945
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_addProcedure
	local	0,001000,self
	local	1,001000,newProc
	declend
	line	949
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	950
	colm	13
	synt	any
	field	procs
	line	950
	colm	19
	synt	any
	field	add
	pnull
	var	1
	line	950
	colm	31
	synt	any
	field	getName
	line	950
	colm	39
	synt	any
	invoke	0
	var	1
	line	950
	colm	23
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	951
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getProcedureNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	955
	colm	11
	synt	any
	mark	L1
	line	958
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	958
	colm	28
	synt	any
	llist	0
	line	958
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	958
	colm	36
	synt	any
	field	procs
	line	958
	colm	42
	synt	any
	field	getNames
	line	958
	colm	51
	synt	any
	invoke	0
	line	958
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	958
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	959
	colm	20
	synt	any
	invoke	1
	line	959
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	960
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_setClasses
	local	0,001000,self
	local	1,001000,newClasses
	declend
	line	965
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	966
	colm	13
	synt	any
	field	classes
	var	1
	line	966
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	967
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getClasses
	local	0,001000,self
	declend
	line	971
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	972
	colm	20
	synt	any
	field	classes
	line	972
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	973
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getClass
	local	0,001000,self
	local	1,001000,cName
	declend
	line	977
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	978
	colm	20
	synt	any
	field	classes
	line	978
	colm	28
	synt	any
	field	getByName
	var	1
	line	978
	colm	38
	synt	any
	invoke	1
	line	978
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	979
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_addClass
	local	0,001000,self
	local	1,001000,newClass
	declend
	line	983
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	984
	colm	13
	synt	any
	field	classes
	line	984
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	984
	colm	34
	synt	any
	field	getName
	line	984
	colm	42
	synt	any
	invoke	0
	var	1
	line	984
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	985
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getClassNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	989
	colm	11
	synt	any
	mark	L1
	line	992
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	992
	colm	28
	synt	any
	llist	0
	line	992
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	992
	colm	36
	synt	any
	field	classes
	line	992
	colm	44
	synt	any
	field	getNames
	line	992
	colm	53
	synt	any
	invoke	0
	line	992
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	992
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	993
	colm	20
	synt	any
	invoke	1
	line	993
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	994
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_setGlobals
	local	0,001000,self
	local	1,001000,newGlobals
	declend
	line	999
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	1000
	colm	13
	synt	any
	field	globals
	var	1
	line	1000
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	1001
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getGlobals
	local	0,001000,self
	declend
	line	1005
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1006
	colm	20
	synt	any
	field	globals
	line	1006
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1007
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_addGlobal
	local	0,001000,self
	local	1,001000,newGlobal
	declend
	line	1011
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	1012
	colm	13
	synt	any
	field	globals
	line	1012
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	1012
	colm	35
	synt	any
	field	getName
	line	1012
	colm	43
	synt	any
	invoke	0
	var	1
	line	1012
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	1013
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getGlobalNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	1017
	colm	11
	synt	any
	mark	L1
	line	1020
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	1020
	colm	28
	synt	any
	llist	0
	line	1020
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	1020
	colm	36
	synt	any
	field	globals
	line	1020
	colm	44
	synt	any
	field	getNames
	line	1020
	colm	53
	synt	any
	invoke	0
	line	1020
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	1020
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	1021
	colm	20
	synt	any
	invoke	1
	line	1021
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	1022
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_setRecords
	local	0,001000,self
	local	1,001000,newRecords
	declend
	line	1027
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	1028
	colm	13
	synt	any
	field	records
	var	1
	line	1028
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	1029
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getRecords
	local	0,001000,self
	declend
	line	1033
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1034
	colm	20
	synt	any
	field	records
	line	1034
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1035
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_addRecord
	local	0,001000,self
	local	1,001000,newRecord
	declend
	line	1039
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	1040
	colm	13
	synt	any
	field	records
	line	1040
	colm	21
	synt	any
	field	add
	pnull
	var	1
	line	1040
	colm	35
	synt	any
	field	getName
	line	1040
	colm	43
	synt	any
	invoke	0
	var	1
	line	1040
	colm	25
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	1041
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_getRecordNames
	local	0,001000,self
	local	1,000020,clist
	local	2,000000,put
	local	3,000000,sort
	declend
	line	1045
	colm	11
	synt	any
	mark	L1
	line	1048
	colm	9
	synt	every
	mark0
	var	2
	pnull
	var	1
	pnull
	line	1048
	colm	28
	synt	any
	llist	0
	line	1048
	colm	25
	synt	any
	asgn
	pnull
	pnull
	var	0
	line	1048
	colm	36
	synt	any
	field	records
	line	1048
	colm	44
	synt	any
	field	getNames
	line	1048
	colm	53
	synt	any
	invoke	0
	line	1048
	colm	18
	synt	any
	invoke	2
	pop
lab L2
	efail
lab L3
	line	1048
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	var	3
	var	1
	line	1049
	colm	20
	synt	any
	invoke	1
	line	1049
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	1050
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile_initially
	local	0,001000,self
	local	1,000000,UniDoc__Sequence
	local	2,000000,UniDoc__Set
	local	3,000000,UniDoc__Comments
	declend
	line	1052
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	1053
	colm	14
	synt	any
	field	imports
	line	1053
	colm	9
	synt	any
	null
	var	1
	line	1053
	colm	40
	synt	any
	invoke	0
	line	1053
	colm	22
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	1054
	colm	14
	synt	any
	field	links
	line	1054
	colm	9
	synt	any
	null
	var	1
	line	1054
	colm	38
	synt	any
	invoke	0
	line	1054
	colm	20
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	pnull
	pnull
	var	0
	line	1056
	colm	14
	synt	any
	field	procs
	line	1056
	colm	9
	synt	any
	null
	var	2
	line	1056
	colm	33
	synt	any
	invoke	0
	line	1056
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	pnull
	pnull
	var	0
	line	1057
	colm	14
	synt	any
	field	classes
	line	1057
	colm	9
	synt	any
	null
	var	2
	line	1057
	colm	35
	synt	any
	invoke	0
	line	1057
	colm	22
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	pnull
	pnull
	var	0
	line	1058
	colm	14
	synt	any
	field	globals
	line	1058
	colm	9
	synt	any
	null
	var	2
	line	1058
	colm	35
	synt	any
	invoke	0
	line	1058
	colm	22
	synt	any
	asgn
	unmark
lab L5
	mark	L6
	pnull
	pnull
	pnull
	var	0
	line	1059
	colm	14
	synt	any
	field	records
	line	1059
	colm	9
	synt	any
	null
	var	2
	line	1059
	colm	35
	synt	any
	invoke	0
	line	1059
	colm	22
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	pnull
	var	0
	line	1060
	colm	14
	synt	any
	field	comments
	line	1060
	colm	9
	synt	any
	null
	var	3
	line	1060
	colm	41
	synt	any
	invoke	0
	line	1060
	colm	23
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	line	1061
	colm	7
	synt	any
	pret
lab L9
	synt	any
	pfail
	unmark
lab L8
	pnull
	line	1062
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFile
	local	0,001000,name
	local	1,001000,parent
	local	2,001000,comments
	local	3,001000,imports
	local	4,001000,links
	local	5,001000,pack
	local	6,001000,procs
	local	7,001000,classes
	local	8,001000,globals
	local	9,001000,records
	local	10,001000,srcFile
	local	11,000020,self
	local	12,000020,clone
	local	13,000000,UniDoc__UFile__oprec
	local	14,000000,UniDoc__UFileinitialize
	local	15,000000,UniDoc__UEntity__oprec
	local	16,000000,UniDoc__UEntityinitialize
	local	17,000000,lang__Object__oprec
	local	18,000000,lang__Objectinitialize
	local	19,000000,UniDoc__UFile__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	13
	line	8
	colm	6
	synt	any
	null
	unmark
	var	14
	line	8
	colm	56
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	15
	line	9
	colm	6
	synt	any
	null
	unmark
	var	16
	line	9
	colm	60
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	13
	line	10
	colm	23
	synt	any
	field	UniDoc__UEntity
	var	15
	line	10
	colm	40
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	line	11
	colm	3
	synt	if
	mark0
	pnull
	var	17
	line	11
	colm	6
	synt	any
	null
	unmark
	var	18
	line	11
	colm	54
	synt	any
	invoke	0
	line	11
	colm	3
	synt	endif
	unmark
lab L7
	pnull
	pnull
	var	13
	line	12
	colm	23
	synt	any
	field	lang__Object
	var	17
	line	12
	colm	37
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L8
	pnull
	var	11
	var	19
	line	14
	colm	32
	synt	any
	keywd	null
	var	13
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	line	14
	colm	31
	synt	any
	invoke	13
	line	14
	colm	8
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	11
	line	15
	colm	7
	synt	any
	field	__s
	var	11
	line	15
	colm	12
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	mark	L11
	pnull
	pnull
	var	11
	line	16
	colm	7
	synt	any
	field	__m
	line	16
	colm	11
	synt	any
	field	initially
	var	11
	line	16
	colm	21
	synt	any
	invoke	1
	line	16
	colm	28
	synt	any
	esusp
	goto	L12
lab L11
	line	16
	colm	30
	synt	any
	pfail
lab L12
	unmark
lab L10
	mark	L13
	mark	L14
	var	11
	line	17
	colm	3
	synt	any
	pret
lab L14
	synt	any
	pfail
	unmark
lab L13
	pnull
	line	18
	colm	1
	synt	any
	pfail
	end
proc UniDoc__UFileinitialize
	local	0,000000,UniDoc__UFile__oprec
	local	1,000000,UniDoc__UFile__methods
	local	2,000000,UniDoc__UFile_setImports
	local	3,000000,UniDoc__UFile_getImports
	local	4,000000,UniDoc__UFile_addImport
	local	5,000000,UniDoc__UFile_getImportNames
	local	6,000000,UniDoc__UFile_setLinks
	local	7,000000,UniDoc__UFile_getLinks
	local	8,000000,UniDoc__UFile_addLink
	local	9,000000,UniDoc__UFile_getLinkNames
	local	10,000000,UniDoc__UFile_setPackage
	local	11,000000,UniDoc__UFile_getPackage
	local	12,000000,UniDoc__UFile_getPackageName
	local	13,000000,UniDoc__UFile_setProcedures
	local	14,000000,UniDoc__UFile_getProcedures
	local	15,000000,UniDoc__UFile_addProcedure
	local	16,000000,UniDoc__UFile_getProcedureNames
	local	17,000000,UniDoc__UFile_setClasses
	local	18,000000,UniDoc__UFile_getClasses
	local	19,000000,UniDoc__UFile_getClass
	local	20,000000,UniDoc__UFile_addClass
	local	21,000000,UniDoc__UFile_getClassNames
	local	22,000000,UniDoc__UFile_setGlobals
	local	23,000000,UniDoc__UFile_getGlobals
	local	24,000000,UniDoc__UFile_addGlobal
	local	25,000000,UniDoc__UFile_getGlobalNames
	local	26,000000,UniDoc__UFile_setRecords
	local	27,000000,UniDoc__UFile_getRecords
	local	28,000000,UniDoc__UFile_addRecord
	local	29,000000,UniDoc__UFile_getRecordNames
	local	30,000000,UniDoc__UFile_initially
	local	31,000000,UniDoc__UEntity_setName
	local	32,000000,UniDoc__UEntity_getName
	local	33,000000,UniDoc__UEntity_setParent
	local	34,000000,UniDoc__UEntity_getParent
	local	35,000000,UniDoc__UEntity_setSrcFile
	local	36,000000,UniDoc__UEntity_getSrcFile
	local	37,000000,UniDoc__UEntity_getFormType
	local	38,000000,UniDoc__UEntity_setComments
	local	39,000000,UniDoc__UEntity_getComments
	local	40,000000,UniDoc__UEntity_addComment
	local	41,000000,UniDoc__UEntity_startNewComments
	local	42,000000,UniDoc__UEntity_mergeComments
	local	43,000000,lang__Object_clone
	local	44,000000,lang__Object_to_string
	local	45,000000,lang__Object_equals
	local	46,000000,lang__Object_hash_code
	local	47,000000,lang__Object_get_class_name
	local	48,000000,lang__Object_get_id
	local	49,000000,lang__Object_get_class
	local	50,000000,lang__Object_is_instance
	local	51,000000,lang__Object_Type
	local	52,000000,lang__Object_instanceOf
	local	53,000000,lang__Object_className
	local	54,000000,lang__Object_invoke
	local	55,000000,lang__Object_getField
	local	56,000000,lang__Object_setField
	local	57,000000,lang__Object_hasField
	local	58,000000,lang__Object_fieldNames
	local	59,000000,lang__Object_genMethods
	local	60,000000,lang__Object_hasMethod
	declend
	line	20
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	var	36
	var	37
	var	38
	var	39
	var	40
	var	41
	var	42
	var	43
	var	44
	var	45
	var	46
	var	47
	var	48
	var	49
	var	50
	var	51
	var	52
	var	53
	var	54
	var	55
	var	56
	var	57
	var	58
	var	59
	var	60
	line	21
	colm	57
	synt	any
	invoke	59
	line	21
	colm	32
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	22
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments_size
	local	0,001000,self
	local	1,000020,block
	local	2,000020,s
	con	0,002000,1,0
	declend
	filen	UniForm.icn
	line	1074
	colm	11
	synt	any
	mark	L1
	pnull
	var	2
	int	0
	line	1077
	colm	11
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	var	1
	pnull
	var	0
	line	1078
	colm	22
	synt	any
	field	head
	line	1078
	colm	15
	synt	any
	asgn
	unmark
lab L2
	mark	L3
lab L4
	line	1079
	colm	9
	synt	while
	mark0
	pnull
	var	1
	line	1079
	colm	15
	synt	any
	nonnull
	unmark
	mark	L4
	mark	L7
	pnull
	var	2
	dup
	pnull
	var	1
	line	1080
	colm	24
	synt	any
	field	size
	line	1080
	colm	29
	synt	any
	invoke	0
	line	1080
	colm	15
	synt	any
	plus
	asgn
	unmark
lab L7
	pnull
	var	1
	pnull
	var	1
	line	1081
	colm	27
	synt	any
	field	nextblock
	line	1081
	colm	19
	synt	any
	asgn
lab L5
	unmark
	goto	L4
lab L6
	line	1079
	colm	9
	synt	endwhile
	unmark
lab L3
	mark	L8
	mark	L9
	var	2
	line	1083
	colm	9
	synt	any
	pret
lab L9
	synt	any
	pfail
	unmark
lab L8
	pnull
	line	1084
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments_add
	local	0,001000,self
	local	1,001000,newComment
	declend
	line	1089
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	1090
	colm	13
	synt	any
	field	tail
	line	1090
	colm	18
	synt	any
	field	put
	var	1
	line	1090
	colm	22
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	1091
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments_get
	local	0,001000,self
	local	1,000020,block
	con	0,002000,1,0
	declend
	line	1097
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	pnull
	var	0
	line	1100
	colm	22
	synt	any
	field	head
	line	1100
	colm	15
	synt	any
	asgn
	unmark
lab L1
	mark	L2
lab L3
	line	1101
	colm	9
	synt	while
	mark0
	pnull
	var	1
	line	1101
	colm	15
	synt	any
	nonnull
	unmark
	mark	L3
	mark	L6
	line	1102
	colm	13
	synt	if
	mark0
	pnull
	pnull
	var	1
	line	1102
	colm	21
	synt	any
	field	size
	line	1102
	colm	26
	synt	any
	invoke	0
	int	0
	line	1102
	colm	29
	synt	any
	numgt
	unmark
	line	1103
	colm	17
	synt	suspend
	mark0
	var	1
	line	1103
	colm	17
	synt	any
	psusp
	pop
lab L7
	efail
lab L8
	line	1103
	colm	17
	synt	endsuspend
	line	1102
	colm	13
	synt	endif
	unmark
lab L6
	pnull
	var	1
	pnull
	var	1
	line	1105
	colm	27
	synt	any
	field	nextblock
	line	1105
	colm	19
	synt	any
	asgn
lab L4
	unmark
	goto	L3
lab L5
	line	1101
	colm	9
	synt	endwhile
	unmark
lab L2
	pnull
	line	1107
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments_newBlock
	local	0,001000,self
	local	1,000000,UniDoc__CommentBlock
	declend
	line	1113
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	1114
	colm	13
	synt	any
	field	tail
	line	1114
	colm	18
	synt	any
	field	nextblock
	var	1
	line	1114
	colm	50
	synt	any
	invoke	0
	line	1114
	colm	28
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	var	0
	line	1115
	colm	13
	synt	any
	field	tail
	pnull
	pnull
	var	0
	line	1115
	colm	24
	synt	any
	field	tail
	line	1115
	colm	29
	synt	any
	field	nextblock
	line	1115
	colm	18
	synt	any
	asgn
	unmark
lab L2
	pnull
	line	1116
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments_append
	local	0,001000,self
	local	1,001000,newComments
	declend
	line	1121
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	pnull
	var	0
	line	1122
	colm	13
	synt	any
	field	tail
	line	1122
	colm	18
	synt	any
	field	nextblock
	pnull
	var	1
	line	1122
	colm	41
	synt	any
	field	get
	line	1122
	colm	45
	synt	any
	invoke	0
	line	1122
	colm	28
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	1123
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments_getFirstSentence
	local	0,001000,self
	declend
	line	1129
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	1130
	colm	20
	synt	any
	field	head
	line	1130
	colm	25
	synt	any
	field	getFirstSentence
	line	1130
	colm	42
	synt	any
	invoke	0
	line	1130
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1131
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments_initially
	local	0,001000,self
	local	1,000000,UniDoc__CommentBlock
	declend
	line	1133
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	1134
	colm	13
	synt	any
	field	tail
	pnull
	pnull
	var	0
	line	1134
	colm	24
	synt	any
	field	head
	var	1
	line	1134
	colm	51
	synt	any
	invoke	0
	line	1134
	colm	29
	synt	any
	asgn
	line	1134
	colm	18
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	1135
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1136
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Comments
	local	0,001000,head
	local	1,001000,tail
	local	2,000020,self
	local	3,000020,clone
	local	4,000000,UniDoc__Comments__oprec
	local	5,000000,UniDoc__Commentsinitialize
	local	6,000000,lang__Object__oprec
	local	7,000000,lang__Objectinitialize
	local	8,000000,UniDoc__Comments__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	4
	line	8
	colm	6
	synt	any
	null
	unmark
	var	5
	line	8
	colm	62
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	6
	line	9
	colm	6
	synt	any
	null
	unmark
	var	7
	line	9
	colm	54
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	4
	line	10
	colm	26
	synt	any
	field	lang__Object
	var	6
	line	10
	colm	40
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	2
	var	8
	line	12
	colm	35
	synt	any
	keywd	null
	var	4
	var	0
	var	1
	line	12
	colm	34
	synt	any
	invoke	4
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	2
	line	13
	colm	7
	synt	any
	field	__s
	var	2
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	2
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	2
	line	14
	colm	21
	synt	any
	invoke	1
	line	14
	colm	28
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	30
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	2
	line	15
	colm	3
	synt	any
	pret
lab L12
	synt	any
	pfail
	unmark
lab L11
	pnull
	line	16
	colm	1
	synt	any
	pfail
	end
proc UniDoc__Commentsinitialize
	local	0,000000,UniDoc__Comments__oprec
	local	1,000000,UniDoc__Comments__methods
	local	2,000000,UniDoc__Comments_size
	local	3,000000,UniDoc__Comments_add
	local	4,000000,UniDoc__Comments_get
	local	5,000000,UniDoc__Comments_newBlock
	local	6,000000,UniDoc__Comments_append
	local	7,000000,UniDoc__Comments_getFirstSentence
	local	8,000000,UniDoc__Comments_initially
	local	9,000000,lang__Object_clone
	local	10,000000,lang__Object_to_string
	local	11,000000,lang__Object_equals
	local	12,000000,lang__Object_hash_code
	local	13,000000,lang__Object_get_class_name
	local	14,000000,lang__Object_get_id
	local	15,000000,lang__Object_get_class
	local	16,000000,lang__Object_is_instance
	local	17,000000,lang__Object_Type
	local	18,000000,lang__Object_instanceOf
	local	19,000000,lang__Object_className
	local	20,000000,lang__Object_invoke
	local	21,000000,lang__Object_getField
	local	22,000000,lang__Object_setField
	local	23,000000,lang__Object_hasField
	local	24,000000,lang__Object_fieldNames
	local	25,000000,lang__Object_genMethods
	local	26,000000,lang__Object_hasMethod
	declend
	line	18
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	line	19
	colm	63
	synt	any
	invoke	25
	line	19
	colm	35
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock_size
	local	0,001000,self
	declend
	filen	UniForm.icn
	line	1145
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	1146
	colm	21
	synt	any
	field	comments
	line	1146
	colm	16
	synt	any
	size
	line	1146
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1147
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock_isLegacy
	local	0,001000,self
	declend
	line	1155
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	0
	line	1156
	colm	21
	synt	any
	field	legacy
	line	1156
	colm	16
	synt	any
	nonnull
	line	1156
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1157
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock_put
	local	0,001000,self
	local	1,001000,newComment
	local	2,000000,match
	local	3,000000,util__lTrim
	local	4,000000,put
	con	0,010000,1,074
	con	1,010000,3,171,145,163
	declend
	line	1162
	colm	11
	synt	any
	mark	L1
	line	1163
	colm	9
	synt	if
	mark0
	pnull
	var	0
	line	1163
	colm	16
	synt	any
	field	firstNonBlank
	line	1163
	colm	30
	synt	any
	invoke	0
	unmark
	line	1164
	colm	13
	synt	ifelse
	mark	L2
	var	2
	str	0
	var	3
	var	1
	line	1164
	colm	38
	synt	any
	invoke	1
	line	1164
	colm	21
	synt	any
	invoke	2
	unmark
	pnull
	pnull
	var	0
	line	1165
	colm	21
	synt	any
	field	legacy
	line	1165
	colm	30
	synt	any
	keywd	null
	line	1165
	colm	28
	synt	any
	asgn
	goto	L3
lab L2
	pnull
	pnull
	var	0
	line	1168
	colm	21
	synt	any
	field	legacy
	str	1
	line	1168
	colm	28
	synt	any
	asgn
lab L3
	line	1164
	colm	13
	synt	endifelse
	line	1163
	colm	9
	synt	endif
	unmark
lab L1
	mark	L4
	var	4
	pnull
	var	0
	line	1171
	colm	19
	synt	any
	field	comments
	var	1
	line	1171
	colm	14
	synt	any
	invoke	2
	unmark
lab L4
	pnull
	line	1172
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock_firstNonBlank
	local	0,001000,self
	local	1,000020,c
	local	2,000000,trim
	con	0,020000,3,040,011,012
	con	1,002000,1,0
	declend
	line	1179
	colm	11
	synt	any
	mark	L1
	line	1182
	colm	9
	synt	every
	mark0
	pnull
	var	1
	pnull
	pnull
	var	0
	line	1182
	colm	25
	synt	any
	field	comments
	line	1182
	colm	20
	synt	any
	bang
	line	1182
	colm	17
	synt	any
	asgn
	pop
	mark0
	line	1183
	colm	13
	synt	if
	mark0
	pnull
	pnull
	var	2
	var	1
	cset	0
	line	1183
	colm	21
	synt	any
	invoke	2
	line	1183
	colm	16
	synt	any
	size
	int	1
	line	1183
	colm	34
	synt	any
	numgt
	unmark
	line	1183
	colm	43
	synt	any
	pfail
	line	1183
	colm	13
	synt	endif
	unmark
lab L2
	efail
lab L3
	line	1182
	colm	9
	synt	endevery
	unmark
lab L1
	mark	L4
	mark	L5
	pnull
	line	1185
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	1186
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock_get
	local	0,001000,self
	declend
	line	1191
	colm	11
	synt	any
	mark	L1
	line	1192
	colm	9
	synt	suspend
	mark0
	pnull
	pnull
	var	0
	line	1192
	colm	22
	synt	any
	field	comments
	line	1192
	colm	17
	synt	any
	bang
	line	1192
	colm	9
	synt	any
	psusp
	pop
lab L2
	efail
lab L3
	line	1192
	colm	9
	synt	endsuspend
	unmark
lab L1
	pnull
	line	1193
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock_getFirstSentence
	local	0,001000,self
	con	0,002000,1,1
	declend
	line	1199
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	pnull
	var	0
	line	1200
	colm	21
	synt	any
	field	comments
	int	0
	line	1200
	colm	30
	synt	any
	subsc
	line	1200
	colm	16
	synt	any
	nonnull
	line	1200
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1201
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock_initially
	local	0,001000,self
	declend
	line	1203
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	1204
	colm	13
	synt	any
	field	comments
	pnull
	line	1204
	colm	24
	synt	any
	llist	0
	line	1204
	colm	22
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	var	0
	line	1205
	colm	13
	synt	any
	field	nextblock
	line	1205
	colm	25
	synt	any
	keywd	null
	line	1205
	colm	23
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	mark	L4
	pnull
	line	1206
	colm	7
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	1207
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlock
	local	0,001000,legacy
	local	1,001000,comments
	local	2,001000,nextblock
	local	3,000020,self
	local	4,000020,clone
	local	5,000000,UniDoc__CommentBlock__oprec
	local	6,000000,UniDoc__CommentBlockinitialize
	local	7,000000,lang__Object__oprec
	local	8,000000,lang__Objectinitialize
	local	9,000000,UniDoc__CommentBlock__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	5
	line	8
	colm	6
	synt	any
	null
	unmark
	var	6
	line	8
	colm	70
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	7
	line	9
	colm	6
	synt	any
	null
	unmark
	var	8
	line	9
	colm	54
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	5
	line	10
	colm	30
	synt	any
	field	lang__Object
	var	7
	line	10
	colm	44
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	3
	var	9
	line	12
	colm	39
	synt	any
	keywd	null
	var	5
	var	0
	var	1
	var	2
	line	12
	colm	38
	synt	any
	invoke	5
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	3
	line	13
	colm	7
	synt	any
	field	__s
	var	3
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	3
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	3
	line	14
	colm	21
	synt	any
	invoke	1
	line	14
	colm	28
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	30
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	3
	line	15
	colm	3
	synt	any
	pret
lab L12
	synt	any
	pfail
	unmark
lab L11
	pnull
	line	16
	colm	1
	synt	any
	pfail
	end
proc UniDoc__CommentBlockinitialize
	local	0,000000,UniDoc__CommentBlock__oprec
	local	1,000000,UniDoc__CommentBlock__methods
	local	2,000000,UniDoc__CommentBlock_size
	local	3,000000,UniDoc__CommentBlock_isLegacy
	local	4,000000,UniDoc__CommentBlock_put
	local	5,000000,UniDoc__CommentBlock_firstNonBlank
	local	6,000000,UniDoc__CommentBlock_get
	local	7,000000,UniDoc__CommentBlock_getFirstSentence
	local	8,000000,UniDoc__CommentBlock_initially
	local	9,000000,lang__Object_clone
	local	10,000000,lang__Object_to_string
	local	11,000000,lang__Object_equals
	local	12,000000,lang__Object_hash_code
	local	13,000000,lang__Object_get_class_name
	local	14,000000,lang__Object_get_id
	local	15,000000,lang__Object_get_class
	local	16,000000,lang__Object_is_instance
	local	17,000000,lang__Object_Type
	local	18,000000,lang__Object_instanceOf
	local	19,000000,lang__Object_className
	local	20,000000,lang__Object_invoke
	local	21,000000,lang__Object_getField
	local	22,000000,lang__Object_setField
	local	23,000000,lang__Object_hasField
	local	24,000000,lang__Object_fieldNames
	local	25,000000,lang__Object_genMethods
	local	26,000000,lang__Object_hasMethod
	declend
	line	18
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	line	19
	colm	71
	synt	any
	invoke	25
	line	19
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
proc UniDoc__getFormType
	local	0,001000,obj
	con	0,010000,13,125,156,151,104,157,143,072,072,125,116,141,155,145
	con	1,010000,15,125,156,151,104,157,143,072,072,125,107,154,157,142,141,154
	con	2,010000,6,147,154,157,142,141,154
	con	3,010000,15,125,156,151,104,157,143,072,072,125,115,145,164,150,157,144
	con	4,010000,6,155,145,164,150,157,144
	con	5,010000,13,125,156,151,104,157,143,072,072,125,120,162,157,143
	con	6,010000,9,160,162,157,143,145,144,165,162,145
	con	7,010000,15,125,156,151,104,157,143,072,072,125,122,145,143,157,162,144
	con	8,010000,6,162,145,143,157,162,144
	con	9,010000,15,125,156,151,104,157,143,072,072,125,111,155,160,157,162,164
	con	10,010000,6,151,155,160,157,162,164
	con	11,010000,13,125,156,151,104,157,143,072,072,125,114,151,156,153
	con	12,010000,4,154,151,156,153
	con	13,010000,14,125,156,151,104,157,143,072,072,125,103,154,141,163,163
	con	14,010000,5,143,154,141,163,163
	con	15,010000,20,125,156,151,104,157,143,072,072,125,103,157,156,163,164,162,165,143,164,157,162
	con	16,010000,11,143,157,156,163,164,162,165,143,164,157,162
	con	17,010000,16,125,156,151,104,157,143,072,072,125,120,141,143,153,141,147,145
	con	18,010000,7,160,141,143,153,141,147,145
	con	19,010000,13,125,156,151,104,157,143,072,072,125,106,151,154,145
	con	20,010000,4,146,151,154,145
	declend
	filen	UniForm.icn
	line	1211
	colm	12
	synt	any
	mark	L1
	mark	L2
	line	1212
	colm	12
	synt	case
	mark0
	pnull
	var	0
	line	1212
	colm	20
	synt	any
	field	className
	line	1212
	colm	30
	synt	any
	invoke	0
	eret
	mark	L4
	ccase
	str	0
	line	1213
	colm	32
	synt	any
	eqv
	unmark
	pop
	pnull
	var	0
	line	1213
	colm	37
	synt	any
	field	getCategory
	line	1213
	colm	49
	synt	any
	invoke	0
	goto	L3
lab L4
	mark	L5
	ccase
	str	1
	line	1214
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	2
	goto	L3
lab L5
	mark	L6
	ccase
	str	3
	line	1215
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	4
	goto	L3
lab L6
	mark	L7
	ccase
	str	5
	line	1216
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	6
	goto	L3
lab L7
	mark	L8
	ccase
	str	7
	line	1217
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	8
	goto	L3
lab L8
	mark	L9
	ccase
	str	9
	line	1218
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	10
	goto	L3
lab L9
	mark	L10
	ccase
	str	11
	line	1219
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	12
	goto	L3
lab L10
	mark	L11
	ccase
	str	13
	line	1220
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	14
	goto	L3
lab L11
	mark	L12
	ccase
	str	15
	line	1221
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	16
	goto	L3
lab L12
	mark	L13
	ccase
	str	17
	line	1222
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	18
	goto	L3
lab L13
	mark	L14
	ccase
	str	19
	line	1223
	colm	32
	synt	any
	eqv
	unmark
	pop
	str	20
	goto	L3
lab L14
	efail
lab L3
	line	1212
	colm	12
	synt	endcase
	line	1212
	colm	5
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1225
	colm	1
	synt	any
	pfail
	end
