Idris2/tests/idris2/reg012/Foo.idr

mirror of https://github.com/idris-lang/Idris2.git synced 2024-12-25 04:33:45 +03:00
import Data.Vect

parameters (len : Nat)
  record Foo where
    constructor Bar
    Gnat : Vect len Nat

foo : Foo 1
foo = Bar _ [0]
Add test script They don't all pass yet, for minor reasons. Coming shortly... Unfortunately the startup overhead for chez is really noticeable here! 2020-05-19 20:25:18 +03:00			`import Data.Vect`

			`parameters (len : Nat)`
			`record Foo where`
			`constructor Bar`
			`Gnat : Vect len Nat`

			`foo : Foo 1`
			`foo = Bar _ [0]`