tab := create {write("entering tab"); 1 | 2 | 3} ----> co-expression(0)
trim := create {write("entering trim"); @tab | (main @:= tab)} ----> co-expression(0)
entering trim
entering tab
@trim ----> 1
@trim ----> 2
co-expression(2)
write(image(trim)) ----> "co-expression(2)"
co-expression(2)
write(image(tab)) ----> "co-expression(2)"
2
write(image(main)) ----> "2"
Run-time error 118 at line 16 in std84.icn
co-expression expected
offending value: 2