proc main
	local	0,000000,write
	declend
	filen	hello.icn
	line	1
	mark	L1
	var	0
	line	2
	keywd	35
	invoke	1
	unmark
lab L1
	mark	L2
	var	0
	line	3
	keywd	17
	invoke	1
	unmark
lab L2
	mark	L3
	mark0
	var	0
	line	4
	keywd	15
	invoke	1
	pop
lab L4
	efail
lab L5
	unmark
lab L3
	pnull
	line	5
	pfail
	end