From 672ff1d8633702664524035ed2b27a5349b0fa0c Mon Sep 17 00:00:00 2001 From: nickysn Date: Thu, 3 Sep 2015 13:40:00 +0000 Subject: [PATCH] * fixed memleak after r31487 git-svn-id: trunk@31492 - --- compiler/x86/agx86nsm.pas | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/compiler/x86/agx86nsm.pas b/compiler/x86/agx86nsm.pas index 53a908d523..ffce7acd0b 100644 --- a/compiler/x86/agx86nsm.pas +++ b/compiler/x86/agx86nsm.pas @@ -51,6 +51,7 @@ interface function double2str(d: double): string; override; function extended2str(e: extended): string; override; public + destructor Destroy;override; procedure WriteTree(p:TAsmList);override; procedure WriteAsmList;override; procedure WriteExternals; @@ -145,6 +146,14 @@ interface end; + destructor TX86NasmAssembler.Destroy; + begin + FSectionsUsed.Free; + FSectionsInDGROUP.Free; + inherited Destroy; + end; + + function sizestr(s:topsize;dest:boolean):string; begin case s of