Small mod to make it more portable
authoriglez2 <iglez2@f7af4fe6-9843-0410-8265-dc069ae4e863>
Thu, 7 Nov 2002 17:50:21 +0000 (17:50 +0000)
committeriglez2 <iglez2@f7af4fe6-9843-0410-8265-dc069ae4e863>
Thu, 7 Nov 2002 17:50:21 +0000 (17:50 +0000)
TFluka/source.cxx

index 1dd125d7ff75c118a1de267f66b01f8590ea5b8f..7c0038d9dc2f324c50f0fefe0bac8bc84a456904 100644 (file)
@@ -162,10 +162,11 @@ extern "C" {
     /* User dependent flag:*/
     STACK.louse[STACK.lstack] = 0;
     /* User dependent spare variables:*/
-    for (Int_t ispr = 0; ispr < mkbmx1; ispr++)
+    Int_t ispr = 0;
+    for (ispr = 0; ispr < mkbmx1; ispr++)
       STACK.sparek[STACK.lstack][ispr] = zerzer;
     /* User dependent spare flags:*/
-    for (Int_t ispr = 0; ispr < mkbmx2; ispr++)
+    for (ispr = 0; ispr < mkbmx2; ispr++)
        STACK.ispark[STACK.lstack][ispr] = 0;
     /* Save the track number of the stack particle:*/
     STACK.ispark[STACK.lstack][mkbmx2-1] = STACK.lstack;