Project

General

Profile

Revision ab6312e7 src/backends/VHDL/vhdl_ast.ml

View differences:

src/backends/VHDL/vhdl_ast.ml
67 67
  | Subtype of {name : vhdl_name_t ; typ : vhdl_subtype_indication_t} [@name "SUBTYPE_DECLARATION"]
68 68
and vhdl_expr_t =
69 69
  | Call of vhdl_name_t [@name "CALL"]
70
  | Cst of vhdl_cst_val_t [@name "CONSTANT_VALUE"]
70
  | Cst of { value: vhdl_cst_val_t; unit_name: vhdl_name_t option [@default None]} [@name "CONSTANT_VALUE"]
71 71
  | Op of { id: string [@default ""]; args: vhdl_expr_t list [@default []]} [@name "EXPRESSION"]
72 72
  | IsNull [@name "IsNull"]
73 73
  | Time of { value: int; phy_unit: string [@default ""]}

Also available in: Unified diff