From f3671e55dbe14d847095fce4e4860c9636409d81 Mon Sep 17 00:00:00 2001
From: Ryan Stecker <voidedweasel@gmail.com>
Date: Tue, 22 Jul 2014 17:33:26 -0500
Subject: [PATCH] Close file handle on success in pc_opensrc.

---
 sourcepawn/compiler/libpawnc.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/sourcepawn/compiler/libpawnc.c b/sourcepawn/compiler/libpawnc.c
index 2751a284..f0953d9e 100644
--- a/sourcepawn/compiler/libpawnc.c
+++ b/sourcepawn/compiler/libpawnc.c
@@ -148,6 +148,7 @@ void *pc_opensrc(char *filename)
 
 	src->pos = src->buffer;
 	src->end = src->buffer + length;
+	fclose(fp);
 	return src;
 
 err: