From 34ff0cbd0283fcf1ecd17b2bdd2aa765cab1a43c Mon Sep 17 00:00:00 2001 From: hyung-hwan Date: Sun, 1 May 2005 06:47:49 +0000 Subject: [PATCH] *** empty log message *** --- ase/test/lsp/lisp.c | 14 +++++++------- ase/test/lsp/makefile.in | 4 ++-- 2 files changed, 9 insertions(+), 9 deletions(-) diff --git a/ase/test/lsp/lisp.c b/ase/test/lsp/lisp.c index ec3edd76..0f096f05 100644 --- a/ase/test/lsp/lisp.c +++ b/ase/test/lsp/lisp.c @@ -1,7 +1,7 @@ #include -#include -#include -#include +#include +#include +#include #ifdef __linux #include @@ -114,7 +114,7 @@ setlocale (LC_ALL, ""); } lisp = xp_lisp_new (mem, inc); - if (lisp == NULL) { + if (lisp == XP_NULL) { xp_fprintf (xp_stderr, XP_TEXT("error: cannot create a lisp instance\n")); return -1; @@ -122,13 +122,13 @@ setlocale (LC_ALL, ""); xp_printf (XP_TEXT("LISP 0.0001\n")); - xp_lisp_set_creader (lisp, get_char, NULL); + xp_lisp_set_creader (lisp, get_char, XP_NULL); for (;;) { xp_printf (XP_TEXT("%s> "), argv[0]); obj = xp_lisp_read (lisp); - if (obj == NULL) { + if (obj == XP_NULL) { if (lisp->error != XP_LISP_ERR_END && lisp->error != XP_LISP_ERR_ABORT) { xp_fprintf (xp_stderr, @@ -139,7 +139,7 @@ setlocale (LC_ALL, ""); continue; } - if ((obj = xp_lisp_eval (lisp, obj)) != NULL) { + if ((obj = xp_lisp_eval (lisp, obj)) != XP_NULL) { xp_lisp_print (lisp, obj); xp_printf (XP_TEXT("\n")); } diff --git a/ase/test/lsp/makefile.in b/ase/test/lsp/makefile.in index 377bb36d..eeccbfa7 100644 --- a/ase/test/lsp/makefile.in +++ b/ase/test/lsp/makefile.in @@ -3,8 +3,8 @@ OUTS = $(SRCS:.c=.x) CC = @CC@ CFLAGS = @CFLAGS@ -I@abs_top_builddir@ -LDFLAGS = @LDFLAGS@ -L@abs_top_builddir@/xp/c -L@abs_top_builddir@/xp/lisp -LIBS = @LIBS@ -lxpc -lxplisp +LDFLAGS = @LDFLAGS@ -L@abs_top_builddir@/xp/bas -L@abs_top_builddir@/xp/lisp +LIBS = @LIBS@ -lxpbas -lxplisp all: $(OUTS)