tock-mirror/testcases/slices.occ

22 lines
363 B
Plaintext

PROC A ([]INT unsized)
SKIP
:
PROC B ([5]INT sized)
SKIP
:
PROC P ()
[20]INT foo:
SEQ
A (foo)
A ([foo FROM 10 FOR 5])
A ([foo FOR 12])
A ([foo FROM 12])
B ([foo FOR 5])
[]INT a IS [foo FROM 10 FOR 3]:
SKIP
VAL []INT v IS [foo FROM 10 FOR 3]:
SKIP
VAL INT nasty IS [[[foo FROM 1] FOR 3] FROM 1 FOR 2][1]:
SKIP
: