OpenXM_contrib2/asir2000/io/sio.c - diff

Return to sio.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / io

version 1.21, 2003/02/14 22:29:15

version 1.22, 2003/03/07 03:12:28

Line 44

* OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/io/sio.c,v 1.20 2003/01/28 08:58:23 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/io/sio.c,v 1.21 2003/02/14 22:29:15 ohara Exp $

#include "ca.h"

#include <setjmp.h>

Line 315 void free_iofp(int s)

r = &iofp[s];

#if defined(VISUAL)

if ( r->s ) close(r->s);

#elif !defined(MPI)

#elif !MPI

if ( r->in ) fclose(r->in);

if ( r->out ) fclose(r->out);

if ( r->socket ) unlink(r->socket);

Line 330 int get_iofp(int s1,char *af_sock,int is_server)

unsigned char c,rc;

extern int mpi_myid;

#if defined(MPI)

#if MPI

iofp[s1].s = s1;

if ( mpi_myid == s1 ) {

iofp[s1].in = 0;