summaryrefslogtreecommitdiff
path: root/src/compiler/GF/Infra/Dependencies.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/compiler/GF/Infra/Dependencies.hs')
-rw-r--r--src/compiler/GF/Infra/Dependencies.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GF/Infra/Dependencies.hs b/src/compiler/GF/Infra/Dependencies.hs
index 82606a865..393d0e8c8 100644
--- a/src/compiler/GF/Infra/Dependencies.hs
+++ b/src/compiler/GF/Infra/Dependencies.hs
@@ -58,7 +58,7 @@ grammar2moddeps monly gr = [(i,depMod i m) | (i,m) <- modules gr, yes i]
modtype = mtype m,
ofs = case mtype m of
MTConcrete i -> [i | yes i]
- MTInstance i -> [i | yes i]
+ MTInstance (i,_) -> [i | yes i]
_ -> [],
extendeds = nub $ filter yes $ map fst (extend m),
openeds = nub $ filter yes $ map openedModule (opens m),