Salome HOME
updated copyright message
[modules/med.git] / src / ParaMEDCouplingCorba / ParaMEDCouplingFieldDoubleServant.cxx
1 // Copyright (C) 2007-2023  CEA, EDF
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License, or (at your option) any later version.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 #include "ParaMEDCouplingFieldDoubleServant.hxx"
21 #include "utilities.h"
22 using namespace MEDCoupling;
23
24 ParaMEDCouplingFieldDoubleServant::ParaMEDCouplingFieldDoubleServant(CORBA::ORB_ptr orb,MEDCouplingFieldDouble* field):MEDCouplingFieldDoubleServant(field)
25 {
26   Engines::MPIObject_var pobj = POA_SALOME_MED::ParaMEDCouplingFieldDoubleCorbaInterface::_this();
27   BCastIOR(orb,pobj,false);
28 }
29
30 void ParaMEDCouplingFieldDoubleServant::Register()
31 {
32   if(_numproc == 0)
33     for(int ip=1;ip<_nbproc;ip++)
34       {
35         SALOME_MED::ParaMEDCouplingFieldDoubleCorbaInterface_var fieldPtr=SALOME_MED::ParaMEDCouplingFieldDoubleCorbaInterface::_narrow((*_tior)[ip]);
36         fieldPtr->Register();
37       }
38   MEDCouplingFieldDoubleServant::Register();
39 }
40
41 void ParaMEDCouplingFieldDoubleServant::UnRegister()
42 {
43   if(_numproc == 0)
44     for(int ip=1;ip<_nbproc;ip++)
45       {
46         SALOME_MED::ParaMEDCouplingFieldDoubleCorbaInterface_var fieldPtr=SALOME_MED::ParaMEDCouplingFieldDoubleCorbaInterface::_narrow((*_tior)[ip]);
47         fieldPtr->UnRegister();
48       }
49   MEDCouplingFieldDoubleServant::UnRegister();
50 }