Debug running

byg/src/DependencyRunner.hs

@@ -27,6 +27,11 @@ runDep (Dependency a action b) = do
   input <- getTokenValue a
   result <- runAction action input
   putTokenValue b result
+  liftIO $ do
+    putStrLn ("input: " ++ show input)
+    putStrLn ("action: " ++ show action)
+    putStrLn ("output: " ++ show result)
+    putStrLn "----------"
 
 getTokenValue :: UToken -> DepRunM Value
 getTokenValue = \case