method mutable_flag : mutable_flag -> 'self_type =
                  function
                  | MuMutable -> o
                  | MuNil -> o
                  | MuAnt _x -> let o = o#string _x in o