diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-09-27 02:00:42 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-09-27 02:00:42 +0000 |
| commit | fb8116a7bfd5c7411a62e5d414a043e016a2c6f4 (patch) | |
| tree | 61e6c39124bd538e30f36aaeb1244d31d7e78603 /src/mocklisp.c | |
| parent | 30d0f552c4cec67cce5377c0c676e22a9bb70046 (diff) | |
| download | emacs-fb8116a7bfd5c7411a62e5d414a043e016a2c6f4.tar.gz | |
(Finsert_string): Use type test macros.
Diffstat (limited to 'src/mocklisp.c')
| -rw-r--r-- | src/mocklisp.c | 4 |
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 { |