stdlib/source/test/lux/macro/poly.lux


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

(.module:
  [library
   [lux #*
    ["_" test (#+ Test)]]]
  [\\library
   ["." /]]
  ["." / #_
   ["#." equivalence]
   ["#." functor]
   ["#." json]])

(def: .public test
  Test
  (<| (_.covering /._)
      (_.for [/.poly: /.derived: /.code])
      ($_ _.and
          /equivalence.test
          /functor.test
          /json.test
          )))