[BACK]Return to ox.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / io

Diff for /OpenXM_contrib2/asir2000/io/ox.c between version 1.17 and 1.19

version 1.17, 2002/10/03 03:35:08 version 1.19, 2003/02/14 22:29:15
Line 44 
Line 44 
  * 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/ox.c,v 1.16 2002/08/02 02:41:03 noro Exp $   * $OpenXM: OpenXM_contrib2/asir2000/io/ox.c,v 1.18 2002/12/09 00:42:14 noro Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "parse.h"  #include "parse.h"
Line 400  void end_critical() {
Line 400  void end_critical() {
         }          }
 }  }
   
   extern FUNC registered_handler;
   
 void ox_usr1_handler(int sig)  void ox_usr1_handler(int sig)
 {  {
 #if !defined(VISUAL)  #if !defined(VISUAL)
Line 410  void ox_usr1_handler(int sig)
Line 412  void ox_usr1_handler(int sig)
                 ox_usr1_sent = 1;                  ox_usr1_sent = 1;
         } else {          } else {
                 ox_flushing = 1;                  ox_flushing = 1;
                   if ( registered_handler ) {
                           fprintf(stderr,
                                   "usr1 : calling the registered exception handler...");
                           bevalf(registered_handler,0);
                           fprintf(stderr, "done.\n");
                   }
                 ox_resetenv("usr1 : return to toplevel by SIGUSR1");                  ox_resetenv("usr1 : return to toplevel by SIGUSR1");
         }          }
 }  }
Line 437  void clear_readbuffer()
Line 445  void clear_readbuffer()
 */  */
 }  }
   
 #if MPI  #if defined(MPI)
 int ox_data_is_available(int s)  int ox_data_is_available(int s)
 {  {
         return 1;          return 1;
Line 726  void ox_flush_stream(int s)
Line 734  void ox_flush_stream(int s)
         if ( _fileno(&iofp[s].out->fp) < 0 )          if ( _fileno(&iofp[s].out->fp) < 0 )
                 cflush(iofp[s].out);                  cflush(iofp[s].out);
         else          else
 #elif MPI  #elif defined(MPI)
         if ( (char)fileno(&iofp[s].out->fp) < 0 )          if ( (char)fileno(&iofp[s].out->fp) < 0 )
                 cflush(iofp[s].out);                  cflush(iofp[s].out);
         else          else
Line 740  void ox_flush_stream_force(int s)
Line 748  void ox_flush_stream_force(int s)
         if ( _fileno(&iofp[s].out->fp) < 0 )          if ( _fileno(&iofp[s].out->fp) < 0 )
                 cflush(iofp[s].out);                  cflush(iofp[s].out);
         else          else
 #elif MPI  #elif defined(MPI)
         if ( (char)fileno(&iofp[s].out->fp) < 0 )          if ( (char)fileno(&iofp[s].out->fp) < 0 )
                 cflush(iofp[s].out);                  cflush(iofp[s].out);
         else          else
Legend:
Removed from v.1.17  
changed lines
  Added in v.1.19
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>