version	U12.1.00
uid	process.u1-1786033037-0
record	lang__Process__state,4
	0,__s
	1,__m
	2,pid
	3,runnable
record	lang__Process__methods,9
	0,start
	1,join
	2,stop
	3,sleep
	4,invoke_run
	5,set_runnable
	6,initially
	7,run
	8,lang__Runnable
impl	local
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/runnable.u
link	posix.u
invocable	posix_rusage
invocable	posix_message
invocable	posix_lock
invocable	posix_servent
invocable	posix_hostent
invocable	posix_timeval
invocable	posix_group
invocable	posix_passwd
invocable	posix_stat
global	13
	0,000005,lang__Process_start,1
	1,000005,lang__Process_join,1
	2,000005,lang__Process_stop,1
	3,000005,lang__Process_sleep,2
	4,000005,lang__Process_invoke_run,1
	5,000005,lang__Process_set_runnable,2
	6,000005,lang__Process_initially,2
	7,000011,lang__Process__state,4
	8,000011,lang__Process__methods,9
	9,000001,lang__Process__oprec,0
	10,000001,lang__Runnable__oprec,0
	11,000005,lang__Process,1
	12,000005,lang__Processinitialize,0

proc lang__Process_start
	local	0,001000,self
	local	1,000000,fork
	local	2,000000,stop
	local	3,000000,exit
	con	0,010000,13,103,157,165,154,144,156,047,164,040,146,157,162,153
	con	1,002000,1,0
	declend
	filen	process.icn
	line	24
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	25
	colm	11
	synt	any
	field	pid
	mark	L2
	var	1
	line	25
	colm	21
	synt	any
	invoke	0
	line	25
	colm	23
	synt	any
	esusp
	goto	L3
lab L2
	var	2
	str	0
	line	25
	colm	31
	synt	any
	invoke	1
lab L3
	line	25
	colm	15
	synt	any
	asgn
	unmark
lab L1
	mark	L4
	line	26
	colm	7
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	26
	colm	14
	synt	any
	field	pid
	int	1
	line	26
	colm	18
	synt	any
	numeq
	unmark
	mark	L5
	pnull
	var	0
	line	27
	colm	14
	synt	any
	field	invoke_run
	line	27
	colm	25
	synt	any
	invoke	0
	unmark
lab L5
	var	3
	int	1
	line	28
	colm	16
	synt	any
	invoke	1
	line	26
	colm	7
	synt	endif
	unmark
lab L4
	pnull
	line	30
	colm	1
	synt	any
	pfail
	end
proc lang__Process_join
	local	0,001000,self
	local	1,000000,wait
	declend
	line	36
	colm	11
	synt	any
	mark	L1
	var	1
	pnull
	var	0
	line	37
	colm	18
	synt	any
	field	pid
	line	37
	colm	13
	synt	any
	invoke	1
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	38
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	39
	colm	1
	synt	any
	pfail
	end
proc lang__Process_stop
	local	0,001000,self
	local	1,000000,kill
	con	0,010000,7,123,111,107,124,105,122,115
	declend
	line	44
	colm	11
	synt	any
	mark	L1
	var	1
	pnull
	var	0
	line	45
	colm	18
	synt	any
	field	pid
	str	0
	line	45
	colm	13
	synt	any
	invoke	2
	unmark
lab L1
	mark	L2
	pnull
	var	0
	line	46
	colm	11
	synt	any
	field	join
	line	46
	colm	16
	synt	any
	invoke	0
	unmark
lab L2
	pnull
	line	47
	colm	1
	synt	any
	pfail
	end
proc lang__Process_sleep
	local	0,001000,self
	local	1,001000,n
	local	2,000000,delay
	declend
	line	52
	colm	11
	synt	any
	mark	L1
	mark	L2
	var	2
	pnull
	var	1
	line	53
	colm	22
	synt	any
	nonnull
	line	53
	colm	21
	synt	any
	invoke	1
	line	53
	colm	7
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	54
	colm	1
	synt	any
	pfail
	end
proc lang__Process_invoke_run
	local	0,001000,self
	declend
	line	60
	colm	11
	synt	any
	mark	L1
	line	61
	colm	7
	synt	ifelse
	mark	L2
	pnull
	pnull
	var	0
	line	61
	colm	15
	synt	any
	field	runnable
	line	61
	colm	10
	synt	any
	null
	unmark
	pnull
	var	0
	line	62
	colm	14
	synt	any
	field	run
	line	62
	colm	18
	synt	any
	invoke	0
	goto	L3
lab L2
	pnull
	pnull
	var	0
	line	64
	colm	14
	synt	any
	field	runnable
	line	64
	colm	23
	synt	any
	field	run
	line	64
	colm	27
	synt	any
	invoke	0
lab L3
	line	61
	colm	7
	synt	endifelse
	unmark
lab L1
	pnull
	line	65
	colm	1
	synt	any
	pfail
	end
proc lang__Process_set_runnable
	local	0,001000,self
	local	1,001000,r
	declend
	line	71
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	72
	colm	11
	synt	any
	field	runnable
	var	1
	line	72
	colm	21
	synt	any
	asgn
	unmark
lab L1
	pnull
	line	73
	colm	1
	synt	any
	pfail
	end
proc lang__Process_initially
	local	0,001000,self
	local	1,001000,r
	declend
	line	75
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	76
	colm	11
	synt	any
	field	runnable
	var	1
	line	76
	colm	21
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	line	77
	colm	7
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	78
	colm	1
	synt	any
	pfail
	end
proc lang__Process
	local	0,001000,r
	local	1,000020,self
	local	2,000020,clone
	local	3,000000,lang__Process__oprec
	local	4,000000,lang__Processinitialize
	local	5,000000,lang__Runnable__oprec
	local	6,000000,lang__Runnableinitialize
	local	7,000000,lang__Process__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	3
	line	8
	colm	6
	synt	any
	null
	unmark
	var	4
	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	5
	line	9
	colm	6
	synt	any
	null
	unmark
	var	6
	line	9
	colm	58
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	3
	line	10
	colm	23
	synt	any
	field	lang__Runnable
	var	5
	line	10
	colm	39
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	1
	var	7
	line	12
	colm	32
	synt	any
	keywd	null
	var	3
	line	12
	colm	31
	synt	any
	invoke	2
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	1
	line	13
	colm	7
	synt	any
	field	__s
	var	1
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	1
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	1
	var	0
	line	14
	colm	21
	synt	any
	invoke	2
	line	14
	colm	30
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	32
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	1
	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 lang__Processinitialize
	local	0,000000,lang__Process__oprec
	local	1,000000,lang__Process__methods
	local	2,000000,lang__Process_start
	local	3,000000,lang__Process_join
	local	4,000000,lang__Process_stop
	local	5,000000,lang__Process_sleep
	local	6,000000,lang__Process_invoke_run
	local	7,000000,lang__Process_set_runnable
	local	8,000000,lang__Process_initially
	local	9,000000,lang__Runnable_run
	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
	line	19
	colm	57
	synt	any
	invoke	8
	line	19
	colm	32
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
