happy-meta 0.2.0.7 → 0.2.0.8
raw patch · 4 files changed
+14/−3 lines, 4 filesdep ~template-haskellPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: template-haskell
API changes (from Hackage documentation)
Files
- happy-meta.cabal +2/−2
- src/ParamRules.hs +1/−0
- src/ParseMonad.lhs +10/−0
- src/ProduceCode.lhs +1/−1
happy-meta.cabal view
@@ -1,5 +1,5 @@ Name: happy-meta-Version: 0.2.0.7+Version: 0.2.0.8 Synopsis: Quasi-quoter for Happy parsers -- Description: License: BSD3@@ -21,7 +21,7 @@ Text.Happy.Quote Build-depends:- template-haskell >=2.4&&<2.10+ template-haskell >=2.4&&<2.11 , haskell-src-meta >=0.5.1.2&&<1.0 , base >= 4.2 && < 5 , array, containers
src/ParamRules.hs view
@@ -60,6 +60,7 @@ build xs' [] _ = err ("Need " ++ show (length xs') ++ " more arguments") build _ ts' _ = err (show (length ts') ++ " arguments too many.") + err :: String -> M2 a err m = throwError ("In " ++ inst_name (x,ts) ++ ": " ++ m) make_rule :: Funs -> Inst -> M2 Rule1
src/ParseMonad.lhs view
@@ -12,6 +12,8 @@ > module ParseMonad where +> import Control.Monad( ap )+> import Control.Applicative( Applicative(..) ) > data ParseResult a = OkP a | FailP String > newtype P a = P (String -> Int -> ParseResult a)@@ -29,3 +31,11 @@ > OkP a -> runP (k a) s l > FailP err -> FailP err > fail s = P $ \ _ _ -> FailP s+++> instance Functor P where+> fmap f a = a >>= (return . f)++> instance Applicative P where+> (<*>) = ap+> pure = return
src/ProduceCode.lhs view
@@ -7,7 +7,7 @@ -+> {-#LANGUAGE FlexibleContexts#-} > module ProduceCode (produceParser) where