--- Convert-BER-XS/XS.pm	2019/04/21 00:36:19	1.37
+++ Convert-BER-XS/XS.pm	2019/04/21 00:39:26	1.38
@@ -540,11 +540,10 @@
 
       if ($profile == $SNMP_PROFILE and $ber->[BER_CLASS] == ASN_APPLICATION) {
          $tag = _re const_snmp => $ber->[BER_TAG];
-         $asn = 1;
+      } elsif (!$asn) {
+         $tag = "$class ($tag)";
       }
 
-      $asn or $tag = "$class ($tag)";
-
       $class =~ s/^ASN_//;
       $tag   =~ s/^(ASN_|SNMP_)//;
       $type  =~ s/^BER_TYPE_//;