tricu

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

sourceModuleLockBadUpdate.tri (307B)

      1 !import "source.lock" !Local
      2 !import "io" !Local
      3 !import "prelude" !Local
      4 root = "__ROOT__"
      5 main = io (onResult_ (sourceLockUpdate root "app"
      6     "!import missingModule as M\n!export main\nmain = M.answer\n")
      7   (problem : putStrLn (append "rejected: " problem))
      8   (_ : putStrLn "ACCEPTED-BAD-UPDATE"))
      9 main