The lenses were broken just a bit, have a look at the commit message for more information on that. In addition, I added d to the Protobuf utils module, which is quite useful:
let r :: Control.Packet = d & channel_result .~ Just
(d & channel_identifier .~ 0
& opened .~ True
& common_error .~ Nothing)
I’m not sure about the name though... It should be a lot shorter than defaultValue, since that’d just be annoying.
The lenses were broken just a bit, have a look at the commit message for more information on that. In addition, I added
d
to the Protobuf utils module, which is quite useful:I’m not sure about the name though... It should be a lot shorter than
defaultValue
, since that’d just be annoying.