type error table

[chenglou]

Error: This expression has type
MessengerBarsRe.t =
ImmutableJsRe.OrderedMap.t
string (Js.null_undefined FooBarPayloadRe.t)
but an expression was expected of type
ImmutableJsRe.OrderedMap.t
string
(Js.Null_undefined.t
(Js.t ({ employee : Js.Null_undefined.t 'b, .. } as 'a)))
Type Js.null_undefined FooBarPayloadRe.t
is not compatible with type
Js.Null_undefined.t (Js.t 'a) = Js.null_undefined (Js.t 'a)
Type
FooBarPayloadRe.t =
Js.t
{ _type : Js.null_undefined string,
employee : Js.boolean, fbid : Js.null_undefined string, gender : int,
is_employee_away : Js.null_undefined Js.boolean,
link : Js.null_undefined string, name : string,
timezone : Js.null_undefined float, vanity : Js.null_undefined string,
work_id : Js.null_undefined string }
is not compatible with type Js.t 'a
Type Js.boolean is not compatible with type
Js.Null_undefined.t 'b = Js.null_undefined 'b
Types for method employee are incompatible