diff options
| author | Stefan Monnier | 2004-11-23 05:06:56 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2004-11-23 05:06:56 +0000 |
| commit | 8bc285a288ee0d6db3a8350d6f62d51db350e2af (patch) | |
| tree | eb8aa32a3d3df990f875365b674196ee8611327e /src | |
| parent | 0f8fe9a26f2f11b85b3577f47372a860c9a0d53a (diff) | |
| download | emacs-8bc285a288ee0d6db3a8350d6f62d51db350e2af.tar.gz emacs-8bc285a288ee0d6db3a8350d6f62d51db350e2af.zip | |
(oblookup): Don't use XFASTINT blindly.
Diffstat (limited to 'src')
| -rw-r--r-- | src/lread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index e87dba53128..47512fd3197 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -3276,7 +3276,7 @@ oblookup (obarray, ptr, size, size_byte) | |||
| 3276 | hash %= obsize; | 3276 | hash %= obsize; |
| 3277 | bucket = XVECTOR (obarray)->contents[hash]; | 3277 | bucket = XVECTOR (obarray)->contents[hash]; |
| 3278 | oblookup_last_bucket_number = hash; | 3278 | oblookup_last_bucket_number = hash; |
| 3279 | if (XFASTINT (bucket) == 0) | 3279 | if (EQ (bucket, make_number (0))) |
| 3280 | ; | 3280 | ; |
| 3281 | else if (!SYMBOLP (bucket)) | 3281 | else if (!SYMBOLP (bucket)) |
| 3282 | error ("Bad data in guts of obarray"); /* Like CADR error message */ | 3282 | error ("Bad data in guts of obarray"); /* Like CADR error message */ |