diff options
Diffstat (limited to 'src/GF/Data/Glue.hs')
| -rw-r--r-- | src/GF/Data/Glue.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/GF/Data/Glue.hs b/src/GF/Data/Glue.hs index cfbe0e746..c541446b1 100644 --- a/src/GF/Data/Glue.hs +++ b/src/GF/Data/Glue.hs @@ -9,17 +9,15 @@ -- > CVS $Author $ -- > CVS $Revision $ -- --- (Description of the module) +-- AR 8-11-2003, using Markus Forsberg's implementation of Huet's @unglue@ ----------------------------------------------------------------------------- -module Glue where +module Glue (decomposeSimple, exTrie) where import Trie2 import Operations import List --------- AR 8/11/2003, using Markus Forsberg's implementation of Huet's unglue - decomposeSimple :: Trie Char a -> [Char] -> Err [[Char]] decomposeSimple t s = do let ss = map (decompose t) $ words s |