pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2025-12-12 17:51:28 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Bug Fix] Cleanup Perl croaks for Spire parser. (#1908)

Browse Source 
- Client::SendToInstance()
- Mob::DeleteBucket()
- Mob::GetBucket()
- Mob::GetBucketExpires()
- Mob::GetBucketRemaining()
- Mob::SetBucket()
This commit is contained in:
Kinglykrab 2021-12-30 20:47:52 -05:00 committed by GitHub
parent d280d54446
commit c0f57bed1f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
zone/perl_client.cpp
View File

@ -5613,7 +5613,7 @@ XS(XS_Client_SendToInstance);
XS(XS_Client_SendToInstance) { XS(XS_Client_SendToInstance) {
dXSARGS; dXSARGS;
if (items != 10) if (items != 10)
Perl_croak(aTHX_ "Usage: Client::SendToInstance(THIS, std::string instance_type, std::string zone_short_name, uint32 instance_version, float x, float y, float z, float heading, std::string instance_identifier, uint32 duration)"); Perl_croak(aTHX_ "Usage: Client::SendToInstance(THIS, string instance_type, string zone_short_name, uint32 instance_version, float x, float y, float z, float heading, string instance_identifier, uint32 duration)");
{ {
Client* THIS; Client* THIS;
std::string instance_type = (std::string) SvPV_nolen(ST(1)); std::string instance_type = (std::string) SvPV_nolen(ST(1));

10
zone/perl_mob.cpp
View File

@ -6203,7 +6203,7 @@ XS(XS_Mob_DeleteBucket);
XS(XS_Mob_DeleteBucket) { XS(XS_Mob_DeleteBucket) {
dXSARGS; dXSARGS;
if (items != 2) if (items != 2)
Perl_croak(aTHX_ "Usage: Mob::DeleteBucket(THIS, std::string bucket_name)"); // @categories Script Utility Perl_croak(aTHX_ "Usage: Mob::DeleteBucket(THIS, string bucket_name)"); // @categories Script Utility
{ {
Mob* THIS; Mob* THIS;
std::string bucket_name = (std::string) SvPV_nolen(ST(1)); std::string bucket_name = (std::string) SvPV_nolen(ST(1));
@ -6217,7 +6217,7 @@ XS(XS_Mob_GetBucket);
XS(XS_Mob_GetBucket) { XS(XS_Mob_GetBucket) {
dXSARGS; dXSARGS;
if (items != 2) if (items != 2)
Perl_croak(aTHX_ "Usage: Mob::GetBucket(THIS, std::string bucket_name)"); // @categories Script Utility Perl_croak(aTHX_ "Usage: Mob::GetBucket(THIS, string bucket_name)"); // @categories Script Utility
{ {
Mob* THIS; Mob* THIS;
dXSTARG; dXSTARG;
@ -6236,7 +6236,7 @@ XS(XS_Mob_GetBucketExpires);
XS(XS_Mob_GetBucketExpires) { XS(XS_Mob_GetBucketExpires) {
dXSARGS; dXSARGS;
if (items != 2) if (items != 2)
Perl_croak(aTHX_ "Usage: Mob::GetBucketExpires(THIS, std::string bucket_name)"); // @categories Script Utility Perl_croak(aTHX_ "Usage: Mob::GetBucketExpires(THIS, string bucket_name)"); // @categories Script Utility
{ {
Mob* THIS; Mob* THIS;
dXSTARG; dXSTARG;
@ -6273,7 +6273,7 @@ XS(XS_Mob_GetBucketRemaining);
XS(XS_Mob_GetBucketRemaining) { XS(XS_Mob_GetBucketRemaining) {
dXSARGS; dXSARGS;
if (items != 2) if (items != 2)
Perl_croak(aTHX_ "Usage: Mob::GetBucketRemaining(THIS, std::string bucket_name)"); // @categories Script Utility Perl_croak(aTHX_ "Usage: Mob::GetBucketRemaining(THIS, string bucket_name)"); // @categories Script Utility
{ {
Mob* THIS; Mob* THIS;
dXSTARG; dXSTARG;
@ -6292,7 +6292,7 @@ XS(XS_Mob_SetBucket);
XS(XS_Mob_SetBucket) { XS(XS_Mob_SetBucket) {
dXSARGS; dXSARGS;
if (items < 3 || items > 4) if (items < 3 || items > 4)
Perl_croak(aTHX_ "Usage: Mob::SetBucket(THIS, std::string bucket_name, std::string bucket_value, [std::string expiration])"); // @categories Script Utility Perl_croak(aTHX_ "Usage: Mob::SetBucket(THIS, string bucket_name, string bucket_value, [string expiration])"); // @categories Script Utility
{ {
Mob* THIS; Mob* THIS;
std::string key = (std::string) SvPV_nolen(ST(1)); std::string key = (std::string) SvPV_nolen(ST(1));