rlu_hijing has to be float to work correctly with gfortran (Fedora Core 7)

diff --git a/HIJING/AliHijingRndm.cxx b/HIJING/AliHijingRndm.cxx
index 0aad668d4da71286956a4455b27d672051ba7618..9840e84041e1831e3b50636ef2421082b460938a 100644 (file)
--- a/HIJING/AliHijingRndm.cxx
+++ b/HIJING/AliHijingRndm.cxx
@@ -68,13 +68,13 @@ extern "C" {
   void rluset_hijing(Int_t & /*lfn*/, Int_t & /*move*/)
   {printf("Dummy version of rluset_hijing reached\n");}
 
-  Double_t rlu_hijing(Int_t & /*idum*/) 
+  Float_t rlu_hijing(Int_t & /*idum*/) 
   {
     // Wrapper to FINCTION RLU_HIJING from HIJING
     // Uses static method to retrieve the pointer to the (C++) generator
       Double_t r;
       do r=AliHijingRndm::GetHijingRandom()->Rndm(); 
       while(0 >= r || r >= 1);
-      return r;
+      return (Float_t)r;
   }
 }