From cebd0560c831c6dda09a2841bc24c0e3bd9ea889 Mon Sep 17 00:00:00 2001 From: krasimir Date: Sun, 20 Sep 2009 10:15:39 +0000 Subject: rename Decl in GF.Grammar.Grammar to Hypo to match the convention in PGF --- src/GF/Grammar/Macros.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/GF/Grammar/Macros.hs') diff --git a/src/GF/Grammar/Macros.hs b/src/GF/Grammar/Macros.hs index 6749f1bc9..72f0eb10a 100644 --- a/src/GF/Grammar/Macros.hs +++ b/src/GF/Grammar/Macros.hs @@ -276,8 +276,8 @@ mkCTable :: [Ident] -> Term -> Term mkCTable ids v = foldr ccase v ids where ccase x t = T TRaw [(PV x,t)] -mkDecl :: Term -> Decl -mkDecl typ = (identW, typ) +mkHypo :: Term -> Hypo +mkHypo typ = (identW, typ) eqStrIdent :: Ident -> Ident -> Bool eqStrIdent = (==) -- cgit v1.2.3