소스 검색

* use a farpointer on i8086 in the getintvec and setintvec generic "do nothing"
implementation to match the interface declaration in dosh.inc

git-svn-id: trunk@31888 -

nickysn 10 년 전
부모
커밋
7f086bb154
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      rtl/inc/dos.inc

+ 2 - 2
rtl/inc/dos.inc

@@ -151,7 +151,7 @@ end;
 
 
 
 
 {$IFNDEF HAS_GETINTVEC}
 {$IFNDEF HAS_GETINTVEC}
-procedure GetIntVec (IntNo: byte; var Vector: pointer);
+procedure GetIntVec (IntNo: byte; var Vector: {$ifdef cpui8086}farpointer{$else}pointer{$endif});
 begin
 begin
   Vector := nil;
   Vector := nil;
 end;
 end;
@@ -159,7 +159,7 @@ end;
 
 
 
 
 {$IFNDEF HAS_SETINTVEC}
 {$IFNDEF HAS_SETINTVEC}
-procedure SetIntVec (IntNo: byte; Vector: pointer);
+procedure SetIntVec (IntNo: byte; Vector: {$ifdef cpui8086}farpointer{$else}pointer{$endif});
 begin
 begin
 end;
 end;
 {$ENDIF HAS_SETINTVEC}
 {$ENDIF HAS_SETINTVEC}