Skip to content

Commit 1240196

Browse files
committed
fix arch-params-proof
1 parent 58b2717 commit 1240196

File tree

1 file changed

+3
-0
lines changed

1 file changed

+3
-0
lines changed

proofs/compiler/arch_params_proof.v

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
From mathcomp Require Import ssreflect ssrfun ssrbool ssrnat eqtype.
2+
From ITree Require Import ITree.
23
Require Import
34
compiler_util
45
expr
@@ -58,6 +59,7 @@ Record h_lowering_params
5859
{E E0: Type -> Type}
5960
{wE : with_Error E E0}
6061
{rE : EventRels E0}
62+
{rndE0 : RndEvent syscall_state -< E0}
6163
{p : prog}
6264
{ev : extra_val_t}
6365
(options : lowering_options)
@@ -109,6 +111,7 @@ Record h_lower_addressing_params
109111
{E E0: Type -> Type}
110112
{wE : with_Error E E0}
111113
{rE : EventRels E0}
114+
{rndE0 : RndEvent syscall_state -< E0}
112115
{fresh_reg}
113116
{p p' : sprog}
114117
{ev fn},

0 commit comments

Comments
 (0)