===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2018/parse/glob.c,v
retrieving revision 1.1
retrieving revision 1.8
diff -u -p -r1.1 -r1.8
--- OpenXM_contrib2/asir2018/parse/glob.c	2018/09/19 05:45:08	1.1
+++ OpenXM_contrib2/asir2018/parse/glob.c	2020/10/06 06:31:20	1.8
@@ -45,7 +45,7 @@
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *
- * $OpenXM$
+ * $OpenXM: OpenXM_contrib2/asir2018/parse/glob.c,v 1.7 2020/06/20 05:56:08 fujimoto Exp $
 */
 #include "ca.h"
 #include "al.h"
@@ -332,7 +332,7 @@ void cppname_init()
   char oxcpp[BUFSIZ];
 #define OXCPP "/bin/ox_cpp"
 
-  if ( oxhome = getenv("OpenXM_HOME") ) {
+  if ( ( oxhome = getenv("OpenXM_HOME") ) != 0 ) {
     if ( strlen(oxhome)+strlen(OXCPP)<BUFSIZ ) {
       sprintf(oxcpp,"%s%s",oxhome,OXCPP);
       if ( access(oxcpp,X_OK&R_OK) == 0 ) {
@@ -567,13 +567,16 @@ void int_handler(int sig)
     return;
   }
 #endif
-#if defined(linux)
+#if !defined(ANDROID) && defined(linux)
+/*
 #if 1
   while ( stdin->_IO_read_ptr < stdin->_IO_read_end )
 #else
   while ( stdin->_gptr < stdin->_egptr )
 #endif
     getchar();
+*/
+  if( __freadable(stdin) ) __fpurge(stdin);
 #endif
   while ( 1 ) {
     char buf[BUFSIZ];
@@ -853,7 +856,7 @@ char *get_asir_distribution();
 
 char *get_gcversion() 
 {
-  return "GC 7.2 copyright 1988-2012, H-J. Boehm, A. J. Demers, Xerox, SGI, HP.\n";
+  return "GC 7.4.2 copyright 1988-2015, H-J. Boehm, A. J. Demers, Xerox, SGI, HP.\n";
 }
 
 char *get_pariversion() 
@@ -881,7 +884,7 @@ char *scopyright()
   static char *notice;
   char *s1, *s2, *s3, *s4;
   int d, len;
-  char *format = "This is Risa/Asir%s, Version %d (%s Distribution).\nCopyright (C) 1994-2000, all rights reserved, FUJITSU LABORATORIES LIMITED.\nCopyright 2000-2007, Risa/Asir committers, http://www.openxm.org/.\n%s%s";
+  char *format = "This is Risa/Asir%s, full GMP Version %d (%s Distribution).\nCopyright (C) 1994-2000, all rights reserved, FUJITSU LABORATORIES LIMITED.\nCopyright 2000-2019, Risa/Asir committers, http://www.openxm.org/.\n%s%s";
   if (!notice) {
     s1 = get_intervalversion();
     s2 = get_asir_distribution();