Explorar o código

+ Corrected example

michael %!s(int64=25) %!d(string=hai) anos
pai
achega
4d006e2dcb
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      docs/linuxex/ex53.pp

+ 1 - 1
docs/linuxex/ex53.pp

@@ -7,7 +7,7 @@ Uses linux;
 Var Info : Stat;
 
 begin
-  if FStat (paramstr(1),info) then
+  if LStat (paramstr(1),info) then
     begin
     if S_ISLNK(info.mode) then 
       Writeln ('File is a link');