Add legacy ENinit API

Closes #232

src/epanet.c

@@ -185,6 +185,14 @@ int DLLEXPORT ENepanet(const char *f1, const char *f2, const char *f3, void (*pv
   return (errcode);
 }
 
+int DLLEXPORT ENinit(char *f2, char *f3, int UnitsType,
+                     int HeadlossFormula) {
+  int errcode = 0;
+  ERRCODE(EN_createproject(&_defaultModel));
+  ERRCODE(EN_init(_defaultModel, f2, f3, UnitsType, HeadlossFormula));
+  return (errcode);
+}
+
 int DLLEXPORT ENopen(char *f1, char *f2, char *f3) {
   int errcode = 0;
   ERRCODE(EN_createproject(&_defaultModel));
@@ -602,7 +610,7 @@ int DLLEXPORT EN_deleteproject(EN_ProjectHandle *ph)
 }
 
 
-int DLLEXPORT EN_init(EN_ProjectHandle *ph, char *f2, char *f3,
+int DLLEXPORT EN_init(EN_ProjectHandle ph, char *f2, char *f3,
                       EN_FlowUnits UnitsType, EN_FormType HeadlossFormula)
 /*----------------------------------------------------------------
  **  Input:
@@ -623,7 +631,7 @@ int DLLEXPORT EN_init(EN_ProjectHandle *ph, char *f2, char *f3,
   _fpreset();
 #endif
 
-  EN_Project *pr = (EN_Project*)*ph;
+  EN_Project *pr = (EN_Project*)ph;
 
   /* Set system flags */
   pr->Openflag = TRUE;

win_build/WinSDK/epanet2.def

@@ -67,6 +67,7 @@ EXPORTS
     ENsetbasedemand               = _ENsetbasedemand@12
     ENgetaveragepatternvalue      = _ENgetaveragepatternvalue@8
     ENgetheadcurveindex           = _ENgetheadcurveindex@8
+    ENsetheadcurveindex           = _ENsetheadcurveindex@8
     ENgetpumptype                 = _ENgetpumptype@8
     ENgetcurveindex               = _ENgetcurveindex@8                
     ENgetcurveid                  = _ENgetcurveid@8                   
@@ -96,4 +97,4 @@ EXPORTS
     ENgetdemandmodel              = _ENgetdemandmodel@16
     ENsetdemandmodel              = _ENsetdemandmodel@16
     ENgetcurvetype                = _ENgetcurvetype@8
-
+    ENinit                        = _ENinit@16