Changeset 1319 in Sophya for trunk/SophyaPI/PIext/cxxexecutor.cc


Ignore:
Timestamp:
Nov 10, 2000, 2:30:10 PM (25 years ago)
Author:
ercodmgr
Message:

Amelioration cxxexecutor - Reza , 10/11/2000

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SophyaPI/PIext/cxxexecutor.cc

    r1297 r1319  
    2727mModuleImportDefaultList.push_back("Samba");
    2828mModuleImportDefaultList.push_back("SkyMap");
    29 mModuleImportDefaultList.push_back("PMixer");
     29mModuleImportDefaultList.push_back("SkyT");
     30mModuleImportDefaultList.push_back("FitsIOServer");
     31mModuleImportDefaultList.push_back("IFFTW");
     32mModuleImportDefaultList.push_back("LinAlg");
    3033
    3134// Gestion des fichiers par default dans TmpDir
     
    364367os<<endl;
    365368
     369os<<"//---- function for Adding and displaying Objects  " << endl;
     370os<<"void Keep_Object(AnyDataObj & obj, string const & nom) \n{ \n"
     371  <<"  string name = nom; \n  NamedObjMgr om; \n"
     372  <<"  if (om.GetObj(name)) \n"
     373  <<"    cerr << \"KeepObj()/Warning Already kept object \" << endl; \n"
     374  <<"  else om.AddObj(obj, name); \n"
     375  <<"} \n" << endl;
     376os<<"void Display_Object(AnyDataObj & obj, string const & opt, string const & nom) \n { \n"
     377  <<"  string name = nom; \n  NamedObjMgr om; \n"
     378  <<"  if (!om.GetObj(name)) \n"
     379  <<"    om.AddObj(obj, name); \n"
     380  <<"  om.DisplayObj(name, opt); \n"
     381  <<"} \n" << endl;
     382
    366383os<<"//---- Objects and variables saving"<<endl
    367   <<"#define KeepObj(obj) ___nomobj = #obj; omg.AddObj(obj,___nomobj);"<<endl
     384  <<"#define KeepObj(obj) Keep_Object(obj, #obj);"<<endl
    368385  <<"#define KeepVar(var) ___nomobj = #var; omg.GetVarList().Get(___nomobj) = var ;"<<endl
    369386  <<endl;
     387
     388os<<"//---- Displaying objects and command execution"<<endl;
     389os<<"#define DisplayObj(obj, att) Display_Object(obj, att, #obj); \n" << endl;
     390os<<"#define ExecuteCommand(cmd) srvo.ExecuteCommand(cmd); \n" << endl;
    370391
    371392return;
     
    767788    if(     mModuleImportList[i]=="Samba")  mIncImportList.push_back("samba.h");
    768789    else if(mModuleImportList[i]=="SkyMap") mIncImportList.push_back("skymap.h");
    769     else if(mModuleImportList[i]=="PMixer") mIncImportList.push_back("pmixer.h");
     790    else if(mModuleImportList[i]=="SkyT") mIncImportList.push_back("skyt.h");
     791    else if(mModuleImportList[i]=="FitsIOServer") mIncImportList.push_back("fitsautoreader.h");
     792    else if(mModuleImportList[i]=="IFFTW") mIncImportList.push_back("fftwserver.h");
     793    else if(mModuleImportList[i]=="LinAlg") mIncImportList.push_back("intflapack.h");
    770794}
    771795
Note: See TracChangeset for help on using the changeset viewer.