Создайте объект protobuf в haskell с необязательными полями

Question

Я создаю объект PB в Haskell, и я не хочу указывать дополнительные поля. Это возможно?

В самом простейшем случае у меня есть поле заголовка с failure_message, которое я хочу в большинстве случаев пусто. У меня есть некоторый код, где задача работника отвечает статус OK:

 let repMsg = ProtoMsg.WorkerResponse.WorkerResponse { 
      header = ProtoMsg.ReqResponse.ReqResponse { 
       ProtoMsg.ReqResponse.status = Just ProtoMsg.Status.OK, 
       failure_message = Nothing 
      } 
     } 

Есть ли способ, чтобы установить все неуказанные поля в настоящее время, как некоторые? В этом случае это не так уж плохо, но когда есть дополнительные поля, это раздражает.

Answer 1

Вы можете сделать рекордное значение, которое имеет уже установленные поля, а затем обновить эту запись.

noFailureMsg = ProtoMsg.ReqResponse.ReqResponse { 
      failure_message = Nothing 
     } 

let repMsg = ProtoMsg.WorkerResponse.WorkerResponse { 
    header = noFailureMsg { 
     ProtoMsg.ReqResponse.status = Just ProtoMsg.Status.OK 
    } 
} 

Я не совсем уверен, что это то, что вы ищете.