Browse Source

* Active out support using $modeswitch under Haiku after r14965

git-svn-id: trunk@14989 -
olivier 15 years ago
parent
commit
27c99a7e13
1 changed files with 2 additions and 1 deletions
  1. 2 1
      rtl/haiku/baseunix.pp

+ 2 - 1
rtl/haiku/baseunix.pp

@@ -15,6 +15,7 @@
 Unit BaseUnix;
 Unit BaseUnix;
 
 
 Interface
 Interface
+{$modeswitch out}
 {$inline on}
 {$inline on}
 Uses UnixType;
 Uses UnixType;
 
 
@@ -155,4 +156,4 @@ begin
   end;
   end;
 end;
 end;
 
 
-end.
+end.