factor/basis/core-foundation/arrays/arrays-tests.factor

12 lines
298 B
Factor

IN: core-foundation.arrays.tests
USING: core-foundation core-foundation.arrays
core-foundation.strings destructors sequences tools.test ;
{ { "1" "2" "3" } } [
[
{ "1" "2" "3" }
[ <CFString> &CFRelease ] map
<CFArray> CF>string-array
] with-destructors
] unit-test