[pschweitzer] 54030: [COMP] Fix resource leak

Author: pschweitzer
Date: Thu Oct  6 20:13:54 2011
New Revision: 54030

URL: http://svn.reactos.org/svn/reactos?rev=54030&view=rev
Log:
[COMP]
Fix resource leak

Modified:
    trunk/rosapps/applications/cmdutils/comp/comp.c

Modified: trunk/rosapps/applications/cmdutils/comp/comp.c
URL: http://svn.reactos.org/svn/reactos/trunk/rosapps/applications/cmdutils/comp/...
==============================================================================
--- trunk/rosapps/applications/cmdutils/comp/comp.c [iso-8859-1] (original)
+++ trunk/rosapps/applications/cmdutils/comp/comp.c [iso-8859-1] Thu Oct  6 20:13:54 2011
@@ -149,6 +149,7 @@
     if ((fp2 = fopen(File2, "r")) == NULL)
     {
         _tprintf(_T("Can't find/open file: %s\n"), File2);
+        fclose(fp1);
         return EXIT_FAILURE;
     }