This repository has been archived on 2024-01-18. You can view files and clone it, but cannot push or open issues or pull requests.
compilation/flap/tests/03-Typing/17-polymorphic-binary-function.bad.typing.hopix.human-readable

5 lines
110 B
Text
Raw Permalink Normal View History

2023-11-15 19:08:33 +01:00
fun : [`a, `b] `a * `b -> `a
fst ((x : `b), (y : `a)) = x
let main : int =
fst<int, char> (37, 'a')