diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2018-12-09 17:07:16 -0800 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2018-12-09 17:11:37 -0800 |
| commit | 48d7720993283a3387807fa5582bb10b1636bba5 (patch) | |
| tree | 74c7b2935470fcb39383390caec8485172243d84 /src/indent.c | |
| parent | 87bc518afcc3adc23762944ef49f89d375f90260 (diff) | |
| download | emacs-48d7720993283a3387807fa5582bb10b1636bba5.tar.gz | |
Remove CHECK_FIXNUM_CAR etc.
* src/coding.c (CHECK_FIXNAT_CAR, CHECK_FIXNAT_CDR):
* src/lisp.h (CHECK_FIXNUM_CAR, CHECK_FIXNUM_CDR):
Remove. All uses removed. These seem to have been based on
the assumption that the argument cons needs to be modified,
an assumption that is incorrect for fixnums.
(Fdefine_coding_system_internal): Use CHECK_RANGED_INTEGER
instead of a special diagnostic for graphic register numbers.
Diffstat (limited to 'src/indent.c')
| -rw-r--r-- | src/indent.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/indent.c b/src/indent.c index 18855768d37..8761388b856 100644 --- a/src/indent.c +++ b/src/indent.c @@ -1756,14 +1756,14 @@ visible section of the buffer, and pass LINE and COL as TOPOS. */) CHECK_FIXNUM_COERCE_MARKER (from); CHECK_CONS (frompos); - CHECK_FIXNUM_CAR (frompos); - CHECK_FIXNUM_CDR (frompos); + CHECK_FIXNUM (XCAR (frompos)); + CHECK_FIXNUM (XCDR (frompos)); CHECK_FIXNUM_COERCE_MARKER (to); if (!NILP (topos)) { CHECK_CONS (topos); - CHECK_FIXNUM_CAR (topos); - CHECK_FIXNUM_CDR (topos); + CHECK_FIXNUM (XCAR (topos)); + CHECK_FIXNUM (XCDR (topos)); } if (!NILP (width)) CHECK_FIXNUM (width); @@ -1771,8 +1771,8 @@ visible section of the buffer, and pass LINE and COL as TOPOS. */) if (!NILP (offsets)) { CHECK_CONS (offsets); - CHECK_FIXNUM_CAR (offsets); - CHECK_FIXNUM_CDR (offsets); + CHECK_FIXNUM (XCAR (offsets)); + CHECK_FIXNUM (XCDR (offsets)); if (! (0 <= XFIXNUM (XCAR (offsets)) && XFIXNUM (XCAR (offsets)) <= PTRDIFF_MAX && 0 <= XFIXNUM (XCDR (offsets)) && XFIXNUM (XCDR (offsets)) <= INT_MAX)) args_out_of_range (XCAR (offsets), XCDR (offsets)); |