sourceBuildGraphBundle.tri (505B)
1 !import "source.build" !Local 2 !import "io" !Local 3 !import "prelude" !Local 4 workspace = "__WORKSPACE__" 5 root = "__ROOT__" 6 compiler = "__COMPILER__" 7 output = "__OUTPUT__" 8 main = io (onResult_ (sourceBuildGraphBundle workspace root compiler "app" output) 9 (problem : putStrLn (append "graph-bundle-failed: " problem)) 10 (built : thenIO 11 (putStrLn (append "manifest=" (fst built))) 12 (thenIO (putStrLn (append "receipt=" (fst (snd built)))) 13 (putStrLn (append "bundle=" (snd (snd built))))))) 14 main