Vhdl.Expressiontype t = | Char of Base.String.t| Float of Base.Float.t| Hex of Base.String.t| Id of Base.String.t| Int of Base.Int.t| Neg of t| Op of Base.String.t * t * t| Others of Base.String.t| String of Base.String.t| X01 of Base.String.tinclude Ppx_compare_lib.Comparable.S with type t := tinclude Ppx_compare_lib.Comparable.S__local with type t := tval sexp_of_t : t -> Sexplib0.Sexp.t