ui.tools.search-tests: add a missing stack effect
parent
a0d978227f
commit
799d541d92
|
@ -10,7 +10,7 @@ IN: ui.tools.search.tests
|
||||||
T{ key-down f { C+ } "x" } swap search-gesture
|
T{ key-down f { C+ } "x" } swap search-gesture
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
: assert-non-empty empty? f assert= ;
|
: assert-non-empty ( obj -- ) empty? f assert= ;
|
||||||
|
|
||||||
: update-live-search ( search -- seq )
|
: update-live-search ( search -- seq )
|
||||||
dup [
|
dup [
|
||||||
|
|
Loading…
Reference in New Issue