jrod2 start 0
aa	word-num 10
bb	word-chr 'a'
cc	or-ac	10
dd	land-ac =10
ee	abs-ac aa
:testing abs-ir (has a special ref_type; IARn)
	abs-ir	10
	abs-ir	cc	
	abs-ir  =50
	abs-ir  -10
	abs-ir	'aaa'
	jmp dd :jump back
	jmp ff :jump forward
ff	or-ir	6
gg	end