OER encoding of pure NULLs verified

skeletons/constr_CHOICE.c

@@ -1176,7 +1176,7 @@ CHOICE_compare(const asn_TYPE_descriptor_t *td, const void *aptr, const void *bp
     unsigned apresent = 0;
     unsigned bpresent = 0;
     const void *amember = _get_member_ptr(td, aptr, &aelm, &apresent);
-    const void *bmember = _get_member_ptr(td, bptr, &belm, &apresent);
+    const void *bmember = _get_member_ptr(td, bptr, &belm, &bpresent);
 
     if(amember && bmember) {
         if(apresent == bpresent) {

skeletons/constr_CHOICE_oer.c

@@ -357,7 +357,7 @@ CHOICE_encode_oer(asn_TYPE_descriptor_t *td,
 
     er = elm->type->op->oer_encoder(elm->type, elm->encoding_constraints.oer_constraints, memb_ptr,
                                     cb, app_key);
-    if(er.encoded > 0)
+    if(er.encoded >= 0)
         er.encoded += tag_len;
 
     return er;

tests/tests-randomized/Makefile.am

@@ -38,6 +38,7 @@ TESTS += bundles/11-BMPString-bundle.txt
 TESTS += bundles/12-UniversalString-bundle.txt
 TESTS += bundles/13-UTCTime-bundle.txt
 TESTS += bundles/14-GeneralizedTime-bundle.txt
+TESTS += bundles/15-CHOICE-bundle.txt
 
 EXTRA_DIST =                    \
     random-test-driver.c        \

tests/tests-randomized/bundles/15-CHOICE-bundle.txt

+CHOICE { null NULL }