ProdProcess corrected.

diff --git a/TFluka/TFluka.cxx b/TFluka/TFluka.cxx
index 000314a10b753d76939db3dd84888d7412a5e535..18d648d4151d3b54abe97e2d53b7e418ea128d39 100644 (file)
--- a/TFluka/TFluka.cxx
+++ b/TFluka/TFluka.cxx
@@ -2299,7 +2299,7 @@ void     TFluka::GetSecondary(Int_t isec, Int_t& particleId,
     Warning("GetSecondary","no secondaries available");
 } // end of GetSecondary
 
-TMCProcess TFluka::ProdProcess() const
+TMCProcess TFluka::ProdProcess(Int_t) const
 // Name of the process that has produced the secondary particles
 // in the current step
 {

diff --git a/TFluka/TFluka.h b/TFluka/TFluka.h
index 9cb257fbb23bc82262b65bf93e3ef6c6a03ccfe2..6c928e9fd605c9d1d3df9101d68027de26f7453b 100644 (file)
--- a/TFluka/TFluka.h
+++ b/TFluka/TFluka.h
@@ -204,7 +204,7 @@ class TFluka : public TVirtualMC {
   virtual Int_t    NSecondaries() const ;
   virtual void     GetSecondary(Int_t isec, Int_t& particleId, 
                        TLorentzVector& position, TLorentzVector& momentum);
-  virtual TMCProcess ProdProcess() const ;
+  virtual TMCProcess ProdProcess(Int_t iproc) const ;
   virtual Int_t    StepProcesses(TArrayI &/*proc*/) const
     {printf("WARNING: StepProcesses not yet implemented !\n"); return -1;}