prop_signalSelector :: SignalSelector -> Bool
prop_signalSelector selector =
  let encodedSelector = encode selector
      len             = payloadSize selector
  in (asInt len) == LBS.length encodedSelector
     && selector == decode encodedSelector
prop_signalSelector :: SignalSelector -> Bool
prop_signalSelector selector =
  let encodedSelector = encode selector
      len             = payloadSize selector
  in (asInt len) == LBS.length encodedSelector
     && selector == decode encodedSelector
prop_signalSelector selector =
  let encodedSelector = encode selector
      len             = payloadSize selector
  in (asInt len) == LBS.length encodedSelector
     && selector == decode encodedSelector