[ViewVC] Diff of: cvs/CBOR-XS/XS.xs

Comparing CBOR-XS/XS.xs (file contents):
Revision 1.2 by root, Sat Oct 26 10:41:12 2013 UTC vs.
Revision 1.3 by root, Sat Oct 26 11:08:34 2013 UTC

 #include <stdio.h>
 #include <limits.h>
 #include <float.h>
 #include "ecb.h"
-#if defined(__BORLANDC__) || defined(_MSC_VER)
-# define snprintf _snprintf // C compilers have this in stdio.h
-#endif
 #define F_SHRINK         0x00000200UL
 #define F_ALLOW_UNKNOWN  0x00002000UL
 #define INIT_SIZE   32 // initial scalar size to be allocated
 fail:
   return &PL_sv_undef;
 }
 static SV *
+decode_tagged (dec_t *dec)
+{
+  UV tag = decode_uint (dec);
+  SV *sv = decode_sv (dec);
+  if (tag == 55799) // 2.4.5 Self-Describe CBOR
+    return sv;
+  AV *av = newAV ();
+  av_push (av, newSVuv (tag));
+  av_push (av, sv);
+  return newRV_noinc ((SV *)av);
+}
+static SV *
 decode_sv (dec_t *dec)
 {
   WANT (1);
   switch (*dec->cur >> 5)
       case 4: // array
         return decode_av (dec);
       case 5: // map
         return decode_hv (dec);
       case 6: // tag
-        abort ();
+        return decode_tagged (dec);
-        break;
       case 7: // misc
         switch (*dec->cur++ & 31)
           {
             case 20:
 #if CBOR_SLOW

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines