sig
type tvarval = EPVstr of string | EPVvar of string
type 'a tlist =
PLEmpty
| PLCons of 'a * 'a Simplexmlparser.ExprOrPatt.tlist
type texprpatt =
EPanyattr of Simplexmlparser.ExprOrPatt.tvarval *
Simplexmlparser.ExprOrPatt.tvarval
| EPanytag of string *
Simplexmlparser.ExprOrPatt.texprpatt Simplexmlparser.ExprOrPatt.tlist *
Simplexmlparser.ExprOrPatt.texprpatt Simplexmlparser.ExprOrPatt.tlist
| EPpcdata of string
| EPwhitespace of string
| EPcomment of string
val loc : Lexing.position * Lexing.position
val list_of_mlast_expr : MLast.expr list -> MLast.expr
val list_of_mlast_patt : MLast.patt list -> MLast.patt
val expr_valorval : Simplexmlparser.ExprOrPatt.tvarval -> MLast.expr
val patt_valorval : Simplexmlparser.ExprOrPatt.tvarval -> MLast.patt
val to_expr : Simplexmlparser.ExprOrPatt.texprpatt -> MLast.expr
val to_expr_taglist :
Simplexmlparser.ExprOrPatt.texprpatt Simplexmlparser.ExprOrPatt.tlist ->
MLast.expr
val to_expr_attlist :
Simplexmlparser.ExprOrPatt.texprpatt Simplexmlparser.ExprOrPatt.tlist ->
MLast.expr
val to_patt : Simplexmlparser.ExprOrPatt.texprpatt -> MLast.patt
val to_patt_taglist :
Simplexmlparser.ExprOrPatt.texprpatt Simplexmlparser.ExprOrPatt.tlist ->
MLast.patt
val to_patt_attlist :
Simplexmlparser.ExprOrPatt.texprpatt Simplexmlparser.ExprOrPatt.tlist ->
MLast.patt
end