30 lines
446 B
Plaintext
30 lines
446 B
Plaintext
-- This file tests simple array uses without replication
|
|
-- Four unknown variables are available; x, y, z.
|
|
-- Two arrays are automatically declared; a (size 10) and b (size 12)
|
|
|
|
PROC p(INT x, y, z)
|
|
[10]INT a:
|
|
[12]INT b:
|
|
PAR
|
|
%%
|
|
:
|
|
|
|
PROC m()
|
|
SKIP
|
|
:
|
|
|
|
%PASS Distinct constants
|
|
a[0] := 3
|
|
a[1] := 4
|
|
a[4] := 5
|
|
|
|
%FAIL Identical constants
|
|
a[0] := 3
|
|
a[0] := 4
|
|
|
|
%PASS Same constant, different array
|
|
a[0] := 3
|
|
b[0] := 4
|
|
|
|
%
|