SV = RV(0xa519e7c) at 0xa519e70
  REFCNT = 1
  FLAGS = (PADMY,ROK)
  RV = 0xa51a290
    SV = PVCV(0xa4fd0e8) at 0xa51a290
      REFCNT = 2
      FLAGS = ()
      COMP_STASH = 0x98a2d30    "module-name"
...
caching perl-sub ref 173121136d in 159850504d context

##</code><code>##

context is 159850504d is calling 173121136d
SV = RV(0xa519e7c) at 0xa519e70
  REFCNT = 1
  FLAGS = (PADSTALE,PADMY)
....

##</code><code>##

RegisterCB2 (SV *SubRef)
    CODE:
       cb_ptr2 = newSVsv(SubRef);
       printf("registered %lud\n", cb_ptr2);
       Perl_sv_dump(orig_perl, cb_ptr2);
       RETVAL = 1;
    OUTPUT:
       RETVAL