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/13-mutually-rec-fun-definitions.bad.typing.hopix.human-readable

8 lines
156 B
Text
Raw Normal View History

2023-11-15 19:08:33 +01:00
fun : int -> int
double_omega (x : int) =
omega (x) (x)
and : int -> int
omega (x: int) =
double_omega (x)
let main : int = double_omega 73