diff --git a/ansi-tests/decf.lsp b/ansi-tests/decf.lsp index b16a424ac5655e0d471db6ef4ce088c851f88f74..4c1888998abc4c1f1bcd5eafa9106a3d951c1061 100644 --- a/ansi-tests/decf.lsp +++ b/ansi-tests/decf.lsp @@ -141,7 +141,7 @@ (values (decf x #c(0.0d0 -2.0l0)) x)) #c(1.0l0 2.0l0) #c(1.0l0 2.0l0)) -(deftest decf.order.1 +(deftest decf.order.2 (let ((a (vector 1 2 3 4)) (i 0) x y z) (values @@ -151,7 +151,7 @@ i x y z a)) -16 3 1 2 3 #(-16 2 3 4)) -(deftest decf.order.2 +(deftest decf.order.3 (let ((a (vector 10 2 3 4)) (i 0) x y) (values diff --git a/ansi-tests/incf.lsp b/ansi-tests/incf.lsp index 01dc582487cfe0c68d70c8e858ff1386f586e6db..4f826bffd7e5a435c37d1870a8aade16a48c699d 100644 --- a/ansi-tests/incf.lsp +++ b/ansi-tests/incf.lsp @@ -141,7 +141,7 @@ (values (incf x #c(0.0d0 -2.0l0)) x)) #c(1.0l0 -2.0l0) #c(1.0l0 -2.0l0)) -(deftest incf.order.1 +(deftest incf.order.2 (let ((a (vector 1 2 3 4)) (i 0) x y z) (values @@ -151,7 +151,7 @@ i x y z a)) 18 3 1 2 3 #(18 2 3 4)) -(deftest incf.order.2 +(deftest incf.order.3 (let ((a (vector 10 2 3 4)) (i 0) x y) (values