summaryrefslogtreecommitdiff
path: root/utils
diff options
context:
space:
mode:
authorNicolas Trangez <ikke@nicolast.be>2014-04-23 21:14:23 +0200
committerAustin Seipp <austin@well-typed.com>2014-04-27 04:21:25 -0500
commitf17dcf09a5797bbefe22aef7d4c508d1672484df (patch)
tree644c33407bfc28b057818d1c2a405d601f50b504 /utils
parent6ed7123dcc24c343a1ece85c7aa72ac1c34e6aff (diff)
downloadhaskell-f17dcf09a5797bbefe22aef7d4c508d1672484df.tar.gz
Fix memleak in hp2ps
Issue discovered by Coverity scan, CID 43167. Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'utils')
-rw-r--r--utils/hp2ps/HpFile.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/utils/hp2ps/HpFile.c b/utils/hp2ps/HpFile.c
index bdbf201503..5ee9cc259e 100644
--- a/utils/hp2ps/HpFile.c
+++ b/utils/hp2ps/HpFile.c
@@ -423,6 +423,8 @@ GetString(FILE *infp)
stringbuffer[i] = '\0';
thestring = copystring(stringbuffer);
+ free(stringbuffer);
+
ASSERT(ch == '\"');
ch = getc(infp); /* skip the '\"' that terminates the string */