tags 460386 + patch
thank you
Hi,
Replacing tabs with spaces in 2 files makes it build for me. Here is a
patch.
diff -u bnfc-2.2/formats/haskell2/CFtoAlex2.hs
bnfc-2.2/formats/haskell2/CFtoAlex2.hs
--- bnfc-2.2/formats/haskell2/CFtoAlex2.hs
+++ bnfc-2.2/formats/haskell2/CFtoAlex2.hs
@@ -201,19 +201,19 @@
"alexMove (Pn a l c) _ = Pn (a+1) l (c+1)",
"",
"type AlexInput = (Posn, -- current position,",
- " Char, -- previous char",
- " String) -- current input string",
+ " Char, -- previous char",
+ " String) -- current input string",
"",
"tokens :: String -> [Token]",
"tokens str = go (alexStartPos, '\\n', str)",
" where",
" go :: (Posn, Char, String) -> [Token]",
" go inp@(pos, _, str) =",
- " case alexScan inp 0 of",
- " AlexEOF -> []",
- " AlexError (pos, _, _) -> fail $ show pos ++ \":
lexical error\"",
- " AlexSkip inp' len -> go inp'",
- " AlexToken inp' len act -> act pos (take len str) :
(go inp')",
+ " case alexScan inp 0 of",
+ " AlexEOF -> []",
+ " AlexError (pos, _, _) -> fail $ show pos ++ \": lexical
error\"",
+ " AlexSkip inp' len -> go inp'",
+ " AlexToken inp' len act -> act pos (take len str) : (go inp')",
"",
"alexGetChar :: AlexInput -> Maybe (Char,AlexInput)",
"alexGetChar (p, c, []) = Nothing",
only in patch2:
unchanged:
--- bnfc-2.2.orig/formats/haskell2/HaskellTop.hs
+++ bnfc-2.2/formats/haskell2/HaskellTop.hs
@@ -298,14 +298,14 @@
, " [Ok x] -> showTree v x"
, " xs@(_:_) -> showSeveralTrees v xs"
, " where"
- , " showSeveralTrees :: (Print b, Show b) => Int -> [Err b] -> IO ()"
- , " showSeveralTrees v trees"
- , " = sequence_ "
- , " [ do putStrV v (replicate 40 '-')"
- , " putStrV v $ \"Parse number: \" ++ show n"
- , " showTree v t"
- , " | (Ok t,n) <- zip trees [1..]"
- , " ]"
+ , " showSeveralTrees :: (Print b, Show b) => Int -> [Err b] -> IO ()"
+ , " showSeveralTrees v trees"
+ , " = sequence_ "
+ , " [ do putStrV v (replicate 40 '-')"
+ , " putStrV v $ \"Parse number: \" ++ show n"
+ , " showTree v t"
+ , " | (Ok t,n) <- zip trees [1..]"
+ , " ]"
]
Thank you,
Barry deFreese
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
