version 1.15, 2001/12/27 04:07:15 |
version 1.17, 2002/10/03 03:37:46 |
|
|
* OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY |
* OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* $OpenXM: OpenXM_contrib2/asir2000/io/sio.c,v 1.14 2001/12/25 02:39:05 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/io/sio.c,v 1.16 2002/10/03 01:12:46 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include <setjmp.h> |
#include <setjmp.h> |
Line 313 void free_iofp(int s) |
|
Line 313 void free_iofp(int s) |
|
struct IOFP *r; |
struct IOFP *r; |
|
|
r = &iofp[s]; |
r = &iofp[s]; |
r->in = r->out = 0; r->s = 0; |
#if defined(VISUAL) |
#if !defined(VISUAL) |
if ( r->s ) close(r->s); |
if ( r->socket ) |
#elif !defined(MPI) |
unlink(r->socket); |
if ( r->in ) fclose(r->in); |
|
if ( r->out ) fclose(r->out); |
|
if ( r->socket ) unlink(r->socket); |
#endif |
#endif |
|
r->in = r->out = 0; r->s = 0; |
} |
} |
|
|
#define LBUFSIZ BUFSIZ*10 |
#define LBUFSIZ BUFSIZ*10 |