]> gitweb.factorcode.org Git - factor.git/blob - extra/assocs/extras/extras-tests.factor
projects / factor.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
assocs.extras: adding deep-at.
[factor.git] / extra / assocs / extras / extras-tests.factor
1
2 USING: assocs.extras tools.test ;
3
4 IN: assocs.extras
5
6 { f } [ H{ } { 1 2 3 } deep-at ] unit-test
7 { 4 } [ H{ { 1 H{ { 2 H{ { 3 4 } } } } } } { 1 2 3 } deep-at ] unit-test
Factor programming language