Переглянути джерело

* test compilatio fixed for 64 bit targets

florian 21 роки тому
батько
коміт
8766f848d8
1 змінених файлів з 2 додано та 2 видалено
  1. 2 2
      tests/test/tmt1.pp

+ 2 - 2
tests/test/tmt1.pp

@@ -28,7 +28,7 @@ var
 threadvar
    thri : longint;
 
-function f(p : pointer) : longint;
+function f(p : pointer) : ptrint;
   var
      s : ansistring;
   begin
@@ -45,7 +45,7 @@ function f(p : pointer) : longint;
   end;
 
 var
-   i : longint;
+   i : ptrint;
 begin
    finished:=0;