Jelajahi Sumber

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

git-svn-id: trunk@22511 -
florian 13 tahun lalu
induk
melakukan
01fcc389be
1 mengubah file dengan 1 tambahan dan 2 penghapusan
  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