… | |
… | |
2157 | PROTOTYPE: $$;$ |
2157 | PROTOTYPE: $$;$ |
2158 | PPCODE: |
2158 | PPCODE: |
2159 | { |
2159 | { |
2160 | rv_vector rv; |
2160 | rv_vector rv; |
2161 | |
2161 | |
2162 | PUTBACK; |
|
|
2163 | get_rangevector (ob, other, &rv, flags); |
2162 | get_rangevector (ob, other, &rv, flags); |
2164 | SPAGAIN; |
|
|
2165 | |
2163 | |
2166 | EXTEND (SP, 5); |
2164 | EXTEND (SP, 5); |
2167 | PUSHs (sv_2mortal (newSVuv (rv.distance))); |
2165 | PUSHs (sv_2mortal (newSVuv (rv.distance))); |
2168 | PUSHs (sv_2mortal (newSViv (rv.distance_x))); |
2166 | PUSHs (sv_2mortal (newSViv (rv.distance_x))); |
2169 | PUSHs (sv_2mortal (newSViv (rv.distance_y))); |
2167 | PUSHs (sv_2mortal (newSViv (rv.distance_y))); |
2170 | PUSHs (sv_2mortal (newSViv (rv.direction))); |
2168 | PUSHs (sv_2mortal (newSViv (rv.direction))); |
2171 | PUSHs (sv_2mortal (to_sv (rv.part))); |
2169 | PUSHs (sv_2mortal (to_sv (rv.part))); |
2172 | } |
2170 | } |
2173 | |
2171 | |
2174 | bool on_same_map_as (object *ob, object *other) |
2172 | bool on_same_map_as (object *ob, object *other) |
2175 | CODE: |
2173 | CODE: |
2176 | RETVAL = on_same_map (ob, other); |
2174 | RETVAL = on_same_map (ob, other); |