max/iphreeqc
1
0
Fork 0
mirror of https://git.gfz-potsdam.de/naaice/iphreeqc.git synced 2025-12-16 00:28:23 +01:00
Code Issues Packages Projects Releases Wiki Activity

working on autotools

Browse Source 
git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/trunk@4273 1feff8c3-07ed-0310-ac33-dd36852eb9cd
This commit is contained in:
Scott R Charlton 2010-04-21 04:49:32 +00:00
parent b51c3bf7d6
commit b90695455a
3 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
IPhreeqc.cpp
View File

@ -99,10 +99,12 @@ int IPhreeqc::output_handler(const int type, const char *err_str, const int stop
this->AddError("ERROR: ");
this->AddError(err_str);
this->AddError("\n");
#if 0
if (stop == STOP)
{
this->AddError("Stopping.\n");
}
#endif
}
break;

1
IPhreeqcF.f
View File

@ -43,7 +43,6 @@
SUBROUTINE OutputLastError(ID)
IMPLICIT NONE
INTEGER :: ID
WRITE(*,*) "fortran OutputLastError ID = ", ID
CALL OutputLastErrorF(ID)
END SUBROUTINE OutputLastError
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

6
IPhreeqcLib.cpp
View File

@ -1,7 +1,9 @@
#include "IPhreeqc.h"
#include "IPhreeqc.hpp"
#include <cassert>
#include <iostream>
#include <map>
#include "IPhreeqc.h"
#include "IPhreeqc.hpp"
class IPhreeqcLib
{