File:  [CSRG BSD Unix] / 43BSD / contrib / icon / test / distr / set02.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

every s1 := insert(set([]),!&lcase) ----> none
s2 := set(["a","aa","ab","b",1,2,3,4]) ----> set(8)
s3 := s1 ++ s2 ----> set(32)
s4 := s1 ** s2 ----> set(2)
s5 := s1 -- s2 ----> set(24)
*s3 ----> 32
n
1
o
2
p
3
q
4
r
s
t
u
v
w
x
y
aa
z
ab
a
b
c
d
e
f
g
h
i
j
k
l
m
every write(!s3) ----> none
*s4 ----> 2
a
b
every write(!s4) ----> none
*s5 ----> 24
n
o
p
q
r
s
t
u
v
w
x
y
z
c
d
e
f
g
h
i
j
k
l
m
every write(!s5) ----> none
Run-time error 119 at line 20 in set02.icn
set expected
offending value: 'a'

unix.superglobalmegacorp.com

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