Преглед изворни кода

* fix tx64tryfinallynode.dogetcopy

florian пре 2 недеља
родитељ
комит
e5a64ee521
1 измењених фајлова са 1 додато и 0 уклоњено
  1. 1 0
      compiler/x86_64/nx64flw.pas

+ 1 - 0
compiler/x86_64/nx64flw.pas

@@ -213,6 +213,7 @@ function tx64tryfinallynode.dogetcopy: tnode;
           begin
             n.finalizepi.code:=finalizepi.code.getcopy;
             n.right:=ccallnode.create(nil,tprocsym(n.finalizepi.procdef.procsym),nil,nil,[],nil);
+            firstpass(n.right);
           end;
       end;
     result:=n;