coupé en 2

This commit is contained in:
Mylloon 2023-11-21 17:17:43 +01:00
parent da6e4547a8
commit e091ae9860
Signed by: Anri
GPG key ID: A82D63DFF8D1317F

View file

@ -81,7 +81,11 @@ and check_value_definition
: HopixTypes.typing_environment -> HopixAST.value_definition
-> HopixTypes.typing_environment
=
fun env def -> failwith "Students! This is your job! (check_value_definition)"
fun env -> function
| SimpleValue _ ->
failwith "Students! This is your job! (check_value_definition | SimpleValue)"
| RecFunctions _ ->
failwith "Students! This is your job! (check_value_definition | RecFunctions)"
;;
let check_definition env = function