Selaa lähdekoodia

+ Corrected number of arguments

michael 25 vuotta sitten
vanhempi
commit
337fd20683
1 muutettua tiedostoa jossa 1 lisäystä ja 1 poistoa
  1. 1 1
      docs/linuxex/ex2.pp

+ 1 - 1
docs/linuxex/ex2.pp

@@ -8,7 +8,7 @@ Var TV : TimeVal;
     TZ : TimeZone;
     TZ : TimeZone;
 
 
 begin
 begin
-  GetTimeOfDay (TV,TZ);
+  GetTimeOfDay (TV);
   Writeln ('Seconds              : ',tv.sec);
   Writeln ('Seconds              : ',tv.sec);
   Writeln ('Milliseconds         : ',tv.usec);
   Writeln ('Milliseconds         : ',tv.usec);
   Writeln ('Minutes west of GMT  : ',tz.minuteswest);
   Writeln ('Minutes west of GMT  : ',tz.minuteswest);