pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2026-05-17 07:18:37 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Perl parser works, still needs a little cleanup

Browse Source
This commit is contained in:
KimLS
2013-05-09 14:52:20 -07:00
parent b6c0e7c302
commit 0e4ac63b6b
10 changed files with 4528 additions and 4846 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/embxs.cpp
-21
View File
@@ -112,25 +112,4 @@ XS(XS_EQEmuIO_PRINT)
}
#endif //EMBPERL_IO_CAPTURE
#ifdef EMBPERL_COMMANDS
XS(XS_command_add); /* prototype to pass -Wmissing-prototypes */
XS(XS_command_add)
{
dXSARGS;
if (items != 3)
Perl_croak(aTHX_ "Usage: commands::command_add(name, desc, access)");
char *name = SvPV_nolen(ST(0));
char *desc = SvPV_nolen(ST(1));
int access = (int)SvIV(ST(2));
command_add_perl(name, desc, access);
XSRETURN_EMPTY;
}
#endif //EMBPERL_COMMANDS
#endif // EMBPERL