Return to expr30.out CVS log

Up to [Research Unix] / researchv10dc / cmd / icon / tests / stand

researchv10 Dan Cross

x := [] ----> list(0)
*x ----> 0
every push(x,1 to 10) ----> none
10
9
8
7
6
5
4
3
2
1
every 1 to 10 do write(pop(x)) ----> none
*x ----> 0
pop(x) ----> none
pull(x) ----> none
get(x) ----> none
every put(x,1 to 10) ----> none
1
2
3
4
5
6
7
8
9
10
every 1 to 10 do write(get(x)) ----> none
every push(x,1 to 10) ----> none
1
2
3
4
5
6
7
8
9
10
every 1 to 10 do write(pull(x)) ----> none
Run-time error 108 at line 21 in expr30.icn
list expected
offending value: &null

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