diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-04-24 08:11:54 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-04-24 08:11:54 +0000 |
| commit | d80634e431e7c41d2ce470c84dcff3bdcfbce737 (patch) | |
| tree | 72f7ffb437695aa68e271dfb7ae682ccbb4d665e /src/bytecode.c | |
| parent | 4ee3f842d8ef655b0b36debf8039f0f13d937b1d (diff) | |
| download | emacs-d80634e431e7c41d2ce470c84dcff3bdcfbce737.tar.gz | |
*** empty log message ***
Diffstat (limited to 'src/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index acde450299c..5ab689f1925 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -1,11 +1,11 @@ /* Execution of byte code produced by bytecomp.el. - Copyright (C) 1985, 1986, 1987, 1988 Free Software Foundation, Inc. + Copyright (C) 1985, 1986, 1987, 1988, 1992 Free Software Foundation, Inc. This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 1, or (at your option) +the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, @@ -1077,8 +1077,7 @@ If the third argument is incorrect, Emacs may crash.") break; case Bnumberp: - TOP = (XTYPE (TOP) == Lisp_Int || XTYPE (TOP) == Lisp_Float - ? Qt : Qnil); + TOP = (NUMBERP (TOP) ? Qt : Qnil); break; case Bintegerp: |