From 0ce61fd0e2cf6792219e18f1c19c2c750012c1ee Mon Sep 17 00:00:00 2001
From: hristov <hristov@f7af4fe6-9843-0410-8265-dc069ae4e863>
Date: Wed, 15 Aug 2007 17:14:00 +0000
Subject: [PATCH 1/1] rlu_hijing has to be float to work correctly with
 gfortran (Fedora Core 7)

---
 HIJING/AliHijingRndm.cxx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/HIJING/AliHijingRndm.cxx b/HIJING/AliHijingRndm.cxx
index 0aad668d4da..9840e84041e 100644
--- 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;
   }
 }
-- 
2.39.3