| … | |
… | |
| 1534 | } |
1534 | } |
| 1535 | |
1535 | |
| 1536 | SvCUR_set (data_sv, dst - SvPVX (data_sv)); |
1536 | SvCUR_set (data_sv, dst - SvPVX (data_sv)); |
| 1537 | } |
1537 | } |
| 1538 | |
1538 | |
| 1539 | void evthread_start () |
1539 | void evthread_start (int aiofd) |
| 1540 | |
1540 | |
| 1541 | void cede_to_tick () |
1541 | void cede_to_tick () |
| 1542 | CODE: |
1542 | CODE: |
| 1543 | coroapi::cede_to_tick (); |
1543 | coroapi::cede_to_tick (); |
| 1544 | |
1544 | |
| … | |
… | |
| 1748 | if (atnr >= 0 && atnr < NROFATTACKS) |
1748 | if (atnr >= 0 && atnr < NROFATTACKS) |
| 1749 | RETVAL = newSVpv (resist_plus[atnr], 0); |
1749 | RETVAL = newSVpv (resist_plus[atnr], 0); |
| 1750 | else |
1750 | else |
| 1751 | XSRETURN_UNDEF; |
1751 | XSRETURN_UNDEF; |
| 1752 | OUTPUT: RETVAL |
1752 | OUTPUT: RETVAL |
|
|
1753 | |
|
|
1754 | SV * |
|
|
1755 | uuid_cur () |
|
|
1756 | CODE: |
|
|
1757 | RETVAL = to_sv (UUID::cur); |
|
|
1758 | OUTPUT: |
|
|
1759 | RETVAL |
|
|
1760 | |
|
|
1761 | SV * |
|
|
1762 | uuid_gen () |
|
|
1763 | CODE: |
|
|
1764 | RETVAL = to_sv (UUID::gen ()); |
|
|
1765 | OUTPUT: |
|
|
1766 | RETVAL |
|
|
1767 | |
|
|
1768 | void |
|
|
1769 | coin_names () |
|
|
1770 | PPCODE: |
|
|
1771 | EXTEND (SP, NUM_COINS); |
|
|
1772 | for (int i = 0; i < NUM_COINS; ++i) |
|
|
1773 | PUSHs (sv_2mortal (newSVpv (coins [i], 0))); |
|
|
1774 | |
|
|
1775 | void |
|
|
1776 | coin_archetypes () |
|
|
1777 | PPCODE: |
|
|
1778 | EXTEND (SP, NUM_COINS); |
|
|
1779 | for (int i = 0; i < NUM_COINS; ++i) |
|
|
1780 | PUSHs (sv_2mortal (to_sv (archetype::find (coins [i])))); |
| 1753 | |
1781 | |
| 1754 | bool |
1782 | bool |
| 1755 | load_resource_file (octet_string filename) |
1783 | load_resource_file (octet_string filename) |
| 1756 | |
1784 | |
| 1757 | MODULE = cf PACKAGE = cf::attachable |
1785 | MODULE = cf PACKAGE = cf::attachable |
