thijn/SqMod
1
0
Fork 0
mirror of https://github.com/VCMP-SqMod/SqMod.git synced 2024-11-08 00:37:15 +01:00
Code Releases Activity

Use optimized type identification.

Browse Source
This commit is contained in:
Sandu Liviu Catalin 2021-03-20 11:49:58 +02:00
parent f11622177e
commit 86e070d61c
1 changed files with 54 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
module/Core/Common.cpp
View File

@ -318,7 +318,15 @@ SQInteger PopStackInteger(HSQUIRRELVM vm, SQInteger idx)
}
case OT_INSTANCE:
{
// Attempt to treat the value as a signed long instance
SQUserPointer tag;
// Attempt to retrieve the type tag
if (SQ_FAILED(sq_gettypetag(vm, -1, &tag)))
{
break;
}
// Is the instance SLongInt? (signed long)
else if (static_cast< AbstractStaticClassData * >(tag) == StaticClassTypeTag< SLongInt >::Get())
{
try
{
return ConvTo< SQInteger >::From(Var< const SLongInt & >(vm, idx).value.GetNum());
@ -327,7 +335,10 @@ SQInteger PopStackInteger(HSQUIRRELVM vm, SQInteger idx)
{
// Just ignore it...
}
// Attempt to treat the value as a unsigned long instance
}
// Is the instance ULongInt? (unsigned long)
else if (static_cast< AbstractStaticClassData * >(tag) == StaticClassTypeTag< ULongInt >::Get())
{
try
{
return ConvTo< SQInteger >::From(Var< const ULongInt & >(vm, idx).value.GetNum());
@ -336,9 +347,13 @@ SQInteger PopStackInteger(HSQUIRRELVM vm, SQInteger idx)
{
// Just ignore it...
}
}
else
{
// Attempt to get the size of the instance as a fall back
return sq_getsize(vm, idx);
}
}
default: break;
}
// Default to 0
@ -391,7 +406,15 @@ SQFloat PopStackFloat(HSQUIRRELVM vm, SQInteger idx)
}
case OT_INSTANCE:
{
// Attempt to treat the value as a signed long instance
SQUserPointer tag;
// Attempt to retrieve the type tag
if (SQ_FAILED(sq_gettypetag(vm, -1, &tag)))
{
break;
}
// Is the instance SLongInt? (signed long)
else if (static_cast< AbstractStaticClassData * >(tag) == StaticClassTypeTag< SLongInt >::Get())
{
try
{
return ConvTo< SQFloat >::From(Var< const SLongInt & >(vm, idx).value.GetNum());
@ -400,7 +423,10 @@ SQFloat PopStackFloat(HSQUIRRELVM vm, SQInteger idx)
{
// Just ignore it...
}
// Attempt to treat the value as a unsigned long instance
}
// Is the instance ULongInt? (unsigned long)
else if (static_cast< AbstractStaticClassData * >(tag) == StaticClassTypeTag< ULongInt >::Get())
{
try
{
return ConvTo< SQFloat >::From(Var< const ULongInt & >(vm, idx).value.GetNum());
@ -409,9 +435,13 @@ SQFloat PopStackFloat(HSQUIRRELVM vm, SQInteger idx)
{
// Just ignore it...
}
}
else
{
// Attempt to get the size of the instance as a fall back
return ConvTo< SQFloat >::From(sq_getsize(vm, idx));
}
}
default: break;
}
// Default to 0