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

ajout Tuple et dereference

Browse source
This commit is contained in:
Nicolas PENELOUX 2023-11-04 10:40:31 +01:00
parent 2961872f99
commit 7842d4dc14
1 changed files with 7 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
flap/src/hopix/hopixInterpreter.ml
View file

@ -381,9 +381,10 @@ and expression _pos environment _memory = function
| Field _ -> | Field _ ->
(* TODO *) (* TODO *)
failwith "Students! This is your job (Field)!" failwith "Students! This is your job (Field)!"
| Tuple _ -> | Tuple([]) -> (* Cas pour le Tuple vide *)
(* TODO *) VUnit (* Un tuple vide ne contient rien (logique), donc on utilise un VUnit*)
failwith "Students! This is your job (Tuple)!" | Tuple(list_exp) ->
VTuple(List.map (expression' environment _memory) list_exp)
| Sequence _ -> | Sequence _ ->
(* TODO *) (* TODO *)
failwith "Students! This is your job (Sequence)!" failwith "Students! This is your job (Sequence)!"
@ -396,9 +397,9 @@ and expression _pos environment _memory = function
| Apply _ -> | Apply _ ->
(* TODO *) (* TODO *)
failwith "Students! This is your job (Apply)!" failwith "Students! This is your job (Apply)!"
| Ref _ -> | Ref ref ->
(* TODO *) let dref = expression' environment _memory ref in
failwith "Students! This is your job (Ref)!" VLocation(Memory.allocate _memory Mint.one dref)
| Assign _ -> | Assign _ ->
(* TODO *) (* TODO *)
failwith "Students! This is your job (Assign)!" failwith "Students! This is your job (Assign)!"