Browse Source

* Fixed bug where the original index of a call
para wasn't copied over during "DoGetCopy"

J. Gareth "Curious Kit" Moreton 1 year ago
parent
commit
83f383e004
1 changed files with 1 additions and 0 deletions
  1. 1 0
      compiler/ncal.pas

+ 1 - 0
compiler/ncal.pas

@@ -1022,6 +1022,7 @@ implementation
            initcopy:=fparainit.getcopy;
          n:=tcallparanode(inherited dogetcopy);
          n.callparaflags:=callparaflags;
+         n.originalindex:=originalindex;
          n.parasym:=parasym;
          n.fparainit:=initcopy;
          if assigned(fparacopyback) then