From 303fff739a00200a2a2adf3104e80a9e48012563 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= Date: Fri, 28 Nov 2014 15:47:44 +0100 Subject: Modernize error handling for illicit tags --- lib/asn1/test/error_SUITE.erl | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) (limited to 'lib/asn1/test/error_SUITE.erl') diff --git a/lib/asn1/test/error_SUITE.erl b/lib/asn1/test/error_SUITE.erl index e8f48b6187..399ddc2124 100644 --- a/lib/asn1/test/error_SUITE.erl +++ b/lib/asn1/test/error_SUITE.erl @@ -693,11 +693,24 @@ tags(Config) -> "}\n" "\n" + "Set1 ::= SET {\n" " os [0] OCTET STRING,\n" " bool [0] BOOLEAN\n" "}\n" + "Seq1 ::= SEQUENCE {\n" + "a [0] IMPLICIT Choice OPTIONAL\n" + "}\n" + "Seq2 ::= SEQUENCE {\n" + "a [0] IMPLICIT ANY OPTIONAL\n" + "}\n" + "Choice ::=\n" + "CHOICE {\n" + "a [0] BOOLEAN,\n" + "b [1] INTEGER\n" + "}\n" + "END\n">>}, {error, [{structured_error, @@ -705,7 +718,13 @@ tags(Config) -> {duplicate_tags,[seq1,seq2]}}, {structured_error, {M,24},asn1ct_check, - {duplicate_tags,[bool,os]}} + {duplicate_tags,[bool,os]}}, + {structured_error, + {M,28},asn1ct_check, + {implicit_tag_before,choice}}, + {structured_error, + {M,31},asn1ct_check, + {implicit_tag_before,open_type}} ]} = run(P, Config), ok. -- cgit v1.2.3