lux-r/source/test/program.lux


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

(.module:
  [lux "*"
   ["_" test {"+" [Test]}]
   [control
    ["[0]" io]
    [parser
     [cli {"+" [program:]}]]]]
  [spec
   ["[0]" compositor]]
  {1
   ["[0]" /]})

(program: args
  (<| io.io
      _.run!
      ... (_.times 100)
      (_.seed 1985013625126912890)
      (compositor.spec /.jvm /.bundle /.expander /.program)))