From 49c17be41a7d572d27df74eb7351b672e85953a1 Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 5 Nov 2003 14:42:29 +0000 Subject: working with interfaces --- src/GF/Compile/Extend.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'src/GF/Compile/Extend.hs') diff --git a/src/GF/Compile/Extend.hs b/src/GF/Compile/Extend.hs index 5c70a1141..c0c46f956 100644 --- a/src/GF/Compile/Extend.hs +++ b/src/GF/Compile/Extend.hs @@ -15,6 +15,7 @@ import Monad -- The top-level function $extendModInfo$ -- extends a module symbol table by indirections to the module it extends +--- this is not in use 5/11/2003 extendModInfo :: Ident -> SourceModInfo -> SourceModInfo -> Err SourceModInfo extendModInfo name old new = case (old,new) of (ModMod m0, ModMod (Module mt st fs _ ops js)) -> do -- cgit v1.2.3