| version 1.25, 2003/05/30 00:47:24 | 
version 1.27, 2003/11/27 02:34:11 | 
 | 
 | 
|   * 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/lex.c,v 1.24 2003/05/14 06:20:12 noro Exp $ | 
  * $OpenXM: OpenXM_contrib2/asir2000/parse/lex.c,v 1.26 2003/08/21 08:05:02 saito Exp $ | 
|  */ | 
 */ | 
|  #include <ctype.h> | 
 #include <ctype.h> | 
|  #include "ca.h" | 
 #include "ca.h" | 
 | 
 | 
|                                  c = Getc(); | 
                                 c = Getc(); | 
|                                  if ( c == '\\' ) { | 
                                 if ( c == '\\' ) { | 
|                                          c1 = Getc(); | 
                                         c1 = Getc(); | 
|                                          if ( c1 == 'n' ) | 
                                         if ( c1 == 'n' ) { | 
|                                                  c1 = '\n'; | 
                                                 c1 = '\n'; | 
|   | 
                     }else if ( c1 == 't' ) { | 
|   | 
                         c1 = '\t'; | 
|   | 
                     }else if ( isdigit(c1) ){ | 
|   | 
                         d = c1 - '0'; | 
|   | 
                         c1 = Getc(); | 
|   | 
                         if ( isdigit(c1) ) { | 
|   | 
                              d = 8*d + (c1 - '0'); | 
|   | 
                              c1 = Getc(); | 
|   | 
                              if ( isdigit(c1) ) { | 
|   | 
                                  d = 8*d + (c1 - '0'); | 
|   | 
                              }else { | 
|   | 
                                  Ungetc(c1); | 
|   | 
                              } | 
|   | 
                         }else { | 
|   | 
                             Ungetc(c1); | 
|   | 
                         } | 
|   | 
                         c1 = d; | 
|   | 
                     } | 
|                                          REALLOC_NBUF nbuf[i++] = c1; | 
                                         REALLOC_NBUF nbuf[i++] = c1; | 
|                                  } else { | 
                                 } else { | 
|                                          REALLOC_NBUF nbuf[i++] = c; | 
                                         REALLOC_NBUF nbuf[i++] = c; | 
| Line 444  void purge_stdin() | 
 
  | 
| Line 462  void purge_stdin() | 
 
 
 | 
|          w_purge_stdin(); | 
         w_purge_stdin(); | 
|  #elif defined(sparc) || defined(__alpha) || defined(__SVR4) || defined(mips) || defined(VISUAL) || defined(_IBMR2) | 
 #elif defined(sparc) || defined(__alpha) || defined(__SVR4) || defined(mips) || defined(VISUAL) || defined(_IBMR2) | 
|          stdin->_ptr = stdin->_base; stdin->_cnt = 0; | 
         stdin->_ptr = stdin->_base; stdin->_cnt = 0; | 
|  #elif (defined(__MACH__) && defined(__ppc__)) || defined(__CYGWIN__) | 
 #elif (defined(__MACH__) && defined(__ppc__)) || defined(__CYGWIN__) || defined(__FreeBSD__) | 
|          stdin->_r = 0; stdin->_p = stdin->_bf._base; | 
         stdin->_r = 0; stdin->_p = stdin->_bf._base; | 
|  #else | 
 #else | 
|  --->FIXIT | 
 --->FIXIT |