diff options
Diffstat (limited to 'stdlib/source/test/lux/macro/poly/functor.lux')
-rw-r--r-- | stdlib/source/test/lux/macro/poly/functor.lux | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/stdlib/source/test/lux/macro/poly/functor.lux b/stdlib/source/test/lux/macro/poly/functor.lux new file mode 100644 index 000000000..873259496 --- /dev/null +++ b/stdlib/source/test/lux/macro/poly/functor.lux @@ -0,0 +1,24 @@ +(.module: + [lux #* + [control + ["." state]] + [data + ["." identity]] + [macro + [poly (#+ derived:) + ["&" functor]]]] + lux/test) + +## [Utils] +(derived: (&.Functor<?> .Maybe)) + +(derived: (&.Functor<?> .List)) + +(derived: (&.Functor<?> state.State)) + +(derived: (&.Functor<?> identity.Identity)) + +## [Tests] +(context: "Functor polytypism." + (test "Can derive functors automatically." + #1)) |