minor bugfix: negative return value in case of error

[u/mrichter/AliRoot.git] / FMD / scripts / Compile.C

//____________________________________________________________________
//
// $Id$
//
// Script to compile (using ACLic) and load a script.  It sets the
// include path to contain the relevant directories. 
//
/** @defgroup FMD_script Scripts
    @brief Scripts for the FMD 
*/
/** @defgroup simple_script Simple scripts
    @ingroup FMD_script
    @brief Scripts for the FMD 
*/
/** Compile an FMD script using ACLic
    @param script Script to compile
    @param option Compile option 
    @ingroup FMD_script
*/
void
AddInclude(const char* what)
{
  TString path(gSystem->GetIncludePath());
  if (path.Contains(what)) return;
  gSystem->AddIncludePath(what);
}
Bool_t
Compile(const char* script, Option_t* option="g")
{
  if (!script || script[0] == '\0') { 
    std::cerr << "No script to compile!" << std::endl;
    return kFALSE;
  }
  gSystem->Load("libANALYSIS.so");
  gSystem->Load("libANALYSISalice.so");
  gSystem->Load("libFMDutil.so");
  TString macroPath(gROOT->GetMacroPath());
  macroPath.Append(":${ALICE_ROOT}/FMD/scripts");
  gROOT->SetMacroPath(macroPath.Data());
  AddInclude("-I`root-config --incdir`");
  AddInclude("-I${ALICE_ROOT}");
  AddInclude("-I${ALICE_ROOT}/include");
  AddInclude("-I${ALICE_ROOT}/FMD");
  AddInclude("-I${ALICE_ROOT}/geant3/TGeant3");
  AddInclude("-I${ALICE_ROOT}/../aliroot.trunk");
  AddInclude("-I${ALICE_ROOT}/../aliroot.trunk/FMD");
  AddInclude("-I${ALICE_ROOT}/../aliroot.trunk/RAW");
  Long_t ret = gROOT->ProcessLine(Form(".L %s+%s", script, option));
  return ret == 0;
}

//____________________________________________________________________
//
// EOF
//