Skip to content

Commit 2019620

Browse files
committed
Fix issue in receive_confidential_proof postcondition
1 parent dac1ce9 commit 2019620

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

src/lib/communication/DY.Lib.Communication.Core.Lemmas.fst

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -207,7 +207,7 @@ val receive_confidential_proof:
207207
| (Some payload, tr_out) ->
208208
trace_invariant tr_out /\
209209
event_triggered tr_out receiver (CommConfReceiveMsg receiver payload <: communication_core_event a) /\
210-
is_well_formed a (is_knowable_by (principal_label receiver) tr) payload
210+
is_well_formed a (is_knowable_by (principal_label receiver) tr_out) payload
211211
))
212212
[SMTPat (trace_invariant tr);
213213
SMTPat (receive_confidential #a comm_keys_ids receiver msg_id tr);

src/lib/communication/DY.Lib.Communication.RequestResponse.Lemmas.fst

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -523,7 +523,7 @@ val comm_client_send_request_injective:
523523
let comm_client_send_request_injective #invs #a #config #crpreds tr client client' server request request' key = ()
524524
#pop-options
525525

526-
#push-options "--z3rlimit 75"
526+
#push-options "--z3rlimit 100"
527527
val request_response_property:
528528
{|protocol_invariants|} ->
529529
#a:Type -> {|comm_layer_reqres_config a|} ->

0 commit comments

Comments
 (0)