Code causing warning messages during compilation corrected.
[u/mrichter/AliRoot.git] / TFluka / endraw.cxx
index 68c1995c0c6e12918618a818ff7ca8adcca3be2a..ff72ceb8f8fffe8055a4619bda9a402846ec36ba 100644 (file)
@@ -1,6 +1,8 @@
 #include <Riostream.h>
 #include "TVirtualMCApplication.h"
 #include "TFluka.h"
 #include <Riostream.h>
 #include "TVirtualMCApplication.h"
 #include "TFluka.h"
+#include "Fdimpar.h"  //(DIMPAR) fluka include
+#include "Ftrackr.h"  //(TRACKR) fluka common
 #ifndef WIN32
 # define endraw endraw_
 #else
 #ifndef WIN32
 # define endraw endraw_
 #else
 extern "C" {
 void endraw(Int_t& icode, Int_t& mreg, Double_t& rull, Double_t& xsco, Double_t& ysco, Double_t& zsco)
 {
 extern "C" {
 void endraw(Int_t& icode, Int_t& mreg, Double_t& rull, Double_t& xsco, Double_t& ysco, Double_t& zsco)
 {
+  ((TFluka*) gMC)->SetCaller(3);
   ((TFluka*) gMC)->SetIcode(icode);
   ((TFluka*) gMC)->SetIcode(icode);
-  ((TFluka*) gMC)->SetMreg(mreg);
   ((TFluka*) gMC)->SetRull(rull);
   ((TFluka*) gMC)->SetXsco(xsco);
   ((TFluka*) gMC)->SetYsco(ysco);
   ((TFluka*) gMC)->SetZsco(zsco);
   ((TFluka*) gMC)->SetRull(rull);
   ((TFluka*) gMC)->SetXsco(xsco);
   ((TFluka*) gMC)->SetYsco(ysco);
   ((TFluka*) gMC)->SetZsco(zsco);
-  cout << endl << " !!! I am in endraw - calling Stepping()" << endl;
-  ((TFluka*) gMC)->FutoTest();
+  ((TFluka*) gMC)->SetMreg(mreg);
   (TVirtualMCApplication::Instance())->Stepping();
 } // end of endraw
 } // end of extern "C"
   (TVirtualMCApplication::Instance())->Stepping();
 } // end of endraw
 } // end of extern "C"