[INT64] Further int64 cleanup in Perl SetHP() and GetSpellHPBonuses() in Perl/Lua. (#2222)

This commit is contained in:
Kinglykrab
2022-05-29 17:36:32 -04:00
committed by GitHub
parent d493a6627b
commit 11369247b1
5 changed files with 7 additions and 7 deletions
+2 -2
View File
@@ -770,7 +770,7 @@ XS(XS_Mob_SetHP) {
Perl_croak(aTHX_ "Usage: Mob::SetHP(THIS, int64 hp)"); // @categories Stats and Attributes
{
Mob *THIS;
int64 hp = (int32) SvIV(ST(1));
int64 hp = (int64) SvIV(ST(1));
VALIDATE_THIS_IS_MOB;
THIS->SetHP(hp);
}
@@ -1630,7 +1630,7 @@ XS(XS_Mob_GetSpellHPBonuses) {
Perl_croak(aTHX_ "Usage: Mob::GetSpellHPBonuses(THIS)"); // @categories Spells and Disciplines
{
Mob *THIS;
int32 RETVAL;
int64 RETVAL;
dXSTARG;
VALIDATE_THIS_IS_MOB;
RETVAL = THIS->GetSpellHPBonuses();