diff options
| author | Karl Heuer | 1994-09-27 02:00:42 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-09-27 02:00:42 +0000 |
| commit | fb8116a7bfd5c7411a62e5d414a043e016a2c6f4 (patch) | |
| tree | 61e6c39124bd538e30f36aaeb1244d31d7e78603 /src | |
| parent | 30d0f552c4cec67cce5377c0c676e22a9bb70046 (diff) | |
| download | emacs-fb8116a7bfd5c7411a62e5d414a043e016a2c6f4.tar.gz emacs-fb8116a7bfd5c7411a62e5d414a043e016a2c6f4.zip | |
(Finsert_string): Use type test macros.
Diffstat (limited to 'src')
| -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.") | |||
| 210 | { | 210 | { |
| 211 | tem = args[argnum]; | 211 | tem = args[argnum]; |
| 212 | retry: | 212 | retry: |
| 213 | if (XTYPE (tem) == Lisp_Int) | 213 | if (INTEGERP (tem)) |
| 214 | tem = Fnumber_to_string (tem); | 214 | tem = Fnumber_to_string (tem); |
| 215 | if (XTYPE (tem) == Lisp_String) | 215 | if (STRINGP (tem)) |
| 216 | insert1 (tem); | 216 | insert1 (tem); |
| 217 | else | 217 | else |
| 218 | { | 218 | { |