diff --git a/compiler/src/main/pascal/uCodeGenQBE.pas b/compiler/src/main/pascal/uCodeGenQBE.pas index 7496b2c..d47a084 100644 --- a/compiler/src/main/pascal/uCodeGenQBE.pas +++ b/compiler/src/main/pascal/uCodeGenQBE.pas @@ -9970,7 +9970,7 @@ begin EmitFieldCleanupFn(GI.TypeName, RT); end; EmitFFIRecordTypeDecls; - FOutput.AppendBuffer(Body); + FOutput.AppendBuffer(Body); finally Body.Free; end; @@ -10346,7 +10346,7 @@ begin EmitLocalArrayConstsInUnit(AUnit); EmitFFIRecordTypeDecls; - FOutput.AppendBuffer(Body); + FOutput.AppendBuffer(Body); { Initialization section: emit as export function $_init() } if (AUnit.InitStmts <> nil) and (AUnit.InitStmts.Count > 0) then