diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/indent.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/src/indent.c b/src/indent.c index 01777f7d0bb..27d2adf86ce 100644 --- a/src/indent.c +++ b/src/indent.c | |||
| @@ -651,20 +651,20 @@ visible section of the buffer, and pass LINE and COL as TOPOS.") | |||
| 651 | struct position *pos; | 651 | struct position *pos; |
| 652 | int hscroll, tab_offset; | 652 | int hscroll, tab_offset; |
| 653 | 653 | ||
| 654 | CHECK_INT (from, 0); | 654 | CHECK_NUMBER_COERCE_MARKER (from, 0); |
| 655 | CHECK_CONS (frompos, 0); | 655 | CHECK_CONS (frompos, 0); |
| 656 | CHECK_INT (XCONS (frompos)->car, 0); | 656 | CHECK_NUMBER (XCONS (frompos)->car, 0); |
| 657 | CHECK_INT (XCONS (frompos)->cdr, 0); | 657 | CHECK_NUMBER (XCONS (frompos)->cdr, 0); |
| 658 | CHECK_INT (to, 0); | 658 | CHECK_NUMBER_COERCE_MARKER (to, 0); |
| 659 | CHECK_CONS (topos, 0); | 659 | CHECK_CONS (topos, 0); |
| 660 | CHECK_INT (XCONS (topos)->car, 0); | 660 | CHECK_NUMBER (XCONS (topos)->car, 0); |
| 661 | CHECK_INT (XCONS (topos)->cdr, 0); | 661 | CHECK_NUMBER (XCONS (topos)->cdr, 0); |
| 662 | CHECK_INT (width); | 662 | CHECK_NUMBER (width, 0); |
| 663 | if (!NILP (offsets)) | 663 | if (!NILP (offsets)) |
| 664 | { | 664 | { |
| 665 | CHECK_CONS (offsets, 0); | 665 | CHECK_CONS (offsets, 0); |
| 666 | CHECK_INT (XCONS (offsets)->car); | 666 | CHECK_NUMBER (XCONS (offsets)->car, 0); |
| 667 | CHECK_INT (XCONS (offsets)->cdr); | 667 | CHECK_NUMBER (XCONS (offsets)->cdr, 0); |
| 668 | hscroll = XINT (XCONS (offsets)->car); | 668 | hscroll = XINT (XCONS (offsets)->car); |
| 669 | tab_offset = XINT (XCONS (offsets)->cdr); | 669 | tab_offset = XINT (XCONS (offsets)->cdr); |
| 670 | } | 670 | } |