choice tagging fix

diff --git a/tests/62-any-OK.asn1.-EF b/tests/62-any-OK.asn1.-EF
index 4c8f5c4..a7917fc 100644
--- a/tests/62-any-OK.asn1.-EF
+++ b/tests/62-any-OK.asn1.-EF
@@ -7,7 +7,8 @@
 T ::= CHOICE {
     s1	 T1-ext,
     s2	 T2,
-    s3	 T3
+    s3	 T3,
+    s4	 T4
 }
 
 T1-ext ::= SEQUENCE {
@@ -30,4 +31,8 @@
     m2	 [1] IMPLICIT BOOLEAN
 }
 
+T4 ::= [53] EXPLICIT CHOICE {
+    m1	 [1] IMPLICIT OCTET STRING
+}
+
 END