BNFC-meta 0.1.0.2 → 0.1.0.3
raw patch · 3 files changed
+7/−6 lines, 3 filesdep ~template-haskell
Dependency ranges changed: template-haskell
Files
- BNFC-meta.cabal +2/−2
- Language/LBNF.hs +4/−3
- Language/LBNF/CF.hs +1/−1
BNFC-meta.cabal view
@@ -1,5 +1,5 @@ Name: BNFC-meta-version: 0.1.0.2+version: 0.1.0.3 cabal-Version: >= 1.6 build-type: Simple license: GPL-2@@ -26,7 +26,7 @@ Build-Depends: base>=4.2&&<5 , array==0.3.0.*- , template-haskell >=2.4&&<2.5+ , template-haskell >=2.4&&<2.6 , haskell-src-meta >= 0.1.1 && < 0.4 , th-lift >=0.5&&<0.6 , happy-meta < 0.3
Language/LBNF.hs view
@@ -1,4 +1,5 @@ {-# LANGUAGE TemplateHaskell #-}+{-# OPTIONS_GHC -fno-warn-missing-fields #-} module Language.LBNF ( compile@@ -37,21 +38,21 @@ cf :: QuasiQuoter -cf = QuasiQuoter cfe cfp where+cf = QuasiQuoter {quoteExp = cfe, quotePat = cfp} where cfe s = case getCF s of (g,[]) -> lift g (_,msgs) -> error $ unlines msgs cfp = error "Pattern quoting of grammars is not supported" qm :: (Entrypoint a, Lift b) => (a -> Q b) -> QuasiQuoter-qm f = QuasiQuoter qExpM (error "Pattern quotes are not supported yet...")+qm f = QuasiQuoter {quoteExp = qExpM, quotePat = error "Pattern quotes are not supported yet..."} where qExpM s = case parse s of Bad e -> error e Ok a -> f a >>= lift q :: (Entrypoint a, Lift b) => (a -> b) -> QuasiQuoter-q f = QuasiQuoter qExp (error "Pattern quotes are not supported yet...")+q f = QuasiQuoter {quoteExp = qExp, quotePat = error "Pattern quotes are not supported yet..."} where qExp s = case parse s of Bad e -> error e
Language/LBNF/CF.hs view
@@ -131,7 +131,7 @@ -- Info is information extracted from the CF, for easy access. -- Literals - Char, String, Ident, Integer, Double -- Strings are quoted strings, and Ident are unquoted.--- Symbols - symbols in the grammar, e.g. ´*´, '->'.+-- Symbols - symbols in the grammar, e.g. *, '->'. -- KeyWord - reserved words, e.g. 'if' 'while' type Info = ([Literal],[Symbol],[KeyWord],[Cat])