diff options
| author | Philipp Stephani <phst@google.com> | 2017-09-30 20:40:02 +0200 |
|---|---|---|
| committer | Philipp Stephani <phst@google.com> | 2017-10-01 18:29:40 +0200 |
| commit | 66d37175ecac41dfb2f854dbb148dcc7ca87b345 (patch) | |
| tree | 55ebdf561b0ece4fe2e85bde4a3399bbbae4b217 | |
| parent | bb47c72de35312b742a1964b31ff315727baed00 (diff) | |
| download | emacs-66d37175ecac41dfb2f854dbb148dcc7ca87b345.tar.gz emacs-66d37175ecac41dfb2f854dbb148dcc7ca87b345.tar.bz2 emacs-66d37175ecac41dfb2f854dbb148dcc7ca87b345.zip | |
* src/editfns.c (Fchar_after): Small optimization.
| -rw-r--r-- | src/editfns.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/editfns.c b/src/editfns.c index e326604467c..4dcf7cbe6ef 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -1256,10 +1256,10 @@ If POS is out of range, the value is nil. */) if (NILP (pos)) { pos_byte = PT_BYTE; - XSETFASTINT (pos, PT); + if (pos_byte < BEGV_BYTE || pos_byte >= ZV_BYTE) + return Qnil; } - - if (MARKERP (pos)) + else if (MARKERP (pos)) { pos_byte = marker_byte_position (pos); if (pos_byte < BEGV_BYTE || pos_byte >= ZV_BYTE) |