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

* 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;