Module OLD.DATA_ITEM

type condition = {
  1. target : Cobol_ptree.qualname;
  2. values : Cobol_ptree.condition_name_value list;
}
val pp_condition : Ppx_deriving_runtime.Format.formatter -> condition -> Ppx_deriving_runtime.unit
val show_condition : condition -> Ppx_deriving_runtime.string
type t = {
  1. name : Cobol_ptree.name;
  2. typ : Types.data_type option;
  3. size : int;
  4. global : bool;
  5. value : Cobol_ptree.data_value_clause option;
  6. renames : Cobol_ptree.qualname list;
  7. condition : condition option;
  8. redefines : Cobol_ptree.qualname option;
  9. constant : Cobol_ptree.constant_value option;
}
val pp : Ppx_deriving_runtime.Format.formatter -> t -> Ppx_deriving_runtime.unit
val show : t -> Ppx_deriving_runtime.string
val make : Cobol_ptree.name -> t