… | |
… | |
1693 | PUSHs (sv_2mortal (newSVpv ("keepcost", 0))); PUSHs (sv_2mortal (newSViv (mai.keepcost))); |
1693 | PUSHs (sv_2mortal (newSVpv ("keepcost", 0))); PUSHs (sv_2mortal (newSViv (mai.keepcost))); |
1694 | #endif |
1694 | #endif |
1695 | EXTEND (SP, 2*2); |
1695 | EXTEND (SP, 2*2); |
1696 | PUSHs (sv_2mortal (newSVpv ("slice_alloc", 0))); PUSHs (sv_2mortal (newSVuv (slice_alloc))); |
1696 | PUSHs (sv_2mortal (newSVpv ("slice_alloc", 0))); PUSHs (sv_2mortal (newSVuv (slice_alloc))); |
1697 | PUSHs (sv_2mortal (newSVpv ("shstr_alloc", 0))); PUSHs (sv_2mortal (newSVuv (shstr_alloc))); |
1697 | PUSHs (sv_2mortal (newSVpv ("shstr_alloc", 0))); PUSHs (sv_2mortal (newSVuv (shstr_alloc))); |
|
|
1698 | PUSHs (sv_2mortal (newSVpv ("objects" , 0))); PUSHs (sv_2mortal (newSVuv (objects.size () * sizeof (object)))); |
1698 | } |
1699 | } |
1699 | |
1700 | |
1700 | int find_animation (utf8_string text) |
1701 | int find_animation (utf8_string text) |
1701 | PROTOTYPE: $ |
1702 | PROTOTYPE: $ |
1702 | |
1703 | |
… | |
… | |
1858 | object *actives (U32 index) |
1859 | object *actives (U32 index) |
1859 | CODE: |
1860 | CODE: |
1860 | RETVAL = index < actives.size () ? actives [index] : 0; |
1861 | RETVAL = index < actives.size () ? actives [index] : 0; |
1861 | OUTPUT: RETVAL |
1862 | OUTPUT: RETVAL |
1862 | |
1863 | |
|
|
1864 | int mortals_size () |
|
|
1865 | CODE: |
|
|
1866 | RETVAL = attachable::mortals.size (); |
|
|
1867 | OUTPUT: RETVAL |
|
|
1868 | |
1863 | const char *slot_use_name (U32 slot) |
1869 | const char *slot_use_name (U32 slot) |
1864 | ALIAS: |
1870 | ALIAS: |
1865 | slot_nonuse_name = 1 |
1871 | slot_nonuse_name = 1 |
1866 | CODE: |
1872 | CODE: |
1867 | { |
1873 | { |
… | |
… | |
2044 | CODE: |
2050 | CODE: |
2045 | { |
2051 | { |
2046 | RETVAL = insert_ob_in_map_at (ob, where, orig, flag, x, y); |
2052 | RETVAL = insert_ob_in_map_at (ob, where, orig, flag, x, y); |
2047 | } |
2053 | } |
2048 | |
2054 | |
2049 | const_utf8_string get_ob_key_value (object *op, utf8_string key) |
2055 | shstr |
|
|
2056 | object::kv_get (shstr key) |
2050 | |
2057 | |
2051 | bool set_ob_key_value (object *op, utf8_string key, utf8_string value = 0, int add_key = 1) |
2058 | void |
|
|
2059 | object::kv_del (shstr key) |
|
|
2060 | |
|
|
2061 | void |
|
|
2062 | object::kv_set (shstr key, shstr value) |
2052 | |
2063 | |
2053 | object *get_nearest_player (object *ob) |
2064 | object *get_nearest_player (object *ob) |
2054 | ALIAS: nearest_player = 0 |
2065 | ALIAS: nearest_player = 0 |
2055 | PREINIT: |
2066 | PREINIT: |
2056 | extern object *get_nearest_player (object *); |
2067 | extern object *get_nearest_player (object *); |