Browse Source

* fixed glob, which did not reset the root

peter 27 years ago
parent
commit
ceb5ab1430
1 changed files with 6 additions and 1 deletions
  1. 6 1
      rtl/linux/linux.pp

+ 6 - 1
rtl/linux/linux.pp

@@ -3097,6 +3097,8 @@ begin
    end;
    end;
 {get the entries}
 {get the entries}
   new(root);
   new(root);
+  root^.next:=nil;
+  root^.name:=nil;
   run:=root;
   run:=root;
   repeat
   repeat
     buffer:=Sys_readdir(thedir);
     buffer:=Sys_readdir(thedir);
@@ -3513,7 +3515,10 @@ End.
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.22  1998-10-23 00:05:32  peter
+  Revision 1.23  1998-10-30 15:47:11  peter
+    * fixed glob, which did not reset  the root
+
+  Revision 1.22  1998/10/23 00:05:32  peter
     * getenv with envp=nil check
     * getenv with envp=nil check
 
 
   Revision 1.21  1998/10/15 08:31:11  peter
   Revision 1.21  1998/10/15 08:31:11  peter