administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

fix in test suite

Browse source
This commit is contained in:
Бондарев Иван 2015-12-30 11:20:59 +01:00
parent 488f5f91e3
commit 6c06a603de
4 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
TestSuite/arrayofpointer1.pas
View file

@ -1,3 +1,4 @@
//winonly
var s : string[10];
arr : array of pinteger;
i : integer;

2
TestSuite/multiarrays1.pas
View file

@ -17,7 +17,7 @@ begin
SetLength(arr,1,1);
assert(arr[0,0]=17);
SetLength(arr5,2,3);
arr5[1,1] := @arr;
//arr5[1,1] := @arr;
SetLength(arr2,3,4,3);
arr2[1,2,1] := 50;

1
TestSuite/units/u_arrayofpointer1.pas
View file

@ -1,3 +1,4 @@
//winonly
unit u_arrayofpointer1;
var s : string[10];
arr : array of pinteger;

1
TestSuite/usesunits/use_arrayofpointer1.pas
View file

@ -1 +1,2 @@
//winonly
uses u_arrayofpointer1; begin end.