]> git.immae.eu Git - github/fretlink/purs-loader.git/blobdiff - src/PursLoader/Loader.purs
Bumping version number to 0.6.0-beta.1
[github/fretlink/purs-loader.git] / src / PursLoader / Loader.purs
index f78153f5c9d89614213d6dfa2b8fcc64ec061173..5e00f7ec24b59c4b8971640345cc89d510bc5da3 100644 (file)
@@ -34,6 +34,7 @@ import PursLoader.LoaderRef
   , resourcePath
   )
 
+import PursLoader.Debug (debug)
 import PursLoader.LoaderUtil (parseQuery)
 import PursLoader.Options (Options(..))
 import PursLoader.Path (dirname, relative)
@@ -47,6 +48,8 @@ loader ref source = do
 
   cacheable ref
 
+  debug "Invoke PureScript plugin compilation"
+
   pluginContext.compile (compile callback)
   where
   pluginContext :: Plugin.Context (Effects eff)
@@ -56,6 +59,8 @@ loader ref source = do
   compile callback error' { srcMap, ffiMap, graph } = do
     clearDependencies ref
 
+    either (const $ pure unit) (\a -> debug ("Adding PureScript dependency " ++ a)) name
+
     addDependency ref (resourcePath ref)
 
     either (\err -> callback (Just err) "") id
@@ -63,6 +68,7 @@ loader ref source = do
     where
     handle :: String -> Array String -> String -> Eff (Effects eff) Unit
     handle name' deps res = do
+      debug ("Adding PureScript transitive dependencies for " ++ name')
       addTransitive name'
       foreachE deps addTransitive
       callback (toMaybe error') res