Explorar o código

* fixed uninitialized result of handle_typed_read_write in
case no error occurred

git-svn-id: trunk@6802 -

Jonas Maebe %!s(int64=18) %!d(string=hai) anos
pai
achega
3b3060cec5
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  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 }