diff options
Diffstat (limited to 'lib/asn1/test/error_SUITE.erl')
| -rw-r--r-- | lib/asn1/test/error_SUITE.erl | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/lib/asn1/test/error_SUITE.erl b/lib/asn1/test/error_SUITE.erl index 1edd60f7c8..713f80cbee 100644 --- a/lib/asn1/test/error_SUITE.erl +++ b/lib/asn1/test/error_SUITE.erl @@ -19,7 +19,8 @@ -module(error_SUITE). -export([suite/0,all/0,groups/0, - already_defined/1,bitstrings/1,enumerated/1, + already_defined/1,bitstrings/1, + classes/1,enumerated/1, imports/1,instance_of/1,integers/1,objects/1, parameterization/1,values/1]). @@ -34,6 +35,7 @@ groups() -> [{p,parallel(), [already_defined, bitstrings, + classes, enumerated, imports, instance_of, @@ -94,6 +96,18 @@ bitstrings(Config) -> ]} = run(P, Config), ok. +classes(Config) -> + M = 'Classes', + P = {M, + <<"Classes DEFINITIONS AUTOMATIC TAGS ::= BEGIN\n" + " LowerCase ::= CLASS { &id INTEGER UNIQUE }\n" + "END\n">>}, + {error, + [{structured_error,{M,2},asn1ct_check,{illegal_class_name, + 'LowerCase'}} + ]} = run(P, Config), + ok. + enumerated(Config) -> M = 'Enumerated', P = {M, |