synth_define
This commit is contained in:
parent
3c30abe0ac
commit
a4ea0f62d2
1 changed files with 3 additions and 1 deletions
|
@ -177,7 +177,9 @@ and synth_define
|
||||||
: HopixTypes.typing_environment -> value_definition -> expression Position.located
|
: HopixTypes.typing_environment -> value_definition -> expression Position.located
|
||||||
-> HopixTypes.aty
|
-> HopixTypes.aty
|
||||||
=
|
=
|
||||||
fun tenv vdef expr -> failwith "Students! This is your job! (synth_define)"
|
fun tenv vdef expr ->
|
||||||
|
let tenv = check_value_definition tenv vdef in
|
||||||
|
synth_expression tenv expr
|
||||||
|
|
||||||
and synth_ref
|
and synth_ref
|
||||||
: HopixTypes.typing_environment -> expression Position.located -> HopixTypes.aty
|
: HopixTypes.typing_environment -> expression Position.located -> HopixTypes.aty
|
||||||
|
|
Reference in a new issue