[ViewVC] Diff of: cvs/deliantra/server/server/cfperl.xs

Comparing deliantra/server/server/cfperl.xs (file contents):
Revision 1.408 by root, Tue Jan 3 11:23:42 2012 UTC vs.
Revision 1.409 by root, Wed Jan 4 02:48:57 2012 UTC

         if (!d) XSRETURN_UNDEF;
         RETVAL = d->data.size ();
 	OUTPUT:
         RETVAL
+void set_meta (faceidx idx, SV *sv)
+	CODE:
+{
+        faceinfo *f = face_info (idx); assert (f);
+        SvREFCNT_dec (f->meta_hv);
+        f->meta_hv = SvOK (sv) ? (HV *)SvREFCNT_inc (SvRV (sv)) : 0;
+}
 SV *get_chksum (faceidx idx, int faceset = 0)
 	CODE:
         facedata *d = face_data (idx, faceset);
         if (!d) XSRETURN_UNDEF;
         RETVAL = newSVpvn ((char *)d->chksum, d->chksum_len);
 SV *get_data (faceidx idx, int faceset = 0)
 	CODE:
         facedata *d = face_data (idx, faceset);
         if (!d) XSRETURN_UNDEF;
         RETVAL = newSVpvn (d->data, d->data.size ());
+	OUTPUT:
+        RETVAL
+SV *get_meta (faceidx idx)
+	CODE:
+        faceinfo *f = face_info (idx); assert (f);
+        if (!f || !f->meta_hv) XSRETURN_UNDEF;
+        RETVAL = newRV_inc ((SV *)f->meta_hv);
 	OUTPUT:
         RETVAL
 void invalidate (faceidx idx)
 	CODE:

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