api[apple,CoreBluetooth] definitions

• api[apple,CoreBluetooth] methods

| superCls |
superCls := [:cls|
	(cls includes: #View) ifTrue: [
		#iOS = TargetOS ifTrue: [UIView] ifFalse: [NSView]
	] ifFalse: [ NSObject ]
].
#(	#CBCentralManager
	#CBPeripheralManager
	#CBPeer #CBAttribute
        #CBUUID #CBATTRequest
) do: [:each| (superCls value:each) subclass: each category: #CoreBluetooth ].!
CBPeer subclass: #CBPeripheral.
CBPeer subclass: #CBCentral.
CBAttribute subclass: #CBService.
CBAttribute subclass: #CBCharacteristic.
CBAttribute subclass: #CBDescriptor.



!

CBCentralManager buildPool: #CBError with: #(
    0 #CBErrorUnknown
    #CBErrorInvalidParameters
    #CBErrorInvalidHandle
    #CBErrorNotConnected
    #CBErrorOutOfSpace
    #CBErrorOperationCancelled
    #CBErrorConnectionTimeout
    #CBErrorPeripheralDisconnected
    #CBErrorUUIDNotAllowed
    #CBErrorAlreadyAdvertising
    #CBErrorConnectionFailed
)!
CBCentralManager buildPool: #CBATTError with: #(
    0 #CBATTErrorSuccess
    #CBATTErrorInvalidHandle
    #CBATTErrorReadNotPermitted
    #CBATTErrorWriteNotPermitted
    #CBATTErrorInvalidPdu
    #CBATTErrorInsufficientAuthentication
    #CBATTErrorRequestNotSupported
    #CBATTErrorInvalidOffset
    #CBATTErrorInsufficientAuthorization
    #CBATTErrorPrepareQueueFull
    #CBATTErrorAttributeNotFound
    #CBATTErrorAttributeNotLong
    #CBATTErrorInsufficientEncryptionKeySize
    #CBATTErrorInvalidAttributeValueLength
    #CBATTErrorUnlikelyError
    #CBATTErrorInsufficientEncryption
    #CBATTErrorUnsupportedGroupType
    #CBATTErrorInsufficientResources
)!