Преглед изворни кода

+ Corrected number of arguments

michael пре 25 година
родитељ
комит
337fd20683
1 измењених фајлова са 1 додато и 1 уклоњено
  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);