Pārlūkot izejas kodu

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

J. Gareth "Curious Kit" Moreton 1 gadu atpakaļ
vecāks
revīzija
83f383e004
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  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