… | |
… | |
320 | inline void sv_to (SV *sv, unsigned long &v) { v = SvUV (sv); } |
320 | inline void sv_to (SV *sv, unsigned long &v) { v = SvUV (sv); } |
321 | inline void sv_to (SV *sv, signed long long &v) { v = ( signed long long)SvVAL64 (sv); } |
321 | inline void sv_to (SV *sv, signed long long &v) { v = ( signed long long)SvVAL64 (sv); } |
322 | inline void sv_to (SV *sv, unsigned long long &v) { v = (unsigned long long)SvVAL64 (sv); } |
322 | inline void sv_to (SV *sv, unsigned long long &v) { v = (unsigned long long)SvVAL64 (sv); } |
323 | inline void sv_to (SV *sv, float &v) { v = SvNV (sv); } |
323 | inline void sv_to (SV *sv, float &v) { v = SvNV (sv); } |
324 | inline void sv_to (SV *sv, double &v) { v = SvNV (sv); } |
324 | inline void sv_to (SV *sv, double &v) { v = SvNV (sv); } |
325 | inline void sv_to (SV *sv, client * &v) { v = (client *)SvPTR_ornull (sv, "cf::client"); } |
325 | inline void sv_to (SV *sv, client * &v) { v = (client *)(attachable *)SvPTR_ornull (sv, "cf::client"); } |
326 | inline void sv_to (SV *sv, player * &v) { v = (player *)SvPTR_ornull (sv, "cf::player"); } |
326 | inline void sv_to (SV *sv, player * &v) { v = (player *)(attachable *)SvPTR_ornull (sv, "cf::player"); } |
327 | inline void sv_to (SV *sv, object * &v) { v = (object *)SvPTR_ornull (sv, "cf::object"); } |
327 | inline void sv_to (SV *sv, object * &v) { v = (object *)(attachable *)SvPTR_ornull (sv, "cf::object"); } |
328 | inline void sv_to (SV *sv, archetype * &v) { v = (archetype *)SvPTR_ornull (sv, "cf::arch"); } |
328 | inline void sv_to (SV *sv, archetype * &v) { v = (archetype *)(attachable *)SvPTR_ornull (sv, "cf::arch"); } |
329 | inline void sv_to (SV *sv, maptile * &v) { v = (maptile *)SvPTR_ornull (sv, "cf::map"); } |
329 | inline void sv_to (SV *sv, maptile * &v) { v = (maptile *)(attachable *)SvPTR_ornull (sv, "cf::map"); } |
330 | inline void sv_to (SV *sv, partylist * &v) { v = (partylist *)SvPTR_ornull (sv, "cf::party"); } |
330 | inline void sv_to (SV *sv, partylist * &v) { v = (partylist *)SvPTR_ornull (sv, "cf::party"); } |
331 | inline void sv_to (SV *sv, region * &v) { v = (region *)SvPTR_ornull (sv, "cf::region"); } |
331 | inline void sv_to (SV *sv, region * &v) { v = (region *)SvPTR_ornull (sv, "cf::region"); } |
332 | inline void sv_to (SV *sv, living * &v) { v = (living *)SvPTR_ornull (sv, "cf::living"); } |
332 | inline void sv_to (SV *sv, living * &v) { v = (living *)SvPTR_ornull (sv, "cf::living"); } |
333 | |
333 | |
334 | inline void sv_to (SV *sv, New_Face * &v) { v = &new_faces[FindFace (SvPV_nolen (sv), 0)]; } //TODO |
334 | inline void sv_to (SV *sv, New_Face * &v) { v = &new_faces[FindFace (SvPV_nolen (sv), 0)]; } //TODO |
… | |
… | |
1918 | CODE: |
1918 | CODE: |
1919 | RETVAL = SvROK (obj) && mg_find (SvRV (obj), PERL_MAGIC_ext); |
1919 | RETVAL = SvROK (obj) && mg_find (SvRV (obj), PERL_MAGIC_ext); |
1920 | OUTPUT: |
1920 | OUTPUT: |
1921 | RETVAL |
1921 | RETVAL |
1922 | |
1922 | |
|
|
1923 | #bool |
|
|
1924 | #destroyed (attachable *at) |
|
|
1925 | # |
|
|
1926 | #void |
|
|
1927 | #destroy (attachable *at) |
|
|
1928 | |
1923 | MODULE = cf PACKAGE = cf::global |
1929 | MODULE = cf PACKAGE = cf::global |
1924 | |
1930 | |
1925 | int invoke (SV *klass, int event, ...) |
1931 | int invoke (SV *klass, int event, ...) |
1926 | CODE: |
1932 | CODE: |
1927 | if (KLASS_OF (event) != KLASS_GLOBAL) croak ("event class must be GLOBAL"); |
1933 | if (KLASS_OF (event) != KLASS_GLOBAL) croak ("event class must be GLOBAL"); |