aboutsummaryrefslogtreecommitdiffstats
path: root/lib/asn1/test/testEnumExt.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2014-02-13 14:10:33 +0100
committerBjörn Gustavsson <[email protected]>2014-02-13 15:04:42 +0100
commit5d6d6812229cbcfbb26260d38d8ee4061f9a6570 (patch)
tree4f34ed94c84024a00dd4190db3bb8dab20468527 /lib/asn1/test/testEnumExt.erl
parentb28f32d3b793fa7dbaa97f015f84b402bcca2161 (diff)
downloadotp-5d6d6812229cbcfbb26260d38d8ee4061f9a6570.tar.gz
otp-5d6d6812229cbcfbb26260d38d8ee4061f9a6570.tar.bz2
otp-5d6d6812229cbcfbb26260d38d8ee4061f9a6570.zip
Correct subtyping of extensible ENUMERATED
Attempting to subtype an extensible ENUMERATED like this: BaseType ::= { foo, bar, ... } SubType ::= BaseType ( foo ) would fail to compile with a message that 'foo' was undefined. Reported-by: Morten Nygaard Åsnes
Diffstat (limited to 'lib/asn1/test/testEnumExt.erl')
-rw-r--r--lib/asn1/test/testEnumExt.erl4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/asn1/test/testEnumExt.erl b/lib/asn1/test/testEnumExt.erl
index c66adaf949..878518be11 100644
--- a/lib/asn1/test/testEnumExt.erl
+++ b/lib/asn1/test/testEnumExt.erl
@@ -59,6 +59,10 @@ main(ber) ->
common(ber).
common(Erule) ->
+ roundtrip('SubExt1', blue),
+ roundtrip('SubExt1', orange),
+ roundtrip('SubExt1', black),
+
roundtrip('Seq', {'Seq',blue,42}),
roundtrip('Seq', {'Seq',red,42}),
roundtrip('Seq', {'Seq',green,42}),