1 USING: tools.test cocoa.plists colors kernel hashtables
2 core-foundation.utilities core-foundation destructors
3 assocs cocoa.enumeration ;
7 [ V{ } ] [ H{ } >cf &CFRelease [ ] NSFastEnumeration-map ] unit-test
8 [ V{ "A" } ] [ { "A" } >cf &CFRelease plist> ] unit-test
9 [ H{ { "A" "B" } } ] [ "B" "A" associate >cf &CFRelease plist> ] unit-test
10 [ H{ { "A" "B" } } ] [ "B" "A" associate >cf &CFRelease plist> ] unit-test
14 H{ { "DeviceUsagePage" 1 } { "DeviceUsage" 4 } }
15 H{ { "DeviceUsagePage" 1 } { "DeviceUsage" 5 } }
16 H{ { "DeviceUsagePage" 1 } { "DeviceUsage" 6 } }
17 } [ >cf &CFRelease ] [ >cf &CFRelease ] bi
22 { "DeviceUsagePage" 1 }
23 [ >cf &CFRelease ] [ >cf &CFRelease ] bi
27 [ V{ "DeviceUsagePage" "Yes" } ] [
28 { "DeviceUsagePage" "Yes" }
38 3.5 >cf &CFRelease plist>