From cc7a4e7aaa85f58bf1a499be4d76608edb46f855 Mon Sep 17 00:00:00 2001
From: matteo <matteo@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Wed, 22 Nov 1995 13:42:39 +0000
Subject: [PATCH] Corretta assegnazione di value

git-svn-id: svn://10.65.10.50/trunk@2194 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 include/expr.cpp | 13 +++++++++++--
 include/expr.h   |  3 +--
 2 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/include/expr.cpp b/include/expr.cpp
index 38b8256e2..b7f1b84f8 100755
--- a/include/expr.cpp
+++ b/include/expr.cpp
@@ -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;
     }
 }
diff --git a/include/expr.h b/include/expr.h
index 2314fb2f0..366175009 100755
--- a/include/expr.h
+++ b/include/expr.h
@@ -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);}