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.24 by root, Tue Aug 29 05:29:48 2006 UTC vs.
Revision 1.25 by root, Tue Aug 29 07:56:56 2006 UTC

… …
2099 CODE: 2099 CODE:
2100 if (KLASS_OF (event) != KLASS_MAP) croak ("event class must be MAP"); 2100 if (KLASS_OF (event) != KLASS_MAP) croak ("event class must be MAP");
2101 AV *av = (AV *)sv_2mortal ((SV *)newAV ()); 2101 AV *av = (AV *)sv_2mortal ((SV *)newAV ());
2102 for (int i = 2; i < items; i++) av_push (av, SvREFCNT_inc (ST (i))); 2102 for (int i = 2; i < items; i++) av_push (av, SvREFCNT_inc (ST (i)));
2103 RETVAL = INVOKE_((event_type)event, ARG_MAP (map), ARG_AV (av)); 2103 RETVAL = INVOKE_((event_type)event, ARG_MAP (map), ARG_AV (av));
2104 OUTPUT: 2104 OUTPUT: RETVAL
2105 RETVAL
2106 2105
2107SV *registry (mapstruct *map) 2106SV *registry (mapstruct *map)
2108 CODE: 2107 CODE:
2109 RETVAL = registry_of (map); 2108 RETVAL = registry_of (map);
2110 OUTPUT: 2109 OUTPUT:

Diff Legend

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