Corretta assegnazione di value

git-svn-id: svn://10.65.10.50/trunk@2194 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
matteo 1995-11-22 13:42:39 +00:00
parent 58daae6acd
commit cc7a4e7aaa
2 changed files with 12 additions and 4 deletions

View File

@ -7,6 +7,13 @@
#include <utility.h>
#include <date.h>
TValue::TValue(const real& val)
{
_r = val;
_s = val.string( );
}
TCodearray::TCodearray(int size) : _rpn(size)
{
clear();
@ -57,7 +64,8 @@ void TVararray::set(const char* name, const real& val)
for (int i = 0; i < _array.items(); i++)
if (strcmp(((TVar&) _array[i]).getname(), name) == 0)
{
((TVar&) _array[i]) = (TValue&) val;
TValue tempval( val );
((TVar&) _array[i]) = tempval;
return;
}
}
@ -69,7 +77,8 @@ void TVararray::set(const char* name, const char* val)
for (int i = 0; i < _array.items(); i++)
if (strcmp(((TVar&) _array[i]).getname(), name) == 0)
{
((TVar&) _array[i]) = (TValue&) val;
TValue tempval( val );
((TVar&) _array[i]) = tempval;
return;
}
}

View File

@ -92,8 +92,7 @@ public:
{ _s = val; _r = real(val);}
// @cmember Costruttore. Inizializza TValue con un reale
TValue(const real& val)
{ _r = val; _s = val.string();}
TValue(const real& val);
// @cmember Costruttore. Inizializza TValue con una stringa
TValue(const char* val)
{ _s = val; _r = real(val);}