From 82da5db7ec346a853520328b76ce60ae97f68bce Mon Sep 17 00:00:00 2001
From: Elad Salomons <selad@optiwater.com>
Date: Sat, 13 Jun 2015 00:01:30 +0300
Subject: [PATCH] more c89 conformance

variables should be declared at the beginning of functions
---
 src/epanet.c  | 5 +++--
 src/hash.c    | 3 ++-
 src/quality.c | 8 ++++----
 3 files changed, 9 insertions(+), 7 deletions(-)

diff --git a/src/epanet.c b/src/epanet.c
index a2e6307..79a2fc7 100755
--- a/src/epanet.c
+++ b/src/epanet.c
@@ -3329,11 +3329,12 @@ int DLLEXPORT ENgetaveragepatternvalue(int index, EN_API_FLOAT_TYPE *value)
  **           and pattern
  **----------------------------------------------------------------
  */
-{  *value = 0.0;
+{ 
+  int i;
+  *value = 0.0;
   if (!Openflag) return(102);
   if (index < 1 || index > Npats) return(205);
   //if (period < 1 || period > Pattern[index].Length) return(251);
-  int i;
   for (i=0; i<Pattern[index].Length; i++) {
     *value+=Pattern[index].F[i];
   }
diff --git a/src/hash.c b/src/hash.c
index 26c07bf..4323f01 100755
--- a/src/hash.c
+++ b/src/hash.c
@@ -30,11 +30,12 @@ unsigned int _enHash(char *str);
 unsigned int _enHash(char *str)
 {
   unsigned int hash = 5381;
+  unsigned int retHash;
   int c;
   while ((c = *str++)) {
     hash = ((hash << 5) + hash) + c; /* hash * 33 + c */
   }
-  unsigned int retHash = hash % ENHASHTABLEMAXSIZE;
+  retHash = hash % ENHASHTABLEMAXSIZE;
   return retHash;
 }
 
diff --git a/src/quality.c b/src/quality.c
index 48b58f2..ac11d3d 100755
--- a/src/quality.c
+++ b/src/quality.c
@@ -237,7 +237,7 @@ int runqual(long *t)
       }
       else {
         // stepwise calculation - hydraulic results are already in memory
-        for (int i=1; i<= Ntanks; ++i) {
+        for (i=1; i<= Ntanks; ++i) {
           QTankVolumes[i-1] = Tank[i].V;
         }
         
@@ -282,7 +282,9 @@ int nextqual(long *tstep)
 {
    long    hydstep;       /* Hydraulic solution time step */
    int     errcode = 0;
+   double *tankVolumes;
    int i;
+   
    /* Determine time step */
    *tstep = 0;
   
@@ -291,12 +293,10 @@ int nextqual(long *tstep)
   if (Htime <= Dur) hydstep = Htime - Qtime;
   else hydstep = 0;
   
-  double *tankVolumes;
-  
   // if we're operating in stepwise mode, capture the tank levels so we can restore them later.
   if (OpenHflag) {
     tankVolumes = calloc(Ntanks, sizeof(double));
-    for (int i=1; i<=Ntanks; ++i) {
+    for (i=1; i<=Ntanks; ++i) {
       if (Tank[i].A != 0) { // skip reservoirs
         tankVolumes[i-1] = Tank[i].V;
       }