1[
2  structure_item (attributes.ml[1,0+0]..[1,0+8])
3    Pstr_attribute "foo"
4    []
5  structure_item (attributes.ml[3,10+0]..[4,49+9])
6    Pstr_value Nonrec
7    [
8      <def>
9          attribute "foo"
10            []
11        pattern (attributes.ml[3,10+4]..[3,10+38]) ghost
12          Ppat_constraint
13          pattern (attributes.ml[3,10+4]..[3,10+13])
14            attribute "foo"
15              []
16            Ppat_var "x" (attributes.ml[3,10+5]..[3,10+6])
17          core_type (attributes.ml[3,10+16]..[3,10+20])
18            attribute "foo"
19              []
20            Ptyp_constr "unit" (attributes.ml[3,10+16]..[3,10+20])
21            []
22        expression (attributes.ml[3,10+30]..[3,10+32])
23          attribute "foo"
24            []
25          Pexp_construct "()" (attributes.ml[3,10+30]..[3,10+32])
26          None
27    ]
28  structure_item (attributes.ml[6,60+0]..[8,97+7])
29    Pstr_type Rec
30    [
31      type_declaration "t" (attributes.ml[6,60+5]..[6,60+6]) (attributes.ml[6,60+0]..[8,97+7])
32        attribute "foo"
33          []
34        ptype_params =
35          []
36        ptype_cstrs =
37          []
38        ptype_kind =
39          Ptype_variant
40            [
41              (attributes.ml[7,69+2]..[7,69+27])
42                "Foo" (attributes.ml[7,69+4]..[7,69+7])
43                attribute "foo"
44                  []
45                [
46                  core_type (attributes.ml[7,69+12]..[7,69+13])
47                    attribute "foo"
48                      []
49                    Ptyp_constr "t" (attributes.ml[7,69+12]..[7,69+13])
50                    []
51                ]
52                None
53            ]
54        ptype_private = Public
55        ptype_manifest =
56          None
57    ]
58  structure_item (attributes.ml[10,106+0]..[10,106+8])
59    Pstr_attribute "foo"
60    []
61  structure_item (attributes.ml[13,117+0]..[22,224+7])
62    Pstr_module
63    "M" (attributes.ml[13,117+7]..[13,117+8])
64      attribute "foo"
65        []
66      module_expr (attributes.ml[13,117+11]..[21,214+3])
67        attribute "foo"
68          []
69        Pmod_structure
70        [
71          structure_item (attributes.ml[14,135+2]..[18,190+11])
72            Pstr_type Rec
73            [
74              type_declaration "t" (attributes.ml[14,135+7]..[14,135+8]) (attributes.ml[14,135+2]..[18,190+11])
75                attribute "foo"
76                  []
77                attribute "foo"
78                  []
79                ptype_params =
80                  []
81                ptype_cstrs =
82                  []
83                ptype_kind =
84                  Ptype_record
85                    [
86                      (attributes.ml[15,148+4]..[15,148+25])
87                        attribute "foo"
88                          []
89                        Immutable
90                        "l" (attributes.ml[15,148+4]..[15,148+5])                        core_type (attributes.ml[15,148+9]..[15,148+10])
91                          attribute "foo"
92                            []
93                          Ptyp_constr "t" (attributes.ml[15,148+9]..[15,148+10])
94                          []
95                    ]
96                ptype_private = Public
97                ptype_manifest =
98                  None
99            ]
100          structure_item (attributes.ml[20,203+2]..[20,203+10])
101            Pstr_attribute "foo"
102            []
103        ]
104  structure_item (attributes.ml[24,233+0]..[32,357+7])
105    Pstr_modtype "S" (attributes.ml[24,233+12]..[24,233+13])
106      attribute "foo"
107        []
108      module_type (attributes.ml[24,233+16]..[31,347+3])
109        attribute "foo"
110          []
111        Pmty_signature
112        [
113          signature_item (attributes.ml[26,254+2]..[27,322+11])
114            Psig_include
115            module_type (attributes.ml[26,254+10]..[26,254+61])
116              attribute "foo"
117                []
118              Pmty_with
119              module_type (attributes.ml[26,254+11]..[26,254+35])
120                attribute "foo"
121                  []
122                Pmty_typeof
123                module_expr (attributes.ml[26,254+27]..[26,254+28])
124                  attribute "foo"
125                    []
126                  Pmod_ident "M" (attributes.ml[26,254+27]..[26,254+28])
127              [
128                Pwith_typesubst
129                  type_declaration "t" (attributes.ml[26,254+53]..[26,254+54]) (attributes.ml[26,254+48]..[26,254+61])
130                    ptype_params =
131                      []
132                    ptype_cstrs =
133                      []
134                    ptype_kind =
135                      Ptype_abstract
136                    ptype_private = Public
137                    ptype_manifest =
138                      Some
139                        core_type (attributes.ml[26,254+58]..[26,254+61])
140                          Ptyp_constr "M.t" (attributes.ml[26,254+58]..[26,254+61])
141                          []
142              ]
143              attribute "foo"
144                []
145          signature_item (attributes.ml[29,335+2]..[29,335+10])
146            Psig_attribute "foo"
147            []
148        ]
149  structure_item (attributes.ml[34,366+0]..[34,366+8])
150    Pstr_attribute "foo"
151    []
152]
153
154