Aumentata la dimensione della stringa di parcheggio per la traduzione
in lettere dei numeri. git-svn-id: svn://10.65.10.50/trunk@2337 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
6e6aa29468
commit
b7d4ec2003
@ -3,7 +3,7 @@
|
|||||||
|
|
||||||
#include <real.h>
|
#include <real.h>
|
||||||
|
|
||||||
HIDDEN char __string[80];
|
HIDDEN char __string[128];
|
||||||
const real ZERO (0.0);
|
const real ZERO (0.0);
|
||||||
|
|
||||||
#ifdef __LONGDOUBLE__
|
#ifdef __LONGDOUBLE__
|
||||||
@ -1068,15 +1068,15 @@ char *real ::literals () const
|
|||||||
real tmp_real = *this;
|
real tmp_real = *this;
|
||||||
tmp_real.round();
|
tmp_real.round();
|
||||||
|
|
||||||
TString80 r (tmp_real.string (0, 0));
|
TString r (tmp_real.string (0, 0));
|
||||||
const bool negativo = r[0] == '-';
|
const bool negativo = r[0] == '-';
|
||||||
if (negativo)
|
if (negativo)
|
||||||
r.ltrim (1);
|
r.ltrim (1);
|
||||||
|
|
||||||
TFixed_string risultato (__string, 80);
|
TFixed_string risultato (__string, 128);
|
||||||
risultato.cut (0);
|
risultato.cut (0);
|
||||||
|
|
||||||
TString80 centinaia;
|
TString centinaia;
|
||||||
|
|
||||||
for (int migliaia = 0;; migliaia++)
|
for (int migliaia = 0;; migliaia++)
|
||||||
{
|
{
|
||||||
@ -1186,8 +1186,8 @@ char* real::string(const char *picture) const
|
|||||||
if (strcmp (picture, "LETTERE") == 0)
|
if (strcmp (picture, "LETTERE") == 0)
|
||||||
return literals ();
|
return literals ();
|
||||||
|
|
||||||
TString80 v (string());
|
TString v (string());
|
||||||
TString80 f (picture);
|
TString f (picture);
|
||||||
|
|
||||||
const int voluti = get_picture_decimals (f);
|
const int voluti = get_picture_decimals (f);
|
||||||
const int virgola = v.find ('.');
|
const int virgola = v.find ('.');
|
||||||
|
Loading…
x
Reference in New Issue
Block a user