aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/test/tests.lux
blob: 695c72174ede56a9bedd8b54a5f7054b8d3b27b4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
(;module:
  lux
  (lux (control monad)
       [io]
       (concurrency [promise])
       [cli #+ program:]
       [test])
  (test (luxc ["_;P" parser]
              (analyser ["_;A" primitive]
                        ["_;A" structure]
                        ["_;A" reference]
                        ["_;A" case]
                        ["_;A" function]
                        (procedure ["_;A" common]))
              (synthesizer ["_;S" primitive]
                           ["_;S" structure]
                           ## ["_;S" case]
                           (case ["_;S" special])
                           ["_;S" function]
                           ["_;S" procedure]
                           ["_;S" loop])
              (generator ["_;G" primitive]
                         ["_;G" structure]
                         (procedure ["_;G" common]))
              ))
  ## (luxc (generator ["_;G" function])
  ##       )
  )

## [Program]
(program: args
  (test;run))