… | |
… | |
1021 | void |
1021 | void |
1022 | cfperl_send_msg (client *ns, int color, const char *type, const char *msg) |
1022 | cfperl_send_msg (client *ns, int color, const char *type, const char *msg) |
1023 | { |
1023 | { |
1024 | CALL_BEGIN (4); |
1024 | CALL_BEGIN (4); |
1025 | CALL_ARG (ns); |
1025 | CALL_ARG (ns); |
1026 | CALL_ARG (color); |
|
|
1027 | CALL_ARG (type); |
1026 | CALL_ARG (type); |
1028 | CALL_ARG_SV (newSVpv_utf8 (msg)); |
1027 | CALL_ARG_SV (newSVpv_utf8 (msg)); |
|
|
1028 | CALL_ARG (color); |
1029 | CALL_CALL ("cf::client::send_msg", G_VOID); |
1029 | CALL_CALL ("cf::client::send_msg", G_VOID); |
1030 | CALL_END; |
1030 | CALL_END; |
1031 | } |
1031 | } |
1032 | |
1032 | |
1033 | int |
1033 | int |