File:  [CSRG BSD Unix] / 43BSD / contrib / icon / test / distr / std84.out
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 16:12:55 2018 UTC (8 years, 1 month ago) by root
Branches: MAIN, BSD
CVS tags: HEAD, BSD43
BSD 4.3

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

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.