module Bluetooth.Internal.Lenses where
import Lens.Micro
class HasPath s a | s -> a where
path :: Lens' s a
class HasValue s a | s -> a where
value :: Lens' s a
class HasOffset s a | s -> a where
offset :: Lens' s a
class HasProperties s a | s -> a where
properties :: Lens' s a
class HasReadValue s a | s -> a where
readValue :: Lens' s a
class HasWriteValue s a | s -> a where
writeValue :: Lens' s a
class HasUuid s a | s -> a where
uuid :: Lens' s a
class HasCharacteristics s a | s -> a where
characteristics :: Lens' s a
class HasServices s a | s -> a where
services :: Lens' s a
class HasIncludeTxPower s a | s -> a where
includeTxPower :: Lens' s a
class HasManufacturerData s a | s -> a where
manufacturerData :: Lens' s a
class HasServiceData s a | s -> a where
serviceData :: Lens' s a
class HasServiceUUIDs s a | s -> a where
serviceUUIDs :: Lens' s a
class HasSolicitUUIDs s a | s -> a where
solicitUUIDs :: Lens' s a
class HasType_ s a | s -> a where
type_ :: Lens' s a