summaryrefslogtreecommitdiff
path: root/tests/fstar/misc/Paper.fst
diff options
context:
space:
mode:
authorSon Ho2023-12-23 00:59:55 +0100
committerSon Ho2023-12-23 00:59:55 +0100
commita4decc7654bc6f3301c0174124d21fdbc2dbc708 (patch)
treef992f3bb64609bf12d033a1424873a8134c66617 /tests/fstar/misc/Paper.fst
parentff9fe8aa1e13a7297f7c4f2c2554235361db038f (diff)
Regenerate the files
Diffstat (limited to 'tests/fstar/misc/Paper.fst')
-rw-r--r--tests/fstar/misc/Paper.fst11
1 files changed, 5 insertions, 6 deletions
diff --git a/tests/fstar/misc/Paper.fst b/tests/fstar/misc/Paper.fst
index c6082929..cf4dc454 100644
--- a/tests/fstar/misc/Paper.fst
+++ b/tests/fstar/misc/Paper.fst
@@ -80,13 +80,12 @@ let rec sum (l : list_t i32) : result i32 =
(** [paper::test_nth]:
Source: 'src/paper.rs', lines 68:0-68:17 *)
let test_nth : result unit =
- let l = List_Nil in
- let l1 = List_Cons 3 l in
- let l2 = List_Cons 2 l1 in
- let* (x, list_nth_mut_back) = list_nth_mut i32 (List_Cons 1 l2) 2 in
+ let l = List_Cons 3 List_Nil in
+ let l1 = List_Cons 2 l in
+ let* (x, list_nth_mut_back) = list_nth_mut i32 (List_Cons 1 l1) 2 in
let* x1 = i32_add x 1 in
- let* l3 = list_nth_mut_back x1 in
- let* i = sum l3 in
+ let* l2 = list_nth_mut_back x1 in
+ let* i = sum l2 in
if not (i = 7) then Fail Failure else Return ()
(** Unit test for [paper::test_nth] *)