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/ChoiceIndef.asn | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 lib/asn1/test/asn1_SUITE_data/ChoiceIndef.asn

(limited to 'lib/asn1/test/asn1_SUITE_data/ChoiceIndef.asn')

diff --git a/lib/asn1/test/asn1_SUITE_data/ChoiceIndef.asn b/lib/asn1/test/asn1_SUITE_data/ChoiceIndef.asn
new file mode 100644
index 0000000000..71b717b621
--- /dev/null
+++ b/lib/asn1/test/asn1_SUITE_data/ChoiceIndef.asn
@@ -0,0 +1,24 @@
+ChoiceIndef DEFINITIONS IMPLICIT TAGS ::=
+
+BEGIN
+
+I ::= INTEGER
+
+Cho ::= CHOICE {
+  ca [0] I,
+  cb [1] INTEGER
+}
+
+Seq ::= SEQUENCE {
+  sa [0] Cho,
+  sb [1] INTEGER
+}
+
+-- detta varde funkar ej. fixat i OTP-4358
+-- Val4 = {'Seq',{ca,11},12}
+-- val4 = <<48,128,160,128,128,1,11,0,0,129,1,12,0,0>>
+
+
+END
+
+
-- 
cgit v1.2.3