ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/cfperl.xs
(Generate patch)

Comparing deliantra/server/server/cfperl.xs (file contents):
Revision 1.252 by root, Mon Sep 10 12:44:07 2007 UTC vs.
Revision 1.253 by root, Mon Sep 10 17:24:36 2007 UTC

2873 object_thawer *self; 2873 object_thawer *self;
2874 sv_to (sv, self); 2874 sv_to (sv, self);
2875 delete self; 2875 delete self;
2876 2876
2877void 2877void
2878tags (object_thawer *self) 2878extract_tags (object_thawer *self)
2879 CODE: 2879 CODE:
2880 while (self->kw != KW_EOF) 2880 while (self->kw != KW_EOF)
2881 { 2881 {
2882 coroapi::cede_to_tick_every (5000);
2883
2882 if (self->kw == KW_tag) 2884 if (self->kw == KW_tag)
2883 XPUSHs (sv_2mortal (to_sv (self->get_str ()))); 2885 XPUSHs (sv_2mortal (to_sv (self->get_str ())));
2884 2886
2885 self->skip (); 2887 self->skip ();
2886 } 2888 }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines