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)]
|
||||
(or
|
||||
(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))
|
||||
(and (state/empty-stack? end-state value-stack)
|
||||
(= end-vector (assoc vect replacement-index replacement))))))
|
||||
|
Loading…
x
Reference in New Issue
Block a user