new-luxc/source/luxc/compiler/runtime.jvm.lux


1
2
3
4
5
6
7
8
9
10
11

(;module:
  lux
  (lux (control monad)
       (concurrency ["P" promise "P/" Monad<Promise>])
       (data text/format
             ["R" result]))
  (luxc ["&" base]))

(def: #export (compile-runtime compiler)
  (-> Compiler (P;Promise (R;Result Compiler)))
  (P/wrap (#R;Success compiler)))