sourceBundlePack.tri (310B)
1 !import "source.bundle" !Local 2 !import "io" !Local 3 !import "prelude" !Local 4 root = "__ROOT__" 5 manifest = "__HASH__" 6 output = "__OUTPUT__" 7 main = io (onResult_ (sourceBundlePack root manifest output) 8 (problem : putStrLn (append "pack-failed: " problem)) 9 (hash : putStrLn (append "bundle-hash=" hash))) 10 main