Commit 6b200733 authored by simonpj's avatar simonpj

[project @ 2004-11-23 15:24:02 by simonpj]

White space only
parent 1e0d4411
......@@ -485,7 +485,7 @@ addl :: HsGroup a -> [LHsDecl a] -> (HsGroup a, Maybe (SpliceDecl a, [LHsDecl a]
-- This stuff reverses the declarations (again) but it doesn't matter
-- Base cases
addl gp [] = (gp, Nothing)
addl gp [] = (gp, Nothing)
addl gp (L l d : ds) = add gp l d ds
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment