diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-10-04 17:04:39 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-10-04 17:04:39 +0000 |
| commit | 82303743d7065567bc97a6ba5db8a9417a095033 (patch) | |
| tree | 8deed43eb152cfece873fa10035bd034de3f0ce7 /src/lisp.h | |
| parent | c6418b6f216adb75ce5733ff419e0b17d0d5f863 (diff) | |
| download | emacs-82303743d7065567bc97a6ba5db8a9417a095033.tar.gz | |
(XFASTINT): Changed to non-lvalue syntax, to ensure that callers will use
XSETFASTINT instead.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lisp.h b/src/lisp.h index 95892c1507b..d747093ddef 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -316,7 +316,7 @@ you lose /* For integers known to be positive, XFASTINT provides fast retrieval and XSETFASTINT provides fast storage. This takes advantage of the fact that Lisp_Int is 0. */ -#define XFASTINT(a) (a) +#define XFASTINT(a) ((a) + 0) #define XSETFASTINT(a, b) ((a) = (b)) /* Extract the value of a Lisp_Object as a signed integer. */ @@ -400,7 +400,7 @@ extern int pure_size; /* For integers known to be positive, XFASTINT provides fast retrieval and XSETFASTINT provides fast storage. This takes advantage of the fact that Lisp_Int is 0. */ -#define XFASTINT(a) ((a).i) +#define XFASTINT(a) ((a).i + 0) #define XSETFASTINT(a, b) ((a).i = (b)) #ifdef EXPLICIT_SIGN_EXTEND |