Paris7/compilation
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Activity

mm

Browse source
This commit is contained in:
Mylloon 2023-11-21 17:33:12 +01:00
parent e091ae9860
commit acd881c0dd
Signed by: Anri
GPG key ID: A82D63DFF8D1317F
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
flap/src/hopix/hopixTypechecker.ml
View file

@ -82,10 +82,13 @@ and check_value_definition
-> HopixTypes.typing_environment -> HopixTypes.typing_environment
= =
fun env -> function fun env -> function
| SimpleValue _ -> | SimpleValue (id, Some ty, ex) ->
failwith "Students! This is your job! (check_value_definition | SimpleValue)" failwith "Students! This is your job! (check_value_definition | SimpleValue)"
| RecFunctions _ -> | RecFunctions _ ->
(* Je crois que c'est galère et donc c'est pas grave si on arrive pas
à faire les fonctions récursives *)
failwith "Students! This is your job! (check_value_definition | RecFunctions)" failwith "Students! This is your job! (check_value_definition | RecFunctions)"
| _ -> failwith "Students! This is your job!"
;; ;;
let check_definition env = function let check_definition env = function