Idris2/tests/idris2/record005/Fld.idr
2020-07-06 17:39:55 +01:00

10 lines
132 B
Idris

record Foo where
constructor MkFoo
{Gnu : Char}
AFoo : Foo
AFoo = MkFoo {Gnu = 'c'}
Bar : Foo
Bar = record { Gnu = '?' } AFoo