Browse Source

+ added System.SelectorInc to the msdos rtl (BP7 compatibility)

git-svn-id: trunk@27497 -
nickysn 11 years ago
parent
commit
626000e50d
1 changed files with 3 additions and 0 deletions
  1. 3 0
      rtl/msdos/system.pp

+ 3 - 0
rtl/msdos/system.pp

@@ -47,6 +47,9 @@ const
   segA000: Word = $A000;
   segA000: Word = $A000;
   segB000: Word = $B000;
   segB000: Word = $B000;
   segB800: Word = $B800;
   segB800: Word = $B800;
+{ The value that needs to be added to the segment to move the pointer by
+  64K bytes (BP7 compatibility) }
+  SelectorInc: Word = $1000;
 
 
 var
 var
 { Mem[] support }
 { Mem[] support }