diff options
Diffstat (limited to 'testsuite/tests/parsing/attributes.compilers.reference')
| -rw-r--r-- | testsuite/tests/parsing/attributes.compilers.reference | 132 |
1 files changed, 93 insertions, 39 deletions
diff --git a/testsuite/tests/parsing/attributes.compilers.reference b/testsuite/tests/parsing/attributes.compilers.reference index bc3967be20..f77ea26b57 100644 --- a/testsuite/tests/parsing/attributes.compilers.reference +++ b/testsuite/tests/parsing/attributes.compilers.reference @@ -1,34 +1,68 @@ [ - structure_item (attributes.ml[8,120+0]..[8,120+8]) + structure_item (attributes.ml[8,120+0]..[8,120+28]) + Pstr_exception + type_exception + attribute "foo" + [] + ptyext_constructor = + extension_constructor (attributes.ml[8,120+0]..[8,120+28]) + attribute "foo" + [] + pext_name = "Foo" + pext_kind = + Pext_decl + [] + None + structure_item (attributes.ml[10,150+0]..[10,150+44]) + Pstr_exception + type_exception + attribute "foo" + [] + ptyext_constructor = + extension_constructor (attributes.ml[10,150+0]..[10,150+44]) + attribute "foo" + [] + pext_name = "Bar" + pext_kind = + Pext_decl + [ + core_type (attributes.ml[10,150+18]..[10,150+21]) + attribute "foo" + [] + Ptyp_constr "int" (attributes.ml[10,150+18]..[10,150+21]) + [] + ] + None + structure_item (attributes.ml[12,196+0]..[12,196+8]) Pstr_attribute "foo" [] - structure_item (attributes.ml[10,130+0]..[11,169+9]) + structure_item (attributes.ml[14,206+0]..[15,245+9]) Pstr_value Nonrec [ <def> attribute "foo" [] - pattern (attributes.ml[10,130+4]..[10,130+38]) ghost + pattern (attributes.ml[14,206+4]..[14,206+38]) ghost Ppat_constraint - pattern (attributes.ml[10,130+4]..[10,130+13]) + pattern (attributes.ml[14,206+4]..[14,206+13]) attribute "foo" [] - Ppat_var "x" (attributes.ml[10,130+5]..[10,130+6]) - core_type (attributes.ml[10,130+16]..[10,130+20]) + Ppat_var "x" (attributes.ml[14,206+5]..[14,206+6]) + core_type (attributes.ml[14,206+16]..[14,206+20]) attribute "foo" [] - Ptyp_constr "unit" (attributes.ml[10,130+16]..[10,130+20]) + Ptyp_constr "unit" (attributes.ml[14,206+16]..[14,206+20]) [] - expression (attributes.ml[10,130+30]..[10,130+32]) + expression (attributes.ml[14,206+30]..[14,206+32]) attribute "foo" [] - Pexp_construct "()" (attributes.ml[10,130+30]..[10,130+32]) + Pexp_construct "()" (attributes.ml[14,206+30]..[14,206+32]) None ] - structure_item (attributes.ml[13,180+0]..[15,217+7]) + structure_item (attributes.ml[17,256+0]..[19,293+7]) Pstr_type Rec [ - type_declaration "t" (attributes.ml[13,180+5]..[13,180+6]) (attributes.ml[13,180+0]..[15,217+7]) + type_declaration "t" (attributes.ml[17,256+5]..[17,256+6]) (attributes.ml[17,256+0]..[19,293+7]) attribute "foo" [] ptype_params = @@ -38,15 +72,15 @@ ptype_kind = Ptype_variant [ - (attributes.ml[14,189+2]..[14,189+27]) - "Foo" (attributes.ml[14,189+4]..[14,189+7]) + (attributes.ml[18,265+2]..[18,265+27]) + "Foo" (attributes.ml[18,265+4]..[18,265+7]) attribute "foo" [] [ - core_type (attributes.ml[14,189+12]..[14,189+13]) + core_type (attributes.ml[18,265+12]..[18,265+13]) attribute "foo" [] - Ptyp_constr "t" (attributes.ml[14,189+12]..[14,189+13]) + Ptyp_constr "t" (attributes.ml[18,265+12]..[18,265+13]) [] ] None @@ -55,23 +89,23 @@ ptype_manifest = None ] - structure_item (attributes.ml[17,226+0]..[17,226+8]) + structure_item (attributes.ml[21,302+0]..[21,302+8]) Pstr_attribute "foo" [] - structure_item (attributes.ml[20,237+0]..[29,344+7]) + structure_item (attributes.ml[24,313+0]..[33,420+7]) Pstr_module - "M" (attributes.ml[20,237+7]..[20,237+8]) + "M" (attributes.ml[24,313+7]..[24,313+8]) attribute "foo" [] - module_expr (attributes.ml[20,237+11]..[28,334+3]) + module_expr (attributes.ml[24,313+11]..[32,410+3]) attribute "foo" [] Pmod_structure [ - structure_item (attributes.ml[21,255+2]..[25,310+11]) + structure_item (attributes.ml[25,331+2]..[29,386+11]) Pstr_type Rec [ - type_declaration "t" (attributes.ml[21,255+7]..[21,255+8]) (attributes.ml[21,255+2]..[25,310+11]) + type_declaration "t" (attributes.ml[25,331+7]..[25,331+8]) (attributes.ml[25,331+2]..[29,386+11]) attribute "foo" [] attribute "foo" @@ -83,50 +117,70 @@ ptype_kind = Ptype_record [ - (attributes.ml[22,268+4]..[22,268+25]) + (attributes.ml[26,344+4]..[26,344+25]) attribute "foo" [] Immutable - "l" (attributes.ml[22,268+4]..[22,268+5]) core_type (attributes.ml[22,268+9]..[22,268+10]) + "l" (attributes.ml[26,344+4]..[26,344+5]) core_type (attributes.ml[26,344+9]..[26,344+10]) attribute "foo" [] - Ptyp_constr "t" (attributes.ml[22,268+9]..[22,268+10]) + Ptyp_constr "t" (attributes.ml[26,344+9]..[26,344+10]) [] ] ptype_private = Public ptype_manifest = None ] - structure_item (attributes.ml[27,323+2]..[27,323+10]) + structure_item (attributes.ml[31,399+2]..[31,399+10]) Pstr_attribute "foo" [] ] - structure_item (attributes.ml[31,353+0]..[39,477+7]) - Pstr_modtype "S" (attributes.ml[31,353+12]..[31,353+13]) + structure_item (attributes.ml[35,429+0]..[45,601+7]) + Pstr_modtype "S" (attributes.ml[35,429+12]..[35,429+13]) attribute "foo" [] - module_type (attributes.ml[31,353+16]..[38,467+3]) + module_type (attributes.ml[35,429+16]..[44,591+3]) attribute "foo" [] Pmty_signature [ - signature_item (attributes.ml[33,374+2]..[34,442+11]) + signature_item (attributes.ml[37,450+2]..[37,450+46]) + Psig_exception + type_exception + attribute "foo" + [] + ptyext_constructor = + extension_constructor (attributes.ml[37,450+2]..[37,450+46]) + attribute "foo" + [] + pext_name = "Bar" + pext_kind = + Pext_decl + [ + core_type (attributes.ml[37,450+20]..[37,450+23]) + attribute "foo" + [] + Ptyp_constr "int" (attributes.ml[37,450+20]..[37,450+23]) + [] + ] + None + signature_item (attributes.ml[39,498+2]..[40,566+11]) Psig_include - module_type (attributes.ml[33,374+10]..[33,374+61]) + module_type (attributes.ml[39,498+10]..[39,498+61]) attribute "foo" [] Pmty_with - module_type (attributes.ml[33,374+11]..[33,374+35]) + module_type (attributes.ml[39,498+11]..[39,498+35]) attribute "foo" [] Pmty_typeof - module_expr (attributes.ml[33,374+27]..[33,374+28]) + module_expr (attributes.ml[39,498+27]..[39,498+28]) attribute "foo" [] - Pmod_ident "M" (attributes.ml[33,374+27]..[33,374+28]) + Pmod_ident "M" (attributes.ml[39,498+27]..[39,498+28]) [ - Pwith_typesubst "t" (attributes.ml[33,374+53]..[33,374+54]) - type_declaration "t" (attributes.ml[33,374+53]..[33,374+54]) (attributes.ml[33,374+48]..[33,374+61]) + Pwith_typesubst "t" (attributes.ml[39,498+53]..[39,498+54]) + type_declaration "t" (attributes.ml[39,498+53]..[39,498+54]) (attributes.ml[39,498+48]..[39,498+61]) ptype_params = [] ptype_cstrs = @@ -136,17 +190,17 @@ ptype_private = Public ptype_manifest = Some - core_type (attributes.ml[33,374+58]..[33,374+61]) - Ptyp_constr "M.t" (attributes.ml[33,374+58]..[33,374+61]) + core_type (attributes.ml[39,498+58]..[39,498+61]) + Ptyp_constr "M.t" (attributes.ml[39,498+58]..[39,498+61]) [] ] attribute "foo" [] - signature_item (attributes.ml[36,455+2]..[36,455+10]) + signature_item (attributes.ml[42,579+2]..[42,579+10]) Psig_attribute "foo" [] ] - structure_item (attributes.ml[41,486+0]..[41,486+8]) + structure_item (attributes.ml[47,610+0]..[47,610+8]) Pstr_attribute "foo" [] ] |