Quellcode durchsuchen

* fixed uninitialized result of handle_typed_read_write in
case no error occurred

git-svn-id: trunk@6802 -

Jonas Maebe vor 18 Jahren
Ursprung
Commit
3b3060cec5
1 geänderte Dateien mit 1 neuen und 0 gelöschten Zeilen
  1. 1 0
      compiler/ninl.pas

+ 1 - 0
compiler/ninl.pas

@@ -737,6 +737,7 @@ implementation
         temp:Ttempcreatenode;
 
     begin
+      found_error:=false;
       para:=Tcallparanode(params);
       do_read:=inlinenumber in [in_read_x,in_readln_x];
       { add the typesize to the filepara }