Explorar o código

* load sysutils unit by command line parameter so the unsupported uses in iso mode is avoided

git-svn-id: trunk@22511 -
florian %!s(int64=13) %!d(string=hai) anos
pai
achega
01fcc389be
Modificáronse 1 ficheiros con 1 adicións e 2 borrados
  1. 1 2
      tests/webtbs/tw17685.pp

+ 1 - 2
tests/webtbs/tw17685.pp

@@ -1,8 +1,7 @@
+{ %opt=-Fasysutils}
 {$mode iso}
 {$modeswitch exceptions+}
 program modulo( Output);
-uses
-  sysutils;
 var
   i, j, m : integer;
 begin