summaryrefslogtreecommitdiff
path: root/src/mocklisp.c
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1994-09-27 02:00:42 +0000
committerKarl Heuer <kwzh@gnu.org>1994-09-27 02:00:42 +0000
commit467859ee62aaa60013ce02d8a0ae10723f9570a0 (patch)
tree718b8f2ddb302af5000070f7b98fe2a7c0c05fdd /src/mocklisp.c
parentf42c2584aa2fb6425983e53bd9747580cee6bf70 (diff)
downloademacs-467859ee62aaa60013ce02d8a0ae10723f9570a0.tar.gz
(Finsert_string): Use type test macros.
Diffstat (limited to 'src/mocklisp.c')
-rw-r--r--src/mocklisp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/mocklisp.c b/src/mocklisp.c
index 5f9d2df0af7..ccf6f15c75a 100644
--- a/src/mocklisp.c
+++ b/src/mocklisp.c
@@ -210,9 +210,9 @@ is converted into a string by expressing it in decimal.")
{
tem = args[argnum];
retry:
- if (XTYPE (tem) == Lisp_Int)
+ if (INTEGERP (tem))
tem = Fnumber_to_string (tem);
- if (XTYPE (tem) == Lisp_String)
+ if (STRINGP (tem))
insert1 (tem);
else
{