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

Diff for /OpenXM_contrib2/asir2000/parse/glob.c between version 1.88 and 1.89

version 1.88, 2015/08/06 10:01:53 version 1.89, 2015/08/08 14:19:42
Line 45 
Line 45 
  * 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/parse/glob.c,v 1.87 2015/08/04 06:20:45 noro Exp $   * $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.88 2015/08/06 10:01:53 fujimoto Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "al.h"  #include "al.h"
Line 231  void asir_terminate(int status)
Line 231  void asir_terminate(int status)
                                 bevalf((FUNC)BDY(n),0);                                  bevalf((FUNC)BDY(n),0);
                         if ( !do_terse )                          if ( !do_terse )
                                 fprintf(stderr, "done.\n");                                  fprintf(stderr, "done.\n");
   #if defined(__MINGW32__) || defined(__MINGW64__)
                           fflush(stderr);
   #endif
                 }                  }
                 tty_reset();                  tty_reset();
 #if defined(MPI)  #if defined(MPI)
Line 370  void process_args(int ac,char **av)
Line 373  void process_args(int ac,char **av)
                         in_fp = fopen(*(av+1),"r");                          in_fp = fopen(*(av+1),"r");
                         if ( !in_fp ) {                          if ( !in_fp ) {
                                 fprintf(stderr,"%s does not exist!\n",*(av+1));                                  fprintf(stderr,"%s does not exist!\n",*(av+1));
   #if defined(__MINGW32__) || defined(__MINGW64__)
                                   fflush(stderr);
   #endif
                                 asir_terminate(1);                                  asir_terminate(1);
                         }                          }
                         do_file = 1;                          do_file = 1;
Line 399  void process_args(int ac,char **av)
Line 405  void process_args(int ac,char **av)
 #endif  #endif
                 } else {                  } else {
                         fprintf(stderr,"%s : unknown option.\n",*av);                          fprintf(stderr,"%s : unknown option.\n",*av);
   #if defined(__MINGW32__) || defined(__MINGW64__)
                           fflush(stderr);
   #endif
                         asir_terminate(1);                          asir_terminate(1);
                 }                  }
         }          }
Line 466  void resetenv(char *s)
Line 475  void resetenv(char *s)
         extern FILE *outfile;          extern FILE *outfile;
   
         fprintf(stderr,"%s\n",s);          fprintf(stderr,"%s\n",s);
   #if defined(__MINGW32__) || defined(__MINGW64__)
           fflush(stderr);
   #endif
         while ( NEXT(asir_infile) )          while ( NEXT(asir_infile) )
                 closecurrentinput();                  closecurrentinput();
         resetpvs();          resetpvs();
Line 582  void int_handler(int sig)
Line 594  void int_handler(int sig)
                                                         bevalf((FUNC)BDY(t),0);                                                          bevalf((FUNC)BDY(t),0);
                                                 if ( !do_terse )                                                  if ( !do_terse )
                                                         fprintf(stderr, "done.\n");                                                          fprintf(stderr, "done.\n");
   #if defined(__MINGW32__) || defined(__MINGW64__)
                                                   fflush(stderr);
   #endif
                                         }                                          }
                                 }                                  }
                                 resetenv("return to toplevel");                                  resetenv("return to toplevel");
Line 601  void int_handler(int sig)
Line 616  void int_handler(int sig)
                                 break;                                  break;
                         case '?':                          case '?':
                                 fprintf(stderr, "q:quit t:toplevel c:continue d:debug u:call registered handler w:where\n");                                  fprintf(stderr, "q:quit t:toplevel c:continue d:debug u:call registered handler w:where\n");
   #if defined(__MINGW32__) || defined(__MINGW64__)
           fflush(stderr);
   #endif
                                 break;                                  break;
                         default:                          default:
                                 break;                                  break;
Line 644  void ill_handler(int sig)
Line 662  void ill_handler(int sig)
 void alrm_handler(int sig)  void alrm_handler(int sig)
 {  {
         fprintf(stderr,"interval timer expired (VTALRM)\n");          fprintf(stderr,"interval timer expired (VTALRM)\n");
   #if defined(__MINGW32__) || defined(__MINGW64__)
           fflush(stderr);
   #endif
         LONGJMP(timer_env,1);          LONGJMP(timer_env,1);
 }  }
   
Line 702  void error(char *s)
Line 723  void error(char *s)
                 alrm_handler(SIGNAL_FOR_TIMER);                  alrm_handler(SIGNAL_FOR_TIMER);
 #endif  #endif
         fprintf(stderr,"%s\n",s);          fprintf(stderr,"%s\n",s);
   #if defined(__MINGW32__) || defined(__MINGW64__)
           fflush(stderr);
   #endif
         set_lasterror(s);          set_lasterror(s);
         if ( CPVS != GPVS ) {          if ( CPVS != GPVS ) {
                 if ( CPVS && CPVS->usrf && CPVS->usrf->f.usrf )                  if ( CPVS && CPVS->usrf && CPVS->usrf->f.usrf )
Line 739  void goto_toplevel(char *s)
Line 763  void goto_toplevel(char *s)
                 alrm_handler(SIGNAL_FOR_TIMER);                  alrm_handler(SIGNAL_FOR_TIMER);
 #endif  #endif
         fprintf(stderr,"%s\n",s);          fprintf(stderr,"%s\n",s);
   #if defined(__MINGW32__) || defined(__MINGW64__)
           fflush(stderr);
   #endif
         if ( do_file ) {          if ( do_file ) {
                 char errbuf[BUFSIZ*5]; /* sufficient to store stack information ? */                  char errbuf[BUFSIZ*5]; /* sufficient to store stack information ? */
   
Legend:
Removed from v.1.88  
changed lines
  Added in v.1.89
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>