sourceBuildGraphFailure.tri (331B)
1 !import "source.build" !Local 2 !import "prelude" !Local 3 !import "io" !Local 4 root = "__ROOT__" 5 workspace = "__WORKSPACE__" 6 compiler = "__COMPILER__" 7 name = "__NAME__" 8 main = io (onResult_ (sourceBuildGraph workspace root compiler name) 9 (problem : putStrLn (append "rejected: " problem)) 10 (_ : putStrLn "ACCEPTED-BAD-GRAPH")) 11 main