@@ -1,13 +1,13 @@
1−module Libraries (libraries, addPrelude) where
1+module Metadata.Libraries (libraries, addPrelude) where
22
3−import Ast
43import Control.Applicative ((<$>),(<*>))
54import qualified Data.Map as Map
65import Data.List (inits)
76import Text.JSON
8−import LoadLibraries as Libs
7+import Metadata.LoadLibraries as Libs
8+import SourceSyntax.Module
99
10−addPrelude :: Module -> Module
10+addPrelude :: Module t v -> Module t v
1111addPrelude (Module name exs ims stmts) = Module name exs (customIms ++ ims) stmts
1212 where customIms = concatMap addModule prelude
1313