(read-plist) ( NSData -- id )

Vocabulary

cocoa.plists.private

Inputs

NSData

an object

Outputs

id

an object

Definition

USING: alien.c-types alien.data cocoa.classes cocoa.messages
cocoa.runtime core-foundation.data kernel ;

IN: cocoa.plists.private

: (read-plist) ( NSData -- id )
    NSPropertyListSerialization swap kCFPropertyListImmutable f
    { void* } [
        { id { id SEL id ulong void* void* } }
        "propertyListFromData:mutabilityOption:format:errorDescription:"
        send
    ] with-out-parameters [
        { void { id SEL } } "release" send
        "read-plist failed" throw
    ] when* ;