tricu

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

sourceMapPreludeRun.tri (587B)


      1 !import "source.module" !Local
      2 !import "io" !Local
      3 !import "prelude" !Local
      4 root = "__ROOT__"
      5 module = "__MODULE__"
      6 main = io (onResult_ (sourceModuleLoadSelected root module "succ")
      7   (problem : putStrLn (append "succ-failed: " problem))
      8   (successor : onResult_ (sourceModuleLoadSelected root module "bytesAppend")
      9     (problem : putStrLn (append "bytes-failed: " problem))
     10     (joinBytes : onResult_ (sourceModuleLoadSelected root module "showNumber")
     11       (problem : putStrLn (append "number-failed: " problem))
     12       (show : putStrLn (joinBytes (show (successor 9)) "AB")))))
     13 main