Module Jasmin.Pseudo_operator

type __ = Obj.t
type spill_op =
  1. | Spill
  2. | Unspill
val spill_op_tag : spill_op -> BinNums.positive
type box_spill_op_Spill =
  1. | Box_spill_op_Spill
type spill_op_fields_t = __
val spill_op_fields : spill_op -> spill_op_fields_t
val spill_op_eqb_fields : (spill_op -> spill_op -> bool) -> BinNums.positive -> spill_op_fields_t -> spill_op_fields_t -> bool
val spill_op_eqb : spill_op -> spill_op -> bool
type pseudo_operator =
  1. | Ospill of spill_op * Type.stype list
  2. | Ocopy of Wsize.wsize * BinNums.positive
  3. | Onop
  4. | Omulu of Wsize.wsize
  5. | Oaddcarry of Wsize.wsize
  6. | Osubcarry of Wsize.wsize
  7. | Oswap of Type.stype
val pseudo_operator_tag : pseudo_operator -> BinNums.positive
type box_pseudo_operator_Ospill = {
  1. coq_Box_pseudo_operator_Ospill_0 : spill_op;
  2. coq_Box_pseudo_operator_Ospill_1 : Type.stype list;
}
type box_pseudo_operator_Ocopy = {
  1. coq_Box_pseudo_operator_Ocopy_0 : Wsize.wsize;
  2. coq_Box_pseudo_operator_Ocopy_1 : BinNums.positive;
}
type box_pseudo_operator_Onop =
  1. | Box_pseudo_operator_Onop
type pseudo_operator_fields_t = __
val pseudo_operator_fields : pseudo_operator -> pseudo_operator_fields_t
val pseudo_operator_eqb_fields : (pseudo_operator -> pseudo_operator -> bool) -> BinNums.positive -> pseudo_operator_fields_t -> pseudo_operator_fields_t -> bool
val pseudo_operator_eqb : pseudo_operator -> pseudo_operator -> bool
val pseudo_operator_eqb_OK : pseudo_operator -> pseudo_operator -> Bool.reflect
val eqTC_pseudo_operator : pseudo_operator Utils0.eqTypeC
val pseudo_operator_eqType : Eqtype.Equality.coq_type
val string_of_pseudo_operator : pseudo_operator -> string