Explorar o código

* Force I/O checking

git-svn-id: trunk@6793 -
daniel %!s(int64=18) %!d(string=hai) anos
pai
achega
0fdd8110c7
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  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