File "protobuf_test.ml", line 112, characters 5-23:
Error: This expression has type
(([> `Foo ] as 'a) * P.State.t, P.error)
Core.Std.Result.Monad_infix.t =
('a * P.State.t, P.error) Core.Result.t
but an expression was expected of type
(enum_t * 'b, 'c) Core.Std._result = (enum_t * 'b, 'c) Core.Result.t
RmlsZSAicHJvdG9idWZfdGVzdC5tbCIsIGxpbmUgMTEyLCBjaGFyYWN0ZXJzIDUtMjM6CkVycm9yOiBUaGlzIGV4cHJlc3Npb24gaGFzIHR5cGUKICAgICAgICAgKChbPiBgRm9vIF0gYXMgJ2EpICogUC5TdGF0ZS50LCBQLmVycm9yKQogICAgICAgICBDb3JlLlN0ZC5SZXN1bHQuTW9uYWRfaW5maXgudCA9CiAgICAgICAgICAgKCdhICogUC5TdGF0ZS50LCBQLmVycm9yKSBDb3JlLlJlc3VsdC50CiAgICAgICBidXQgYW4gZXhwcmVzc2lvbiB3YXMgZXhwZWN0ZWQgb2YgdHlwZQogICAgICAgICAoZW51bV90ICogJ2IsICdjKSBDb3JlLlN0ZC5fcmVzdWx0ID0gKGVudW1fdCAqICdiLCAnYykgQ29yZS5SZXN1bHQudA==