Преглед на файлове

* Initialize firstwaiting, after remark by Pierre

Michaël Van Canneyt преди 1 година
родител
ревизия
2e6c3b060d
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      compiler/fmodule.pas

+ 1 - 0
compiler/fmodule.pas

@@ -1072,6 +1072,7 @@ implementation
     function tmodule.nowaitingforunits(out firstwaiting : tmodule): Boolean;
 
       begin
+        firstwaiting:=nil;
         Result:=waitingforunit.count=0;
         If not Result then
           firstwaiting:=tmodule(waitingforunit[0]);