===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/lex.c,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -p -r1.21 -r1.22
--- OpenXM_contrib2/asir2000/parse/lex.c	2002/09/09 23:52:45	1.21
+++ OpenXM_contrib2/asir2000/parse/lex.c	2003/02/14 22:29:18	1.22
@@ -45,7 +45,7 @@
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *
- * $OpenXM: OpenXM_contrib2/asir2000/parse/lex.c,v 1.20 2002/09/09 12:23:51 kondoh Exp $ 
+ * $OpenXM: OpenXM_contrib2/asir2000/parse/lex.c,v 1.21 2002/09/09 23:52:45 noro Exp $ 
 */
 #include <ctype.h>
 #include "ca.h"
@@ -277,7 +277,7 @@ int yylex()
 		}
 		if ( floatingpoint ) {
 			Ungetc(c); REALLOC_NBUF nbuf[i] = 0;
-#if PARI
+#if defined(PARI)
 			if ( !bigfloat ) {
 				dbl = (double)atof(nbuf+DLENGTH);
 				MKReal(dbl,real); r = (Obj)real;
@@ -531,7 +531,7 @@ int Egetc(FILE *fp)
 	int c;
 
 	if ( fp ) {
-#if FEP
+#if defined(FEP)
 		if ( do_fep && isatty(fileno(fp)) )
 			c = readline_getc();
 		else
@@ -570,7 +570,7 @@ void Eungetc(int c,FILE *fp)
 	if ( fp ) {
 		if ( asir_infile->encoded )
 			c = (int)encrypt_char((unsigned char)c);
-#if FEP
+#if defined(FEP)
 		if ( do_fep && isatty(fileno(fp)) )
 			readline_ungetc();
 		else
@@ -628,7 +628,7 @@ static void Gets(char *s)
 	*s = 0;
 }
 
-#if FEP
+#if defined(FEP)
 
 static char *readline_line;
 static int readline_nc,readline_index;