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

Comparing CBOR-XS/XS.xs (file contents):
Revision 1.44 by root, Tue Feb 18 22:12:12 2014 UTC vs.
Revision 1.48 by root, Sun Sep 20 23:25:53 2015 UTC

   ++enc->depth;
   encode_uint (enc, MAJOR_ARRAY, len + 1);
+  if (SvMAGICAL (av))
-  for (i = 0; i <= len; ++i)
+    for (i = 0; i <= len; ++i)
-    {
+      {
-      SV **svp = av_fetch (av, i, 0);
+        SV **svp = av_fetch (av, i, 0);
-      encode_sv (enc, svp ? *svp : &PL_sv_undef);
+        encode_sv (enc, svp ? *svp : &PL_sv_undef);
-    }
+      }
+  else
+    for (i = 0; i <= len; ++i)
+      {
+        SV *sv = AvARRAY (av)[i];
+        encode_sv (enc, sv ? sv : &PL_sv_undef);
+      }
   --enc->depth;
 }
 static void
 }
 static SV *
 encode_cbor (SV *scalar, CBOR *cbor)
 {
-  enc_t enc = { };
+  enc_t enc = { 0 };
   enc.cbor      = *cbor;
   enc.sv        = sv_2mortal (NEWSV (0, INIT_SIZE));
   enc.cur       = SvPVX (enc.sv);
   enc.end       = SvEND (enc.sv);
 }
 static SV *
 decode_cbor (SV *string, CBOR *cbor, char **offset_return)
 {
-  dec_t dec = { };
+  dec_t dec = { 0 };
   SV *sv;
   STRLEN len;
   char *data = SvPVbyte (string, len);
   if (len > cbor->max_size && cbor->max_size)
           int major = *p >> MAJOR_SHIFT;
           switch (major)
             {
+              case MAJOR_TAG     >> MAJOR_SHIFT:
+                ++count; // tags merely prefix another value
+                break;
               case MAJOR_BYTES   >> MAJOR_SHIFT:
               case MAJOR_TEXT    >> MAJOR_SHIFT:
               case MAJOR_ARRAY   >> MAJOR_SHIFT:
               case MAJOR_MAP     >> MAJOR_SHIFT:
                 {

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