Source file parsetree_utils.ml

1
2
3
4
5
open Parsetree

type nonrec constant_desc = constant_desc

let constant_desc c = c.pconst_desc