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.235 by root, Sun Jul 22 15:05:33 2007 UTC vs.
Revision 1.236 by root, Mon Jul 23 16:53:15 2007 UTC

1564 1564
1565 for_all_objects (op) 1565 for_all_objects (op)
1566 op->reattach (); 1566 op->reattach ();
1567} 1567}
1568 1568
1569void _post_tick ()
1570 CODE:
1571 coroapi::next_cede = SvNV (sv_next_tick) - TICK * (1. - 1. / CEDES_PER_TICK);
1572
1573# support function for map-world.ext 1569# support function for map-world.ext
1574void _quantise (SV *data_sv, SV *plt_sv) 1570void _quantise (SV *data_sv, SV *plt_sv)
1575 CODE: 1571 CODE:
1576{ 1572{
1577 if (!SvROK (plt_sv) || SvTYPE (SvRV (plt_sv)) != SVt_PVAV) 1573 if (!SvROK (plt_sv) || SvTYPE (SvRV (plt_sv)) != SVt_PVAV)
1609 len -= 3; 1605 len -= 3;
1610 } 1606 }
1611 1607
1612 SvCUR_set (data_sv, dst - SvPVX (data_sv)); 1608 SvCUR_set (data_sv, dst - SvPVX (data_sv));
1613} 1609}
1610
1611void _post_tick ()
1612 CODE:
1613 coroapi::next_cede = SvNV (sv_next_tick) - TICK * (1. - 1. / CEDES_PER_TICK);
1614
1615NV till_cede ()
1616 CODE:
1617 RETVAL = coroapi::next_cede - now ();
1618 OUTPUT:
1619 RETVAL
1620
1621NV till_tick ()
1622 CODE:
1623 RETVAL = SvNV (sv_next_tick) - now ();
1624 OUTPUT:
1625 RETVAL
1614 1626
1615NV floor (NV x) 1627NV floor (NV x)
1616 1628
1617NV ceil (NV x) 1629NV ceil (NV x)
1618 1630

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines