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:
Erik Rauer 2021-01-07 14:27:14 -06:00
parent beed85b5c0
commit 39626a1764

View File

@ -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))))))