… | |
… | |
2150 | RETVAL = query_base_name (op, plural); |
2150 | RETVAL = query_base_name (op, plural); |
2151 | OUTPUT: RETVAL |
2151 | OUTPUT: RETVAL |
2152 | |
2152 | |
2153 | object *decrease_ob_nr (object *op, unsigned long i) |
2153 | object *decrease_ob_nr (object *op, unsigned long i) |
2154 | |
2154 | |
|
|
2155 | # return the tail of an object, excluding itself |
|
|
2156 | void |
|
|
2157 | tail (object *op) |
|
|
2158 | PPCODE: |
|
|
2159 | while ((op = op->more)) |
|
|
2160 | XPUSHs (sv_2mortal (to_sv (op))); |
|
|
2161 | |
2155 | MODULE = cf PACKAGE = cf::object::player PREFIX = cf_player_ |
2162 | MODULE = cf PACKAGE = cf::object::player PREFIX = cf_player_ |
2156 | |
2163 | |
2157 | player *player (object *op) |
2164 | player *player (object *op) |
2158 | CODE: |
2165 | CODE: |
2159 | RETVAL = op->contr; |
2166 | RETVAL = op->contr; |