Skip to content

Commit

Permalink
Correction dans l'analyse du MPP.
Browse files Browse the repository at this point in the history
  • Loading branch information
david-michel1 committed Aug 10, 2023
1 parent 64a12b9 commit 86273f1
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion src/mlang/mpp_ir/mpp_ir_to_bir.ml
Original file line number Diff line number Diff line change
Expand Up @@ -421,7 +421,9 @@ and translate_mpp_stmt (mpp_program : Mpp_ir.mpp_compute list)
wrap_m_code_call m_program order ctx
| Mpp_ir.Expr (Call (Verifs (dom, filter), _args), _) ->
({ ctx with verif_seen = true }, generate_verif_call m_program dom filter)
| Mpp_ir.Partition ((attr, _), value, body) ->
| Mpp_ir.Partition ((attr, pos_attr), value, body) ->
if not (check_attribute m_program attr) then
Errors.raise_spanned_error "unknown attribute" pos_attr;
let func_of_filter = var_is_ attr value in
let ctx, partition_pre, partition_post =
generate_partition mpp_program m_program func_args func_of_filter pos
Expand Down

0 comments on commit 86273f1

Please sign in to comment.