4.3BSD/usr/contrib/icon/test/distr/std60.out

&subject := string(&lcase) ----> "abcdefghijklmnopqrstuvwxyz"
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
u
v
w
x
y
z
while write(move(1)) ----> none
&subject := string(&lcase) ----> "abcdefghijklmnopqrstuvwxyz"

a
ab
abc
abcd
abcde
abcdef
abcdefg
abcdefgh
abcdefghi
every write(tab(1 to 10)) ----> none
pos(0) ----> none
pos(15) ----> none
&subject := string(&lcase) ----> "abcdefghijklmnopqrstuvwxyz"
pos(1) ----> 1
Run-time error 101 at line 17 in std60.icn
integer expected
offending value: "a"