Pārlūkot izejas kodu

* compiles with 1.1

Jonas Maebe 25 gadi atpakaļ
vecāks
revīzija
11ab2b888a
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      tests/test/trange2.pp

+ 1 - 1
tests/test/trange2.pp

@@ -15,7 +15,7 @@ begin
     writeln('caught 1!');
     inc(n);
   end;
-  longint(c) := $ffffffff;
+  c := cardinal($ffffffff);
   try
     l := c;
   except