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

Fix compilation for EMX

git-svn-id: trunk@37016 -
pierre 8 роки тому
батько
коміт
f395d83db5
1 змінених файлів з 3 додано та 3 видалено
  1. 3 3
      packages/rtl-console/src/emx/crt.pp

+ 3 - 3
packages/rtl-console/src/emx/crt.pp

@@ -367,7 +367,7 @@ begin
     gotoXY(1,1);
 end;
 
-procedure gotoXY(x,y:byte);
+procedure gotoXY(x,y:tcrtcoord);
 
 {Positions the cursor on (x,y) relative to the window origin.}
 
@@ -383,7 +383,7 @@ begin
     setcursor(y+hi(windmin)-1,x+lo(windmin)-1);
 end;
 
-function whereX:byte;
+function whereX:tcrtcoord;
 
 {Returns the x position of the cursor.}
 
@@ -394,7 +394,7 @@ begin
     whereX:=x-lo(windmin)+1;
 end;
 
-function whereY:byte;
+function whereY:tcrtcoord;
 
 {Returns the y position of the cursor.}