Class Ast_traverse.sexp_of