remove the transfer modules. We don't need anything special, a transfer module is module without concrete syntax

This commit is contained in:
krasimir
2009-09-17 14:32:20 +00:00
parent 49ca46d958
commit bd2f46583c
8 changed files with 5 additions and 33 deletions

View File

@@ -99,8 +99,7 @@ moduleDeps ms = mapM deps ms where
_ -> mt0 == mt
-- in the same way; this defines what can be opened
compatOType mt0 mt = case mt0 of
MTAbstract -> mt == MTAbstract
MTTransfer _ _ -> mt == MTAbstract
MTAbstract -> mt == MTAbstract
_ -> case mt of
MTResource -> True
MTInterface -> True