diff options
| author | peb <unknown> | 2005-02-18 18:21:06 +0000 |
|---|---|---|
| committer | peb <unknown> | 2005-02-18 18:21:06 +0000 |
| commit | 9568d7a844ba6a1872a8e8f6ef002860057e62ab (patch) | |
| tree | 9e25c6ed62e48101a2782d5fb8dcba68462dc613 /src/GF/Grammar/Lookup.hs | |
| parent | 1c4f025320900897ae3acdab6982f7d595b98dd1 (diff) | |
"Committed_by_peb"
Diffstat (limited to 'src/GF/Grammar/Lookup.hs')
| -rw-r--r-- | src/GF/Grammar/Lookup.hs | 25 |
1 files changed, 17 insertions, 8 deletions
diff --git a/src/GF/Grammar/Lookup.hs b/src/GF/Grammar/Lookup.hs index d0c8434ce..60b0ff73d 100644 --- a/src/GF/Grammar/Lookup.hs +++ b/src/GF/Grammar/Lookup.hs @@ -1,18 +1,29 @@ ---------------------------------------------------------------------- -- | --- Module : (Module) --- Maintainer : (Maintainer) +-- Module : Lookup +-- Maintainer : AR -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date $ --- > CVS $Author $ --- > CVS $Revision $ +-- > CVS $Date: 2005/02/18 19:21:12 $ +-- > CVS $Author: peb $ +-- > CVS $Revision: 1.12 $ -- -- Lookup in source (concrete and resource) when compiling. +-- +-- lookup in resource and concrete in compiling; for abstract, use 'Look' ----------------------------------------------------------------------------- -module Lookup where +module Lookup (lookupResDef, + lookupResType, + lookupParams, + lookupParamValues, + lookupFirstTag, + allParamValues, + lookupAbsDef, + lookupLincat, + opersForType + ) where import Operations import Abstract @@ -22,8 +33,6 @@ import Lockfield import List (nub) import Monad --- lookup in resource and concrete in compiling; for abstract, use Look - lookupResDef :: SourceGrammar -> Ident -> Ident -> Err Term lookupResDef gr = look True where look isTop m c = do |
