BNFC-meta 0.1 → 0.1.0.1

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• BNFC-meta.cabal +1/−1
• Language/LBNF/CFtoPrinter.hs +1/−1

@@ -1,5 +1,5 @@ Name:		BNFC-meta-version:	0.1+version:	0.1.0.1 cabal-Version:  >= 1.6 build-type:     Simple license:        GPL-2

@@ -52,7 +52,7 @@   i <- newName "i"   let      posn = if isPositionCat cf own -      then tupP [wildP,conP (mkName own) [varP i]]+      then conP (mkName own) [tupP [wildP, varP i]]       else conP (mkName own) [varP i]     body = normalB [|doc (showString $(varE i))|]     prtc = funD ('prt) [clause [wildP, posn] body []]