From 18bd1239bee04427340a44f57f993ea92c264e41 Mon Sep 17 00:00:00 2001
From: Kenneth Lundin <kenneth@erlang.org>
Date: Fri, 19 Feb 2010 14:01:57 +0000
Subject: OTP-8463  Support for EXTENSIBILITY IMPLIED and SET/SEQ OF NamedType
 is           added.

---
 lib/asn1/test/asn1_SUITE_data/Seq2738.asn1 | 37 ++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 lib/asn1/test/asn1_SUITE_data/Seq2738.asn1

(limited to 'lib/asn1/test/asn1_SUITE_data/Seq2738.asn1')

diff --git a/lib/asn1/test/asn1_SUITE_data/Seq2738.asn1 b/lib/asn1/test/asn1_SUITE_data/Seq2738.asn1
new file mode 100644
index 0000000000..c852adc57e
--- /dev/null
+++ b/lib/asn1/test/asn1_SUITE_data/Seq2738.asn1
@@ -0,0 +1,37 @@
+Seq2738 DEFINITIONS IMPLICIT TAGS ::= 
+
+-- Tests that a missing mandatory component of an optional
+-- component is detected as an error and not just as if the optional
+-- component was missing
+
+BEGIN
+
+-- We create a value of type SeqWithOptFake , encode it and then 
+-- try to decode it as a value of type SeqWithOpt.
+-- The decoder should detect this as an error, because the
+-- mandatory first component of type INTEGER in OptSeq is missing
+
+SeqOpt ::= SEQUENCE
+{
+	int INTEGER,
+	opt OptSeq OPTIONAL
+}
+
+SeqOptFake ::= SEQUENCE
+{
+	int INTEGER,
+	opt OptSeqFake OPTIONAL
+}
+
+OptSeq ::= SEQUENCE
+{
+	int INTEGER
+}
+
+OptSeqFake ::= SEQUENCE
+{
+	bool BOOLEAN
+}
+
+
+END
-- 
cgit v1.2.3