tricu

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

sourceModuleLockChanged.tri (328B)

      1 !import "source.lock" !Local
      2 !import "io" !Local
      3 !import "prelude" !Local
      4 root = "__ROOT__"
      5 main = io (onResult_ (sourceLockBuild root "app"
      6     "!import prelude as P\n!import base as B\n!export main\nmain = P.id P.answer\n")
      7   (problem : putStrLn (append "rejected: " problem))
      8   (_ : putStrLn "ACCEPTED-UNLOCKED-INPUT"))
      9 main