synth_read
This commit is contained in:
parent
f82e28cd8b
commit
9d077bcbc1
1 changed files with 3 additions and 1 deletions
|
@ -202,7 +202,9 @@ and synth_assign
|
|||
and synth_read
|
||||
: HopixTypes.typing_environment -> expression Position.located -> HopixTypes.aty
|
||||
=
|
||||
fun tenv ref -> failwith "Students! This is your job! (synth_read)"
|
||||
fun tenv ref ->
|
||||
let refty = synth_expression tenv ref in
|
||||
HopixTypes.destruct_reference_type ref.position refty
|
||||
|
||||
and synth_case
|
||||
: HopixTypes.typing_environment -> expression Position.located
|
||||
|
|
Reference in a new issue