Skip to content

Commit 8417d55

Browse files
committed
Fix.
1 parent efe9fc8 commit 8417d55

1 file changed

Lines changed: 0 additions & 13 deletions

File tree

src/checker/Pulse.Typing.FV.fst

Lines changed: 0 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -637,19 +637,6 @@ fun #g #t #c d cb ->
637637
freevars p);
638638
}
639639

640-
// let st_typing_freevars_while : st_typing_freevars_case T_While? =
641-
// fun d cb ->
642-
// match d with
643-
// | T_While _ inv post _ _ inv_typing post_typing cond_typing body_typing ->
644-
// tot_or_ghost_typing_freevars inv_typing;
645-
// tot_or_ghost_typing_freevars post_typing;
646-
// cb cond_typing;
647-
// cb body_typing;
648-
// assert (freevars tm_false `Set.equal` Set.empty);
649-
// freevars_open_term inv tm_false 0;
650-
// assert (freevars (open_term' inv tm_false 0) `Set.subset` freevars inv)
651-
#pop-options
652-
653640
let st_typing_freevars_rewrite : st_typing_freevars_case T_Rewrite? =
654641
fun d cb ->
655642
match d with

0 commit comments

Comments
 (0)