X-Git-Url: http://git.uio.no/git/?a=blobdiff_plain;f=HIJING%2Fhijing1_36%2Fgphoton.F;fp=HIJING%2Fhijing1_36%2Fgphoton.F;h=410e6e003a10d4b516dfd31196befc83b3830a8d;hb=bc676b8ec0359db0a70e89b2973f9eb4e2b1dd14;hp=fc81bc5c586ce46688daebc392030d9c5818bfa3;hpb=f0c86dd697b56513aeff79f6593f622d663ea52e;p=u%2Fmrichter%2FAliRoot.git

diff --git a/HIJING/hijing1_36/gphoton.F b/HIJING/hijing1_36/gphoton.F
index fc81bc5c586..410e6e003a1 100644
--- a/HIJING/hijing1_36/gphoton.F
+++ b/HIJING/hijing1_36/gphoton.F
@@ -4,6 +4,7 @@ C
 C
 	FUNCTION GPHOTON(Y1,Y2,PT2)
 	IMPLICIT REAL*8 (A-H,O-Z)
+#define BLANKET_SAVE
 #include "hiparnt.inc"
 	DIMENSION F(2,7)
 	SAVE