Fix vector/_replacefirst
tests
This fixes the `vector/_replacefirst` tests to be consistent with the changes made to `vector/_replacefirst` in the previous commit.
This commit is contained in:
parent
beed85b5c0
commit
39626a1764
@ -331,7 +331,7 @@
|
|||||||
replacement-index (.indexOf vect toreplace)]
|
replacement-index (.indexOf vect toreplace)]
|
||||||
(or
|
(or
|
||||||
(and (= replacement-index -1)
|
(and (= replacement-index -1)
|
||||||
(= [replacement toreplace] (state/peek-stack-many end-state value-stack 2))
|
(state/empty-stack? end-state value-stack)
|
||||||
(= vect end-vector))
|
(= vect end-vector))
|
||||||
(and (state/empty-stack? end-state value-stack)
|
(and (state/empty-stack? end-state value-stack)
|
||||||
(= end-vector (assoc vect replacement-index replacement))))))
|
(= end-vector (assoc vect replacement-index replacement))))))
|
||||||
|
Loading…
x
Reference in New Issue
Block a user