iter (gillian.Gil_syntax.Visitors.iter)


  constraint
    'b =
    < visit_'annot : 'c -> 'd -> unit
    ; visit_'label : 'c -> 'f -> unit
    ; visit_ALoc : 'c -> string -> unit
    ; visit_And : 'c -> Formula.t -> Formula.t -> unit
    ; visit_Impl : 'c -> Formula.t -> Formula.t -> unit
    ; visit_Apply : 'c -> string -> Expr.t -> 'f option -> unit
    ; visit_ApplyLem : 'c -> string -> Expr.t list -> string list -> unit
    ; visit_Arguments : 'c -> string -> unit
    ; visit_Assert : 'c -> Formula.t -> unit
    ; visit_Assignment : 'c -> string -> Expr.t -> unit
    ; visit_Assume : 'c -> Formula.t -> unit
    ; visit_AssumeType : 'c -> Expr.t -> Type.t -> unit
    ; visit_BAnd : 'c -> unit
    ; visit_BOr : 'c -> unit
    ; visit_BImpl : 'c -> unit
    ; visit_BSetMem : 'c -> unit
    ; visit_BSetSub : 'c -> unit
    ; visit_BinOp : 'c -> Expr.t -> BinOp.t -> Expr.t -> unit
    ; visit_BitwiseAnd : 'c -> unit
    ; visit_BitwiseAndL : 'c -> unit
    ; visit_BitwiseAndF : 'c -> unit
    ; visit_BitwiseNot : 'c -> unit
    ; visit_BitwiseOr : 'c -> unit
    ; visit_BitwiseOrL : 'c -> unit
    ; visit_BitwiseOrF : 'c -> unit
    ; visit_BitwiseXor : 'c -> unit
    ; visit_BitwiseXorL : 'c -> unit
    ; visit_BitwiseXorF : 'c -> unit
    ; visit_Bool : 'c -> bool -> unit
    ; visit_BooleanType : 'c -> unit
    ; visit_Branch : 'c -> Formula.t -> unit
    ; visit_Bug : 'c -> unit
    ; visit_Call : 
      'c ->
      string ->
      Expr.t ->
      Expr.t list ->
      'f option ->
      Cmd.logic_bindings_t option ->
      unit
    ; visit_Car : 'c -> unit
    ; visit_Cdr : 'c -> unit
    ; visit_Constant : 'c -> Constant.t -> unit
    ; visit_ECall : 'c -> string -> Expr.t -> Expr.t list -> 'f option -> unit
    ; visit_EList : 'c -> Expr.t list -> unit
    ; visit_ESet : 'c -> Expr.t list -> unit
    ; visit_Exists : 'c -> (string * Type.t option) list -> Expr.t -> unit
    ; visit_EForall : 'c -> (string * Type.t option) list -> Expr.t -> unit
    ; visit_Emp : 'c -> unit
    ; visit_Empty : 'c -> unit
    ; visit_EmptyType : 'c -> unit
    ; visit_Epsilon : 'c -> unit
    ; visit_Eq : 'c -> Expr.t -> Expr.t -> unit
    ; visit_Equal : 'c -> unit
    ; visit_Error : 'c -> unit
    ; visit_FDiv : 'c -> unit
    ; visit_FLessThan : 'c -> unit
    ; visit_FLessThanEqual : 'c -> unit
    ; visit_FMinus : 'c -> unit
    ; visit_FMod : 'c -> unit
    ; visit_FPlus : 'c -> unit
    ; visit_FTimes : 'c -> unit
    ; visit_FUnaryMinus : 'c -> unit
    ; visit_Fail : 'c -> string -> Expr.t list -> unit
    ; visit_False : 'c -> unit
    ; visit_Fold : 
      'c ->
      string ->
      Expr.t list ->
      (string * (string * Expr.t) list) option ->
      unit
    ; visit_ForAll : 'c -> (string * Type.t option) list -> Formula.t -> unit
    ; visit_GA : 'c -> string -> Expr.t list -> Expr.t list -> unit
    ; visit_Wand : 
      'c ->
      (string * Expr.t list) ->
      (string * Expr.t list) ->
      unit
    ; visit_GUnfold : 'c -> string -> unit
    ; visit_Goto : 'c -> 'f -> unit
    ; visit_GuardedGoto : 'c -> Expr.t -> 'f -> 'f -> unit
    ; visit_IDiv : 'c -> unit
    ; visit_ILessThan : 'c -> unit
    ; visit_ILessThanEqual : 'c -> unit
    ; visit_IMinus : 'c -> unit
    ; visit_IMod : 'c -> unit
    ; visit_IPlus : 'c -> unit
    ; visit_ITimes : 'c -> unit
    ; visit_IUnaryMinus : 'c -> unit
    ; visit_If : 'c -> Expr.t -> LCmd.t list -> LCmd.t list -> unit
    ; visit_Int : 'c -> Z.t -> unit
    ; visit_IntType : 'c -> unit
    ; visit_Invariant : 'c -> Asrt.t -> string list -> unit
    ; visit_Consume : 'c -> Asrt.t -> string list -> unit
    ; visit_Produce : 'c -> Asrt.t -> unit
    ; visit_LAction : 'c -> string -> string -> Expr.t list -> unit
    ; visit_LList : 'c -> Literal.t list -> unit
    ; visit_LVar : 'c -> string -> unit
    ; visit_LeftShift : 'c -> unit
    ; visit_LeftShiftL : 'c -> unit
    ; visit_LeftShiftF : 'c -> unit
    ; visit_FLess : 'c -> Expr.t -> Expr.t -> unit
    ; visit_FLessEq : 'c -> Expr.t -> Expr.t -> unit
    ; visit_ILess : 'c -> Expr.t -> Expr.t -> unit
    ; visit_ILessEq : 'c -> Expr.t -> Expr.t -> unit
    ; visit_IsInt : 'c -> Expr.t -> unit
    ; visit_ListType : 'c -> unit
    ; visit_Lit : 'c -> Literal.t -> unit
    ; visit_Loc : 'c -> string -> unit
    ; visit_LocalTime : 'c -> unit
    ; visit_Logic : 'c -> LCmd.t -> unit
    ; visit_LstCat : 'c -> unit
    ; visit_LstLen : 'c -> unit
    ; visit_LstNth : 'c -> unit
    ; visit_LstRepeat : 'c -> unit
    ; visit_LstRev : 'c -> unit
    ; visit_LstSub : 'c -> Expr.t -> Expr.t -> Expr.t -> unit
    ; visit_M_abs : 'c -> unit
    ; visit_M_acos : 'c -> unit
    ; visit_M_asin : 'c -> unit
    ; visit_M_atan : 'c -> unit
    ; visit_M_atan2 : 'c -> unit
    ; visit_M_ceil : 'c -> unit
    ; visit_M_cos : 'c -> unit
    ; visit_M_exp : 'c -> unit
    ; visit_M_floor : 'c -> unit
    ; visit_M_isNaN : 'c -> unit
    ; visit_M_log : 'c -> unit
    ; visit_M_pow : 'c -> unit
    ; visit_M_round : 'c -> unit
    ; visit_M_sgn : 'c -> unit
    ; visit_M_sin : 'c -> unit
    ; visit_M_sqrt : 'c -> unit
    ; visit_M_tan : 'c -> unit
    ; visit_Macro : 'c -> string -> Expr.t list -> unit
    ; visit_MaxSafeInteger : 'c -> unit
    ; visit_Max_float : 'c -> unit
    ; visit_Min_float : 'c -> unit
    ; visit_NOp : 'c -> NOp.t -> Expr.t list -> unit
    ; visit_NoneType : 'c -> unit
    ; visit_Nono : 'c -> unit
    ; visit_Normal : 'c -> unit
    ; visit_Not : 'c -> Formula.t -> unit
    ; visit_Null : 'c -> unit
    ; visit_NullType : 'c -> unit
    ; visit_Num : 'c -> float -> unit
    ; visit_NumberType : 'c -> unit
    ; visit_ObjectType : 'c -> unit
    ; visit_Or : 'c -> Formula.t -> Formula.t -> unit
    ; visit_PVar : 'c -> string -> unit
    ; visit_PhiAssignment : 'c -> (string * Expr.t list) list -> unit
    ; visit_Pi : 'c -> unit
    ; visit_Pred : 'c -> string -> Expr.t list -> unit
    ; visit_Pure : 'c -> Formula.t -> unit
    ; visit_Random : 'c -> unit
    ; visit_ReturnError : 'c -> unit
    ; visit_ReturnNormal : 'c -> unit
    ; visit_SL : 'c -> SLCmd.t -> unit
    ; visit_SLessThan : 'c -> unit
    ; visit_SepAssert : 'c -> Asrt.t -> string list -> unit
    ; visit_SetDiff : 'c -> unit
    ; visit_SetInter : 'c -> unit
    ; visit_SetMem : 'c -> Expr.t -> Expr.t -> unit
    ; visit_SetSub : 'c -> Expr.t -> Expr.t -> unit
    ; visit_SetToList : 'c -> unit
    ; visit_SetType : 'c -> unit
    ; visit_SetUnion : 'c -> unit
    ; visit_SignedRightShift : 'c -> unit
    ; visit_SignedRightShiftL : 'c -> unit
    ; visit_SignedRightShiftF : 'c -> unit
    ; visit_Skip : 'c -> unit
    ; visit_FreshSVar : 'c -> string -> unit
    ; visit_Star : 'c -> Asrt.t -> Asrt.t -> unit
    ; visit_StrCat : 'c -> unit
    ; visit_StrLen : 'c -> unit
    ; visit_IntToNum : 'c -> unit
    ; visit_NumToInt : 'c -> unit
    ; visit_StrLess : 'c -> Expr.t -> Expr.t -> unit
    ; visit_StrNth : 'c -> unit
    ; visit_String : 'c -> string -> unit
    ; visit_StringType : 'c -> unit
    ; visit_SymbExec : 'c -> unit
    ; visit_ToInt32Op : 'c -> unit
    ; visit_ToIntOp : 'c -> unit
    ; visit_ToNumberOp : 'c -> unit
    ; visit_ToStringOp : 'c -> unit
    ; visit_ToUint16Op : 'c -> unit
    ; visit_ToUint32Op : 'c -> unit
    ; visit_True : 'c -> unit
    ; visit_Type : 'c -> Type.t -> unit
    ; visit_TypeOf : 'c -> unit
    ; visit_TypeType : 'c -> unit
    ; visit_Types : 'c -> (Expr.t * Type.t) list -> unit
    ; visit_UNot : 'c -> unit
    ; visit_UTCTime : 'c -> unit
    ; visit_UnOp : 'c -> UnOp.t -> Expr.t -> unit
    ; visit_Undefined : 'c -> unit
    ; visit_UndefinedType : 'c -> unit
    ; visit_Unfold : 
      'c ->
      string ->
      Expr.t list ->
      (string * string) list option ->
      bool ->
      unit
    ; visit_Package : 
      'c ->
      (string * Expr.t list) ->
      (string * Expr.t list) ->
      unit
    ; visit_UnsignedRightShift : 'c -> unit
    ; visit_UnsignedRightShiftL : 'c -> unit
    ; visit_UnsignedRightShiftF : 'c -> unit
    ; visit_assertion : 'c -> Asrt.t -> unit
    ; visit_bindings : 'c -> (string * (string * Expr.t) list) -> unit
    ; visit_binop : 'c -> BinOp.t -> unit
    ; visit_bispec : 'c -> BiSpec.t -> unit
    ; visit_cmd : 'c -> 'f Cmd.t -> unit
    ; visit_constant : 'c -> Constant.t -> unit
    ; visit_expr : 'c -> Expr.t -> unit
    ; visit_flag : 'c -> Flag.t -> unit
    ; visit_formula : 'c -> Formula.t -> unit
    ; visit_lcmd : 'c -> LCmd.t -> unit
    ; visit_lemma : 'c -> Lemma.t -> unit
    ; visit_lemma_spec : 'c -> Lemma.spec -> unit
    ; visit_literal : 'c -> Literal.t -> unit
    ; visit_macro : 'c -> Macro.t -> unit
    ; visit_nop : 'c -> NOp.t -> unit
    ; visit_pred : 'c -> Pred.t -> unit
    ; visit_proc : 'c -> ('d, 'f) Proc.t -> unit
    ; visit_single_spec : 'c -> Spec.st -> unit
    ; visit_slcmd : 'c -> SLCmd.t -> unit
    ; visit_spec : 'c -> Spec.t -> unit
    ; visit_typ : 'c -> Type.t -> unit
    ; visit_unop : 'c -> UnOp.t -> unit.. >

method visit_'annot : 'c -> 'd -> unit

method visit_'label : 'c -> 'f -> unit

method visit_ALoc : 'c -> string -> unit

method visit_And : 'c -> Formula.t -> Formula.t -> unit

method visit_Impl : 'c -> Formula.t -> Formula.t -> unit

method visit_Apply : 'c -> string -> Expr.t -> 'f option -> unit

method visit_ApplyLem : 'c -> string -> Expr.t list -> string list -> unit

method visit_Arguments : 'c -> string -> unit

method visit_Assert : 'c -> Formula.t -> unit

method visit_Assignment : 'c -> string -> Expr.t -> unit

method visit_Assume : 'c -> Formula.t -> unit

method visit_AssumeType : 'c -> Expr.t -> Type.t -> unit

method visit_BAnd : 'c -> unit

method visit_BOr : 'c -> unit

method visit_BImpl : 'c -> unit

method visit_BSetMem : 'c -> unit

method visit_BSetSub : 'c -> unit

method visit_BinOp : 'c -> Expr.t -> BinOp.t -> Expr.t -> unit

method visit_BitwiseAnd : 'c -> unit

method visit_BitwiseAndL : 'c -> unit

method visit_BitwiseAndF : 'c -> unit

method visit_BitwiseNot : 'c -> unit

method visit_BitwiseOr : 'c -> unit

method visit_BitwiseOrL : 'c -> unit

method visit_BitwiseOrF : 'c -> unit

method visit_BitwiseXor : 'c -> unit

method visit_BitwiseXorL : 'c -> unit

method visit_BitwiseXorF : 'c -> unit

method visit_Bool : 'c -> bool -> unit

method visit_BooleanType : 'c -> unit

method visit_Branch : 'c -> Formula.t -> unit

method visit_Bug : 'c -> unit

method visit_Call : 'c ->
  string ->
  Expr.t ->
  Expr.t list ->
  'f option ->
  (string * (string * Expr.t) list) option ->
  unit

method visit_Car : 'c -> unit

method visit_Cdr : 'c -> unit

method visit_Constant : 'c -> Constant.t -> unit

method visit_ECall : 'c -> string -> Expr.t -> Expr.t list -> 'f option -> unit

method visit_EList : 'c -> Expr.t list -> unit

method visit_ESet : 'c -> Expr.t list -> unit

method visit_Exists : 'c -> (string * Type.t option) list -> Expr.t -> unit

method visit_EForall : 'c -> (string * Type.t option) list -> Expr.t -> unit

method visit_Emp : 'c -> unit

method visit_Empty : 'c -> unit

method visit_EmptyType : 'c -> unit

method visit_Epsilon : 'c -> unit

method visit_Eq : 'c -> Expr.t -> Expr.t -> unit

method visit_Equal : 'c -> unit

method visit_Error : 'c -> unit

method visit_FDiv : 'c -> unit

method visit_FLessThan : 'c -> unit

method visit_FLessThanEqual : 'c -> unit

method visit_FMinus : 'c -> unit

method visit_FMod : 'c -> unit

method visit_FPlus : 'c -> unit

method visit_FTimes : 'c -> unit

method visit_FUnaryMinus : 'c -> unit

method visit_Fail : 'c -> string -> Expr.t list -> unit

method visit_False : 'c -> unit

method visit_Fold : 'c ->
  string ->
  Expr.t list ->
  (string * (string * Expr.t) list) option ->
  unit

method visit_ForAll : 'c -> (string * Type.t option) list -> Formula.t -> unit

method visit_GA : 'c -> string -> Expr.t list -> Expr.t list -> unit

method visit_Wand : 'c ->
  (string * Expr.t list) ->
  (string * Expr.t list) ->
  unit

method visit_GUnfold : 'c -> string -> unit

method visit_Goto : 'c -> 'f -> unit

method visit_GuardedGoto : 'c -> Expr.t -> 'f -> 'f -> unit

method visit_IDiv : 'c -> unit

method visit_ILessThan : 'c -> unit

method visit_ILessThanEqual : 'c -> unit

method visit_IMinus : 'c -> unit

method visit_IMod : 'c -> unit

method visit_IPlus : 'c -> unit

method visit_ITimes : 'c -> unit

method visit_IUnaryMinus : 'c -> unit

method visit_If : 'c -> Expr.t -> LCmd.t list -> LCmd.t list -> unit

method visit_Int : 'c -> Z.t -> unit

method visit_IntType : 'c -> unit

method visit_Invariant : 'c -> Asrt.t -> string list -> unit

method visit_Consume : 'c -> Asrt.t -> string list -> unit

method visit_Produce : 'c -> Asrt.t -> unit

method visit_LAction : 'c -> string -> string -> Expr.t list -> unit

method visit_LList : 'c -> Literal.t list -> unit

method visit_LVar : 'c -> string -> unit

method visit_LeftShift : 'c -> unit

method visit_LeftShiftL : 'c -> unit

method visit_LeftShiftF : 'c -> unit

method visit_FLess : 'c -> Expr.t -> Expr.t -> unit

method visit_FLessEq : 'c -> Expr.t -> Expr.t -> unit

method visit_ILess : 'c -> Expr.t -> Expr.t -> unit

method visit_ILessEq : 'c -> Expr.t -> Expr.t -> unit

method visit_IsInt : 'c -> Expr.t -> unit

method visit_ListType : 'c -> unit

method visit_Lit : 'c -> Literal.t -> unit

method visit_Loc : 'c -> string -> unit

method visit_LocalTime : 'c -> unit

method visit_Logic : 'c -> LCmd.t -> unit

method visit_LstCat : 'c -> unit

method visit_LstLen : 'c -> unit

method visit_LstNth : 'c -> unit

method visit_LstRepeat : 'c -> unit

method visit_LstRev : 'c -> unit

method visit_LstSub : 'c -> Expr.t -> Expr.t -> Expr.t -> unit

method visit_M_abs : 'c -> unit

method visit_M_acos : 'c -> unit

method visit_M_asin : 'c -> unit

method visit_M_atan : 'c -> unit

method visit_M_atan2 : 'c -> unit

method visit_M_ceil : 'c -> unit

method visit_M_cos : 'c -> unit

method visit_M_exp : 'c -> unit

method visit_M_floor : 'c -> unit

method visit_M_isNaN : 'c -> unit

method visit_M_log : 'c -> unit

method visit_M_pow : 'c -> unit

method visit_M_round : 'c -> unit

method visit_M_sgn : 'c -> unit

method visit_M_sin : 'c -> unit

method visit_M_sqrt : 'c -> unit

method visit_M_tan : 'c -> unit

method visit_Macro : 'c -> string -> Expr.t list -> unit

method visit_MaxSafeInteger : 'c -> unit

method visit_Max_float : 'c -> unit

method visit_Min_float : 'c -> unit

method visit_NOp : 'c -> NOp.t -> Expr.t list -> unit

method visit_NoneType : 'c -> unit

method visit_Nono : 'c -> unit

method visit_Normal : 'c -> unit

method visit_Not : 'c -> Formula.t -> unit

method visit_Null : 'c -> unit

method visit_NullType : 'c -> unit

method visit_Num : 'c -> float -> unit

method visit_NumberType : 'c -> unit

method visit_ObjectType : 'c -> unit

method visit_Or : 'c -> Formula.t -> Formula.t -> unit

method visit_PVar : 'c -> string -> unit

method visit_PhiAssignment : 'c -> (string * Expr.t list) list -> unit

method visit_Pi : 'c -> unit

method visit_Pred : 'c -> string -> Expr.t list -> unit

method visit_Pure : 'c -> Formula.t -> unit

method visit_Random : 'c -> unit

method visit_ReturnError : 'c -> unit

method visit_ReturnNormal : 'c -> unit

method visit_SL : 'c -> SLCmd.t -> unit

method visit_SLessThan : 'c -> unit

method visit_SepAssert : 'c -> Asrt.t -> string list -> unit

method visit_SetDiff : 'c -> unit

method visit_SetInter : 'c -> unit

method visit_SetMem : 'c -> Expr.t -> Expr.t -> unit

method visit_SetSub : 'c -> Expr.t -> Expr.t -> unit

method visit_SetToList : 'c -> unit

method visit_SetType : 'c -> unit

method visit_SetUnion : 'c -> unit

method visit_SignedRightShift : 'c -> unit

method visit_SignedRightShiftL : 'c -> unit

method visit_SignedRightShiftF : 'c -> unit

method visit_Skip : 'c -> unit

method visit_FreshSVar : 'c -> string -> unit

method visit_Star : 'c -> Asrt.t -> Asrt.t -> unit

method visit_StrCat : 'c -> unit

method visit_StrLen : 'c -> unit

method visit_IntToNum : 'c -> unit

method visit_NumToInt : 'c -> unit

method visit_StrLess : 'c -> Expr.t -> Expr.t -> unit

method visit_StrNth : 'c -> unit

method visit_String : 'c -> string -> unit

method visit_StringType : 'c -> unit

method visit_SymbExec : 'c -> unit

method visit_ToInt32Op : 'c -> unit

method visit_ToIntOp : 'c -> unit

method visit_ToNumberOp : 'c -> unit

method visit_ToStringOp : 'c -> unit

method visit_ToUint16Op : 'c -> unit

method visit_ToUint32Op : 'c -> unit

method visit_True : 'c -> unit

method visit_Type : 'c -> Type.t -> unit

method visit_TypeOf : 'c -> unit

method visit_TypeType : 'c -> unit

method visit_Types : 'c -> (Expr.t * Type.t) list -> unit

method visit_UNot : 'c -> unit

method visit_UTCTime : 'c -> unit

method visit_UnOp : 'c -> UnOp.t -> Expr.t -> unit

method visit_Undefined : 'c -> unit

method visit_UndefinedType : 'c -> unit

method visit_Unfold : 'c ->
  string ->
  Expr.t list ->
  (string * string) list option ->
  bool ->
  unit

method visit_Package : 'c ->
  (string * Expr.t list) ->
  (string * Expr.t list) ->
  unit

method visit_UnsignedRightShift : 'c -> unit

method visit_UnsignedRightShiftL : 'c -> unit

method visit_UnsignedRightShiftF : 'c -> unit

method private visit_array : 'env 'a. ('env -> 'a -> unit) ->
  'env ->
  'a array ->
  unit

method visit_assertion : 'c -> Asrt.t -> unit

method visit_bindings : 'c -> (string * (string * Expr.t) list) -> unit

method visit_binop : 'c -> BinOp.t -> unit

method visit_bispec : 'c -> BiSpec.t -> unit

method private visit_bool : 'env. 'env -> bool -> unit

method private visit_bytes : 'env. 'env -> bytes -> unit

method private visit_char : 'env. 'env -> char -> unit

method visit_cmd : 'c -> 'f Cmd.t -> unit

method visit_constant : 'c -> Constant.t -> unit

method visit_expr : 'c -> Expr.t -> unit

method visit_flag : 'c -> Flag.t -> unit

method private visit_float : 'env. 'env -> float -> unit

method visit_formula : 'c -> Formula.t -> unit

method private visit_int : 'env. 'env -> int -> unit

method private visit_int32 : 'env. 'env -> int32 -> unit

method private visit_int64 : 'env. 'env -> int64 -> unit

method private visit_lazy_t : 'env 'a. ('env -> 'a -> unit) ->
  'env ->
  'a Stdlib.Lazy.t ->
  unit

method visit_lcmd : 'c -> LCmd.t -> unit

method visit_lemma : 'c -> Lemma.t -> unit

method visit_lemma_spec : 'c -> Lemma.spec -> unit

method private visit_list : 'env 'a. ('env -> 'a -> unit) ->
  'env ->
  'a list ->
  unit

method visit_literal : 'c -> Literal.t -> unit

method visit_macro : 'c -> Macro.t -> unit

method private visit_nativeint : 'env. 'env -> nativeint -> unit

method visit_nop : 'c -> NOp.t -> unit

method private visit_option : 'env 'a. ('env -> 'a -> unit) ->
  'env ->
  'a option ->
  unit

method visit_pred : 'c -> Pred.t -> unit

method visit_proc : 'c -> ('d, 'f) Proc.t -> unit

method private visit_ref : 'env 'a. ('env -> 'a -> unit) ->
  'env ->
  'a Stdlib.ref ->
  unit

method private visit_result : 'env 'a 'e. ('env -> 'a -> unit) ->
  ('env -> 'e -> unit) ->
  'env ->
  ('a, 'e) Result.result ->
  unit

method visit_single_spec : 'c -> Spec.st -> unit

method visit_slcmd : 'c -> SLCmd.t -> unit

method visit_spec : 'c -> Spec.t -> unit

method private visit_string : 'env. 'env -> string -> unit

method visit_typ : 'c -> Type.t -> unit

method private visit_unit : 'env. 'env -> unit -> unit

method visit_unop : 'c -> UnOp.t -> unit