polserver/testsuite/escript/array/array18.src

15 lines
222 B
Text
Raw Permalink Normal View History

program foo()
var i:=1;
var a1 := array{i};
var a2 := array{};
var a3 := array{};
a2.append(i);
a2.insert(i,i);
a3[i]:=i;
i+=1;
print(i);
print(a1); // arrays should not change
print(a2);
print(a3);
endprogram