Forráskód Böngészése

* fixed bug in the test :)

Jonas Maebe 25 éve
szülő
commit
74fd7fb141
1 módosított fájl, 2 hozzáadás és 2 törlés
  1. 2 2
      tests/testopt/testcse2.pp

+ 2 - 2
tests/testopt/testcse2.pp

@@ -3,7 +3,7 @@
 
 type
   tsubr = 1..100000;
-  tarr = array[1..10] of longint;
+  tarr = array[1..100000] of longint;
 
 function test(b: tsubr): longint;
 begin
@@ -69,4 +69,4 @@ begin
       halt(1);
     end;
   freemem(p,4);
-end.
+end.