tag 403110 patch fixed-upstream thanks Hi Ian,
I have prepared a minimal patch to fix this bug. If you are OK with this patch I can do a NMU. The patch is attached. Greetings Arjan
diff -u cpphs-0.7/debian/changelog cpphs-0.7/debian/changelog
--- cpphs-0.7/debian/changelog
+++ cpphs-0.7/debian/changelog
@@ -1,3 +1,11 @@
+cpphs (0.7-3.1) unstable; urgency=high
+
+ * Non-maintainer upload.
+ * Cpphs.hs: Backport fix from cpphs 0.9 to flush output. (Closes:
+ #403110)
+
+ -- Arjan Oosting <[EMAIL PROTECTED]> Fri, 15 Dec 2006 13:48:13 +0100
+
cpphs (0.7-3) unstable; urgency=low
* Compile with GHC on all platforms so we don't get the file encoding
only in patch2:
unchanged:
--- cpphs-0.7.orig/Cpphs.hs
+++ cpphs-0.7/Cpphs.hs
@@ -9,7 +9,7 @@
import System (exitWith, ExitCode(..))
import List (isPrefixOf)
import Monad (when)
-import IO (stdout, IOMode(WriteMode), openFile, hPutStr)
+import IO (stdout, IOMode(WriteMode), openFile, hPutStr, hFlush)
import CppIfdef (cppIfdef)
import MacroPass(macroPass)
@@ -43,6 +43,7 @@
if not macro then hPutStr o (unlines (map snd pass1))
else hPutStr o pass2
) files
+ hFlush o
trail :: (Eq a) => [a] -> [a] -> [a]
trail xs = reverse . dropWhile (`elem`xs) . reverse
signature.asc
Description: Dit berichtdeel is digitaal ondertekend
