* provided "as is" without express or implied warranty. *
**************************************************************************/
-/*
-$Log$
-Revision 1.10.6.1 2002/08/28 15:06:49 alibrary
-Updating to v3-09-01
-
-Revision 1.11 2002/08/18 20:20:48 hristov
-InitGui removed (J.Chudoba)
-
-Revision 1.10 2002/02/18 14:26:14 hristov
-#include <AliConfig.h> removed
-
-Revision 1.9 2002/01/09 17:05:03 morsch
-Increase memory allocated for ZEBRA.
-
-Revision 1.8 2001/10/04 15:32:36 hristov
-Instantiation of AliConfig removed
-
-Revision 1.7 2001/05/22 11:39:48 buncic
-Restored proper name for top level AliRoot folder.
-
-Revision 1.6 2001/05/21 17:22:50 buncic
-Fixed problem with missing AliConfig while reading galice.root
-
-Revision 1.5 2001/05/16 14:57:07 alibrary
-New files for folders and Stack
-
-Revision 1.4 2000/12/20 08:39:37 fca
-Support for Cerenkov and process list in Virtual MC
-
-Revision 1.3 1999/09/29 09:24:07 fca
-Introduction of the Copyright and cvs Log
-
-*/
+/* $Id$ */
//////////////////////////////////////////////////////////////////////////
// //
#include <TRint.h>
#include <TFile.h>
#include <AliRun.h>
+#include "Riostream.h"
+#include "ARVersion.h"
#if defined __linux
//On linux Fortran wants this, so we give to it!
int xargc=0;
#endif
+#ifdef FORTRAN_G95
+extern "C" void g95_runtime_start();
+#endif
+
#if defined WIN32
extern "C" int __fastflag=0;
extern "C" int _pctype=0;
extern "C" int __mb_cur_max=0;
#endif
-int gcbank_[4000000];
-
//_____________________________________________________________________________
int main(int argc, char **argv)
{
// run and event number, the number of vertices, tracks and primary tracks
// in the event.
+ for ( int i = 1; i < argc; ++i )
+ {
+ TString argument(argv[i]);
+
+ if (argument=="--version")
+ {
+ cout << "aliroot " << ALIROOT_SVN_REVISION << " " << ALIROOT_SVN_BRANCH << endl;
+ return 0;
+ }
+ }
+
// Create new configuration
new AliRun("gAlice","The ALICE Off-line Simulation Framework");
// Start interactive geant
- TRint *theApp = new TRint("aliroot", &argc, argv, 0, 0);
+ TRint *theApp = new TRint("aliroot", &argc, argv);
+#ifdef FORTRAN_G95
+ g95_runtime_start();
+#endif
// --- Start the event loop ---
theApp->Run();
return(0);
}
-