diff options
| author | Andreas Bregas <ab@openoffice.org> | 2001-11-26 13:26:14 +0000 |
|---|---|---|
| committer | Andreas Bregas <ab@openoffice.org> | 2001-11-26 13:26:14 +0000 |
| commit | 2bbc163343bb03de5f3a062d85ccd3d5a67bcd89 (patch) | |
| tree | 2316a95753e323b0b74d2db7717a4456d8b479d9 /basic | |
| parent | 543c6d10d7f6d812bfcee8c06b3ef09c089e9cda (diff) | |
#94896# StepLOADNC: Exchanged , and . seperators in call to StringToDouble
Diffstat (limited to 'basic')
| -rw-r--r-- | basic/source/runtime/step1.cxx | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/basic/source/runtime/step1.cxx b/basic/source/runtime/step1.cxx index 8ac13b5513f0..0bbcc9460d4d 100644 --- a/basic/source/runtime/step1.cxx +++ b/basic/source/runtime/step1.cxx @@ -2,9 +2,9 @@ * * $RCSfile: step1.cxx,v $ * - * $Revision: 1.3 $ + * $Revision: 1.4 $ * - * last change: $Author: er $ $Date: 2001-11-23 19:17:50 $ + * last change: $Author: ab $ $Date: 2001-11-26 14:26:14 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -70,6 +70,9 @@ #include "iosys.hxx" #include "image.hxx" +#include "segmentc.hxx" +#pragma SW_SEGMENT_CLASS( SBRUNTIME, SBRUNTIME_CODE ) + // Laden einer numerischen Konstanten (+ID) void SbiRuntime::StepLOADNC( USHORT nOp1 ) @@ -89,8 +92,7 @@ void SbiRuntime::StepLOADNC( USHORT nOp1 ) aStr += '.'; aStr += aStr2; } - double n = SolarMath::StringToDouble( aStr.GetBuffer(), '.', ',', nErrno ); - //ALT: double n = atof( pImg->GetString( nOp1 ) ); + double n = SolarMath::StringToDouble( aStr.GetBuffer(), ',', '.', nErrno ); p->PutDouble( n ); PushVar( p ); |