Project

General

Profile

Revision 9b0432bc lib/clocks.ml

View differences:

lib/clocks.ml
33 33
    {mutable carrier_desc: carrier_desc;
34 34
     mutable carrier_scoped: bool;
35 35
     carrier_id: int}
36
[@@deriving show]
36 37
     
37 38
type clock_expr =
38 39
    {mutable cdesc: clock_desc;
......
41 42

  
42 43
(* pck stands for periodic clock. Easier not to separate pck from other clocks *)
43 44
and clock_desc =
44
  | Carrow of clock_expr * clock_expr
45
  | Ctuple of clock_expr list
45
  | Carrow of clock_expr * clock_expr (* clock of a node *)
46
  | Ctuple of clock_expr list (* clock of a tuple expression *)
46 47
  | Con of clock_expr * carrier_expr * ident
47 48
  (* | Pck_up of clock_expr * int *)
48 49
  (* | Pck_down of clock_expr * int *)
......
52 53
  | Cunivar (* of clock_set *) (* Polymorphic clock variable *)
53 54
  | Clink of clock_expr (* During unification, make links instead of substitutions *)
54 55
  | Ccarrying of carrier_expr * clock_expr
55

  
56
[@@deriving show]
56 57
type error =
57 58
  | Clock_clash of clock_expr * clock_expr
58 59
  (* | Not_pck *)

Also available in: Unified diff