GF.Grammar.Lookup: new function lookupResDefLoc

It's like lookupResDef but it includes a source location in the output.
2012-12-19 23:08:56 +00:00
parent 75696808a7
commit b4207d1b00
3 changed files with 16 additions and 14 deletions
--- a/src/compiler/GF/Compile/Compute/AppPredefined.hs
+++ b/src/compiler/GF/Compile/Compute/AppPredefined.hs
@@ -88,8 +88,6 @@ primitives = Map.fromList
    fun from to = oper (mkFunType from to)
    oper ty     = ResOper (Just (noLoc ty)) Nothing

-    noLoc = L NoLoc
-
    varL :: Ident
    varL = identC (BS.pack "L")