Salome HOME
DCQ : Merge with Ecole_ete_a6.
[modules/kernel.git] / src / SALOMEDS / SALOMEDS_AttributeReal_i.cxx
1 //  SALOME SALOMEDS : data structure of SALOME and sources of Salome data server 
2 //
3 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
5 // 
6 //  This library is free software; you can redistribute it and/or 
7 //  modify it under the terms of the GNU Lesser General Public 
8 //  License as published by the Free Software Foundation; either 
9 //  version 2.1 of the License. 
10 // 
11 //  This library is distributed in the hope that it will be useful, 
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of 
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
14 //  Lesser General Public License for more details. 
15 // 
16 //  You should have received a copy of the GNU Lesser General Public 
17 //  License along with this library; if not, write to the Free Software 
18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
19 // 
20 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
21 //
22 //
23 //
24 //  File   : SALOMEDS_AttributeReal_i.cxx
25 //  Author : Yves FRICAUD
26 //  Module : SALOME
27 //  $Header$
28
29 using namespace std;
30 #include "SALOMEDS_AttributeReal_i.hxx"
31 #include "SALOMEDS_SObject_i.hxx"
32
33 CORBA::Double SALOMEDS_AttributeReal_i::Value() {
34   return Handle(TDataStd_Real)::DownCast(_myAttr)->Get();
35 }
36
37 void SALOMEDS_AttributeReal_i::SetValue(CORBA::Double value) {
38   CheckLocked();
39   Handle(TDataStd_Real)::DownCast(_myAttr)->Set(value);
40 }
41
42 char* SALOMEDS_AttributeReal_i::Store() {
43   char* RealVal = new char[25];
44   sprintf(RealVal, "%f", Value());
45   return RealVal;
46 }
47
48 void SALOMEDS_AttributeReal_i::Restore(const char* value) {
49   char *err = NULL;
50   CORBA::Double r =  strtod(value, &err);
51   if (err != value) SetValue(r);
52 }