浏览代码

* intr and msdos for non i386 targets disabled

florian 21 年之前
父节点
当前提交
4fbee8aafc
共有 1 个文件被更改,包括 2 次插入0 次删除
  1. 2 0
      rtl/inc/dosh.inc

+ 2 - 0
rtl/inc/dosh.inc

@@ -68,9 +68,11 @@ Type
 Var
 Var
   DosError : integer;
   DosError : integer;
 
 
+{$ifdef cpui386}
 {Interrupt}
 {Interrupt}
 Procedure Intr(intno: byte; var regs: registers);
 Procedure Intr(intno: byte; var regs: registers);
 Procedure MSDos(var regs: registers);
 Procedure MSDos(var regs: registers);
+{$endif cpui386}
 
 
 {Info/Date/Time}
 {Info/Date/Time}
 Function  DosVersion: Word;
 Function  DosVersion: Word;