Parcourir la source

* Force I/O checking

git-svn-id: trunk@6793 -
daniel il y a 18 ans
Parent
commit
0fdd8110c7
1 fichiers modifiés avec 2 ajouts et 0 suppressions
  1. 2 0
      tests/tbs/tb0532.pp

+ 2 - 0
tests/tbs/tb0532.pp

@@ -9,6 +9,8 @@ program tb0532;
   - Reset doesn't allow writing to the device.
 }
 
+{$I+}
+
 var null:text;
 
 begin