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_bin_SUITE_data/SetTag.asn1 | 47 +++++++++++++++++++++++++++
 1 file changed, 47 insertions(+)
 create mode 100644 lib/asn1/test/asn1_bin_SUITE_data/SetTag.asn1

(limited to 'lib/asn1/test/asn1_bin_SUITE_data/SetTag.asn1')

diff --git a/lib/asn1/test/asn1_bin_SUITE_data/SetTag.asn1 b/lib/asn1/test/asn1_bin_SUITE_data/SetTag.asn1
new file mode 100644
index 0000000000..3f7422edaf
--- /dev/null
+++ b/lib/asn1/test/asn1_bin_SUITE_data/SetTag.asn1
@@ -0,0 +1,47 @@
+SetTag DEFINITIONS IMPLICIT TAGS ::= 
+
+BEGIN
+
+IMPORTS XSeq1, XSetNT, XSetImp, XSetExp FROM External;
+
+SetTag ::= [APPLICATION 20] SET {
+	nt NT,
+	imp Imp,
+	exp Exp }
+
+SetTagImp ::= [APPLICATION 21] SET {
+	nt [0] NT,
+	imp [1] Imp,
+	exp [2] Exp}
+
+SetTagExp ::= [APPLICATION 22] SET {
+	nt [0] EXPLICIT NT,
+	imp [1] EXPLICIT Imp,
+	exp [2] EXPLICIT Exp}
+
+SetTagX ::= [APPLICATION 30] SET {
+	xnt XSetNT,
+	ximp XSetImp,
+	xexp XSetExp }
+
+SetTagImpX ::= [APPLICATION 31] SET {
+	xnt [3] XSetNT,
+	ximp [4] XSetImp,
+	xexp [5] XSetExp }
+
+SetTagExpX ::= [APPLICATION 32] SET {
+	xnt [3] EXPLICIT XSetNT,
+	ximp [4] EXPLICIT XSetImp,
+	xexp [5] EXPLICIT XSetExp }
+
+NT ::= SET {
+  os  OCTET STRING,
+  bool  BOOLEAN}
+Imp ::= [11] SET {
+  os  OCTET STRING,
+  bool  BOOLEAN}
+Exp ::= [12] EXPLICIT SET {
+  os  OCTET STRING,
+  bool  BOOLEAN}
+
+END
-- 
cgit v1.2.3