From 7ec5ab2e48a3d227ddb191dc2fa4ae183dcec623 Mon Sep 17 00:00:00 2001
From: Paul Eggert <eggert@cs.ucla.edu>
Date: Mon, 3 Jan 2005 07:52:31 +0000
Subject: [PATCH] (<<EOF>>): Don't close standard output. Problem reported by
 Hans Aberg.

---
 src/scan-skel.l | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/scan-skel.l b/src/scan-skel.l
index d860c08a..7ac27c6e 100644
--- a/src/scan-skel.l
+++ b/src/scan-skel.l
@@ -83,7 +83,14 @@ int skel_lex (void);
 \n	   lineno++; ECHO;
 [^@\n]+	   ECHO;
 
-<<EOF>>	   free (outname); xfclose (yyout); return EOF;
+<<EOF>> {
+  if (outname)
+    {
+      free (outname);
+      xfclose (yyout);
+    }
+  return EOF;
+}
 %%
 
 /*------------------------.
-- 
2.47.2