diff options
| author | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2010-01-03 19:26:21 +0100 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2010-01-03 19:26:21 +0100 |
| commit | 11b4760a97865a796e63cb71b7cbda71a480e336 (patch) | |
| tree | 49a26dcdc0f842a792a9f3e5792ca1d636d5a245 /USearch.pas | |
| parent | ff6b0244b39ccdb30a499038382d2676d9c278be (diff) | |
| download | tuxcmd-11b4760a97865a796e63cb71b7cbda71a480e336.tar.xz | |
Search: Don't leak data item
Diffstat (limited to 'USearch.pas')
| -rw-r--r-- | USearch.pas | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/USearch.pas b/USearch.pas index edf4403..6e8f362 100644 --- a/USearch.pas +++ b/USearch.pas @@ -1002,7 +1002,8 @@ begin end; end; - if not Matches then libc_free(LocalList[i]); + if not Matches then + FreeDataItem(PDataItem(LocalList[i])); end; end; LocalList.Free; |