diff --git a/basic/source/runtime/methods1.cxx b/basic/source/runtime/methods1.cxx index 34ead7fe4b43..eb0f245577ba 100644 --- a/basic/source/runtime/methods1.cxx +++ b/basic/source/runtime/methods1.cxx @@ -1415,7 +1415,7 @@ RTLFUNC(GetSystemTicks) StarBASIC::Error( ERRCODE_BASIC_BAD_ARGUMENT ); return; } - rPar.Get(0)->PutLong( tools::Time::GetSystemTicks() ); + rPar.Get(0)->PutUInt64( tools::Time::GetSystemTicks() ); } RTLFUNC(GetPathSeparator) diff --git a/basic/source/runtime/stdobj.cxx b/basic/source/runtime/stdobj.cxx index 0eac637f8fba..34ce7d81ea1e 100644 --- a/basic/source/runtime/stdobj.cxx +++ b/basic/source/runtime/stdobj.cxx @@ -307,7 +307,7 @@ static Methods aMethods[] = { { "GetPathSeparator", SbxSTRING, FUNCTION_,RTLNAME(GetPathSeparator),0 }, { "GetProcessServiceManager", SbxOBJECT, 0 | FUNCTION_, RTLNAME(GetProcessServiceManager),0 }, { "GetSolarVersion", SbxLONG, FUNCTION_,RTLNAME(GetSolarVersion),0 }, -{ "GetSystemTicks", SbxLONG, FUNCTION_,RTLNAME(GetSystemTicks),0 }, +{ "GetSystemTicks", SbxSALUINT64,FUNCTION_,RTLNAME(GetSystemTicks),0 }, { "GetSystemType", SbxINTEGER, FUNCTION_,RTLNAME(GetSystemType),0 }, { "GlobalScope", SbxOBJECT, FUNCTION_,RTLNAME(GlobalScope),0 }, { "Green", SbxINTEGER, 1 | FUNCTION_ | NORMONLY_, RTLNAME(Green),0 },