Parcourir la source

+ Corrected number of arguments

michael il y a 25 ans
Parent
commit
337fd20683
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. 1 1
      docs/linuxex/ex2.pp

+ 1 - 1
docs/linuxex/ex2.pp

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