mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-17 13:27:30 +03:00
9 lines
210 B
Plaintext
9 lines
210 B
Plaintext
|
|
-- We expect this to not typecheck since a `Nat -> Nat` cannot
|
|
-- be passed where a `∀ a . a -> a` is expected.
|
|
rank2a : (Nat -> Nat) -> Nat
|
|
rank2a =
|
|
inner : (∀ a . a -> a) -> Nat
|
|
inner f = 42
|
|
inner
|