method patt : patt -> patt =
function
| PaNil _x -> let _x = o#loc _x in PaNil _x
| PaId (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#ident _x_i1 in PaId (_x, _x_i1)
| PaAli (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in
let _x_i2 = o#patt _x_i2 in PaAli (_x, _x_i1, _x_i2)
| PaAnt (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaAnt (_x, _x_i1)
| PaAny _x -> let _x = o#loc _x in PaAny _x
| PaApp (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in
let _x_i2 = o#patt _x_i2 in PaApp (_x, _x_i1, _x_i2)
| PaArr (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in PaArr (_x, _x_i1)
| PaCom (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in
let _x_i2 = o#patt _x_i2 in PaCom (_x, _x_i1, _x_i2)
| PaSem (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in
let _x_i2 = o#patt _x_i2 in PaSem (_x, _x_i1, _x_i2)
| PaChr (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaChr (_x, _x_i1)
| PaInt (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaInt (_x, _x_i1)
| PaInt32 (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaInt32 (_x, _x_i1)
| PaInt64 (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaInt64 (_x, _x_i1)
| PaNativeInt (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaNativeInt (_x, _x_i1)
| PaFlo (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaFlo (_x, _x_i1)
| PaLab (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in
let _x_i2 = o#patt _x_i2 in PaLab (_x, _x_i1, _x_i2)
| PaOlb (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in
let _x_i2 = o#patt _x_i2 in PaOlb (_x, _x_i1, _x_i2)
| PaOlbi (_x, _x_i1, _x_i2, _x_i3) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in
let _x_i2 = o#patt _x_i2 in
let _x_i3 = o#expr _x_i3
in PaOlbi (_x, _x_i1, _x_i2, _x_i3)
| PaOrp (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in
let _x_i2 = o#patt _x_i2 in PaOrp (_x, _x_i1, _x_i2)
| PaRng (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in
let _x_i2 = o#patt _x_i2 in PaRng (_x, _x_i1, _x_i2)
| PaRec (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in PaRec (_x, _x_i1)
| PaEq (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#ident _x_i1 in
let _x_i2 = o#patt _x_i2 in PaEq (_x, _x_i1, _x_i2)
| PaStr (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaStr (_x, _x_i1)
| PaTup (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in PaTup (_x, _x_i1)
| PaTyc (_x, _x_i1, _x_i2) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in
let _x_i2 = o#ctyp _x_i2 in PaTyc (_x, _x_i1, _x_i2)
| PaTyp (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#ident _x_i1 in PaTyp (_x, _x_i1)
| PaVrn (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#string _x_i1 in PaVrn (_x, _x_i1)
| PaLaz (_x, _x_i1) ->
let _x = o#loc _x in
let _x_i1 = o#patt _x_i1 in PaLaz (_x, _x_i1)