tricu

An interpreted language for exploring Tree Calculus
Log | Files | Refs | README | LICENSE

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