#include "machdefs.h" #include #include #include "pexceptions.h" #include "peidainit.h" // --- Classe d'initialisation de PEIDA++, (PPersistMgr en particulier) int PeidaInitiator::FgInit = 0; PeidaInitiator::PeidaInitiator() { FgInit++; if (FgInit > 1) return; InitFailNewHandler(); #ifdef xx__mac__ //InitToolBox(); //SIOUXSettings.initializeTB = FALSE; SIOUXSettings.autocloseonquit = FALSE; SIOUXSettings.asktosaveonclose = FALSE; SIOUXSettings.showstatusline = TRUE; #endif //DEL PPersistMgr::classList = new PPersistMgr::ClassList; //DEL PShPersist::objList = new PShPersist::ObjList; #if (!defined(__GNUG__) && !defined(__MWERKS__) && !defined(HPUX)) // pas de bufferisation pour printf cmv 18/3/97 selon E.A. // setvbuf(stdout,NULL,_IOLBF,0); setvbuf(stderr,NULL,_IOLBF,0); setlinebuf(stdout); setlinebuf(stderr); #endif // si var env PEIDA_NOPRTVER definie pas de print if(!getenv("PEIDA_NOPRTVER")) PrintPeidaVersion(); } PeidaInitiator::~PeidaInitiator() { FgInit--; /* if (FgInit == 0) { delete PPersistMgr::classList; PPersistMgr::classList = NULL; delete PShPersist::objList; PShPersist::objList = NULL; } */ } double PeidaInitiator::Version(bool fgprt) { if (fgprt) PrintPeidaVersion(); return(PeidaVersion()); } // On met un objet initiator en statique, pour les loaders qui savent // appeler le constructeur des objets statiques Reza 08/98 static PeidaInitiator ppeidainit;