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

Comparing deliantra/server/server/cfperl.xs (file contents):
Revision 1.34 by root, Thu Aug 31 06:23:20 2006 UTC vs.
Revision 1.35 by root, Thu Aug 31 09:19:34 2006 UTC

 void reattach (attachable<subclass> *obj)
 {
   obj->optimise ();
   if (obj->self)
-    reattach (subclass::get_dt (), (subclass *)obj);
+    reattach ((data_type) cftype<subclass>::dt, (subclass *)obj);
 }
+#include "kw_hash.h"
 object_freezer::object_freezer ()
 {
   av = newAV ();
   // TODO: fast dynbuf implementation... yeah, we need obstacks
       int idx = AvFILLp ((AV *)av) + 1;
       av_store (av, idx, SvREFCNT_inc (ext->self));
       sv_catpvf (text, "oid %d\n", idx);
     }
+}
+void object_freezer::put (keyword k)
+{
+  sv_catpv (text, keyword_str [k]);
+}
+void object_freezer::put (const char *v)
+{
+  sv_catpv (text, v);
+}
+void object_freezer::put (int v)
+{
+  sv_catpvf (text, "%d\n", v);
 }
 bool object_freezer::save (const char *filename)
 {
   dSP;

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