Kaynağa Gözat

pastojs: fixed pass ClassInstVar to IntfType

mattias 2 yıl önce
ebeveyn
işleme
e2d9bdff4a
1 değiştirilmiş dosya ile 1 ekleme ve 0 silme
  1. 1 0
      packages/pastojs/src/fppas2js.pp

+ 1 - 0
packages/pastojs/src/fppas2js.pp

@@ -26680,6 +26680,7 @@ begin
                 Result:=Call;
                 Result:=Call;
                 Call.AddArg(CreateReferencePathExpr(ArgTypeEl,AContext));
                 Call.AddArg(CreateReferencePathExpr(ArgTypeEl,AContext));
                 Call:=CreateIntfRef(Call,AContext,El);
                 Call:=CreateIntfRef(Call,AContext,El);
+                Result:=Call;
                 end;
                 end;
               citCorba:
               citCorba:
                 begin
                 begin