method mutable_flag =
                  fun f ->
                    function
                    | Ast.MuMutable -> pp f "mutable@ "
                    | Ast.MuNil -> ()
                    | Ast.MuAnt s -> o#anti f s