summaryrefslogtreecommitdiff
path: root/basic/source/sbx/sbxint.cxx
diff options
context:
space:
mode:
Diffstat (limited to 'basic/source/sbx/sbxint.cxx')
-rw-r--r--basic/source/sbx/sbxint.cxx136
1 files changed, 68 insertions, 68 deletions
diff --git a/basic/source/sbx/sbxint.cxx b/basic/source/sbx/sbxint.cxx
index 7edef31d48d3..e43d6e5d8442 100644
--- a/basic/source/sbx/sbxint.cxx
+++ b/basic/source/sbx/sbxint.cxx
@@ -32,7 +32,7 @@ start:
switch( +p->eType )
{
case SbxNULL:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
SAL_FALLTHROUGH;
case SbxEMPTY:
nRes = 0; break;
@@ -47,7 +47,7 @@ start:
case SbxUSHORT:
if( p->nUShort > (sal_uInt16) SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else
nRes = (sal_Int16) p->nUShort;
@@ -55,11 +55,11 @@ start:
case SbxLONG:
if( p->nLong > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else if( p->nLong < SbxMININT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMININT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMININT;
}
else
nRes = (sal_Int16) p->nLong;
@@ -67,7 +67,7 @@ start:
case SbxULONG:
if( p->nULong > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else
nRes = (sal_Int16) p->nULong;
@@ -75,11 +75,11 @@ start:
case SbxSINGLE:
if( p->nSingle > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else if( p->nSingle < SbxMININT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMININT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMININT;
}
else
nRes = (sal_Int16) rtl::math::round( p->nSingle );
@@ -90,11 +90,11 @@ start:
if( tstVal > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else if( tstVal < SbxMININT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMININT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMININT;
}
else
nRes = (sal_Int16) tstVal;
@@ -103,11 +103,11 @@ start:
case SbxSALINT64:
if( p->nInt64 > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else if( p->nInt64 < SbxMININT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMININT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMININT;
}
else
nRes = (sal_Int16) p->nInt64;
@@ -115,7 +115,7 @@ start:
case SbxSALUINT64:
if( p->uInt64 > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else
nRes = (sal_Int16) p->uInt64;
@@ -136,11 +136,11 @@ start:
if( dVal > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else if( dVal < SbxMININT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMININT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMININT;
}
else
nRes = (sal_Int16) rtl::math::round( dVal );
@@ -159,11 +159,11 @@ start:
nRes = 0;
else if( d > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXINT;
}
else if( d < SbxMININT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMININT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMININT;
}
else
nRes = (sal_Int16) rtl::math::round( d );
@@ -176,7 +176,7 @@ start:
nRes = pVal->GetInteger();
else
{
- SbxBase::SetError( ERRCODE_SBX_NO_OBJECT ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_NO_OBJECT ); nRes = 0;
}
break;
}
@@ -212,7 +212,7 @@ start:
p = &aTmp; goto start;
default:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION ); nRes = 0;
}
return nRes;
}
@@ -272,23 +272,23 @@ start:
if( pVal )
pVal->PutInteger( n );
else
- SbxBase::SetError( ERRCODE_SBX_NO_OBJECT );
+ SbxBase::SetError( ERRCODE_BASIC_NO_OBJECT );
break;
}
case SbxBYREF | SbxCHAR:
if( n < SbxMINCHAR )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMINCHAR;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMINCHAR;
}
*p->pChar = (char) n; break;
case SbxBYREF | SbxBYTE:
if( n > SbxMAXBYTE )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXBYTE;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXBYTE;
}
else if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->pByte = (sal_uInt8) n; break;
case SbxBYREF | SbxINTEGER:
@@ -298,7 +298,7 @@ start:
case SbxBYREF | SbxUSHORT:
if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->pUShort = (sal_uInt16) n; break;
case SbxBYREF | SbxLONG:
@@ -306,7 +306,7 @@ start:
case SbxBYREF | SbxULONG:
if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->pULong = (sal_uInt32) n; break;
case SbxBYREF | SbxCURRENCY:
@@ -316,7 +316,7 @@ start:
case SbxBYREF | SbxSALUINT64:
if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW );
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW );
*p->puInt64 = 0;
}
else
@@ -329,7 +329,7 @@ start:
*p->pDouble = (double) n; break;
default:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
}
}
@@ -341,11 +341,11 @@ sal_Int64 ImpDoubleToSalInt64( double d )
sal_Int64 nRes;
if( d > SbxMAXSALINT64 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXSALINT64;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXSALINT64;
}
else if( d < SbxMINSALINT64 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMINSALINT64;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMINSALINT64;
}
else
nRes = (sal_Int64) rtl::math::round( d );
@@ -357,11 +357,11 @@ sal_uInt64 ImpDoubleToSalUInt64( double d )
sal_uInt64 nRes;
if( d > SbxMAXSALUINT64 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXSALUINT64;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXSALUINT64;
}
else if( d < 0.0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = 0;
}
else
nRes = (sal_uInt64) rtl::math::round( d );
@@ -373,7 +373,7 @@ double ImpSalUInt64ToDouble( sal_uInt64 n )
{
double d = 0.0;
if( n > SbxMAXSALINT64 )
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
else
d = (double)(sal_Int64) n;
return d;
@@ -388,7 +388,7 @@ start:
switch( +p->eType )
{
case SbxNULL:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
SAL_FALLTHROUGH;
case SbxEMPTY:
nRes = 0; break;
@@ -420,7 +420,7 @@ start:
case SbxSALUINT64:
if( p->uInt64 > SbxMAXSALINT64 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXSALINT64;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXSALINT64;
}
else
nRes = (sal_Int64) p->uInt64;
@@ -455,7 +455,7 @@ start:
nRes = pVal->GetInt64();
else
{
- SbxBase::SetError( ERRCODE_SBX_NO_OBJECT ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_NO_OBJECT ); nRes = 0;
}
break;
}
@@ -493,7 +493,7 @@ start:
p = &aTmp; goto start;
default:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION ); nRes = 0;
}
return nRes;
}
@@ -554,69 +554,69 @@ start:
if( pVal )
pVal->PutInt64( n );
else
- SbxBase::SetError( ERRCODE_SBX_NO_OBJECT );
+ SbxBase::SetError( ERRCODE_BASIC_NO_OBJECT );
break;
}
case SbxBYREF | SbxCHAR:
if( n > SbxMAXCHAR )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXCHAR;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXCHAR;
}
else if( n < SbxMINCHAR )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMINCHAR;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMINCHAR;
}
*p->pChar = (sal_Unicode) n; break;
case SbxBYREF | SbxBYTE:
if( n > SbxMAXBYTE )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXBYTE;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXBYTE;
}
else if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->pByte = (sal_uInt8) n; break;
case SbxBYREF | SbxINTEGER:
case SbxBYREF | SbxBOOL:
if( n > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXINT;
}
else if( n < SbxMININT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMININT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMININT;
}
*p->pInteger = (sal_Int16) n; break;
case SbxBYREF | SbxERROR:
case SbxBYREF | SbxUSHORT:
if( n > SbxMAXUINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXUINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXUINT;
}
else if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->pUShort = (sal_uInt16) n; break;
case SbxBYREF | SbxLONG:
if( n > SbxMAXLNG )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXLNG;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXLNG;
}
else if( n < SbxMINLNG )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMINLNG;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMINLNG;
}
*p->pLong = (sal_Int32) n; break;
case SbxBYREF | SbxULONG:
if( n > SbxMAXULNG )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXULNG;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXULNG;
}
else if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->pULong = (sal_uInt32) n; break;
case SbxBYREF | SbxSINGLE:
@@ -631,12 +631,12 @@ start:
case SbxBYREF | SbxSALUINT64:
if( n < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->puInt64 = n; break;
default:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
}
}
@@ -648,7 +648,7 @@ start:
switch( +p->eType )
{
case SbxNULL:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
SAL_FALLTHROUGH;
case SbxEMPTY:
nRes = 0; break;
@@ -680,7 +680,7 @@ start:
case SbxSALINT64:
if( p->nInt64 < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = 0;
}
else
nRes = (sal_uInt64) p->nInt64;
@@ -707,18 +707,18 @@ start:
nRes = 0;
else if( d > SbxMAXSALUINT64 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = SbxMAXSALUINT64;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = SbxMAXSALUINT64;
}
else if( d < 0.0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = 0;
}
else
nRes = (sal_uInt64) rtl::math::round( d );
}
else if( n64 < 0 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); nRes = 0;
}
else
{
@@ -733,7 +733,7 @@ start:
nRes = pVal->GetUInt64();
else
{
- SbxBase::SetError( ERRCODE_SBX_NO_OBJECT ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_NO_OBJECT ); nRes = 0;
}
break;
}
@@ -769,7 +769,7 @@ start:
p = &aTmp; goto start;
default:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION ); nRes = 0;
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION ); nRes = 0;
}
return nRes;
}
@@ -819,7 +819,7 @@ start:
if( !p->pOUString )
p->pOUString = new OUString;
if( n > SbxMAXSALINT64 )
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
else
{
::OString aOStr = OString::number( n );
@@ -833,45 +833,45 @@ start:
if( pVal )
pVal->PutUInt64( n );
else
- SbxBase::SetError( ERRCODE_SBX_NO_OBJECT );
+ SbxBase::SetError( ERRCODE_BASIC_NO_OBJECT );
break;
}
case SbxBYREF | SbxCHAR:
if( n > SbxMAXCHAR )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXCHAR;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXCHAR;
}
*p->pChar = (sal_Unicode) n; break;
case SbxBYREF | SbxBYTE:
if( n > SbxMAXBYTE )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXBYTE;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXBYTE;
}
*p->pByte = (sal_uInt8) n; break;
case SbxBYREF | SbxINTEGER:
case SbxBYREF | SbxBOOL:
if( n > SbxMAXINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXINT;
}
*p->pInteger = (sal_Int16) n; break;
case SbxBYREF | SbxERROR:
case SbxBYREF | SbxUSHORT:
if( n > SbxMAXUINT )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXUINT;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXUINT;
}
*p->pUShort = (sal_uInt16) n; break;
case SbxBYREF | SbxLONG:
if( n > SbxMAXLNG )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXLNG;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXLNG;
}
*p->pLong = (sal_Int32) n; break;
case SbxBYREF | SbxULONG:
if( n > SbxMAXULNG )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = SbxMAXULNG;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = SbxMAXULNG;
}
*p->pULong = (sal_uInt32) n; break;
case SbxBYREF | SbxSINGLE:
@@ -883,7 +883,7 @@ start:
case SbxBYREF | SbxCURRENCY:
if ( n > ( SbxMAXSALINT64 / CURRENCY_FACTOR ) )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW );
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW );
n = SbxMAXSALINT64;
}
*p->pnInt64 = ( sal_Int64) ( n * CURRENCY_FACTOR ); break;
@@ -892,12 +892,12 @@ start:
case SbxBYREF | SbxSALINT64:
if( n > SbxMAXSALINT64 )
{
- SbxBase::SetError( ERRCODE_SBX_OVERFLOW ); n = 0;
+ SbxBase::SetError( ERRCODE_BASIC_MATH_OVERFLOW ); n = 0;
}
*p->pnInt64 = (sal_Int64) n; break;
default:
- SbxBase::SetError( ERRCODE_SBX_CONVERSION );
+ SbxBase::SetError( ERRCODE_BASIC_CONVERSION );
}
}