[Emacs-diffs] master 66d3717: * src/editfns.c (Fchar_after): Small optimization.

[Philipp Stephani]

branch: master
commit 66d37175ecac41dfb2f854dbb148dcc7ca87b345
Author: Philipp Stephani <address@hidden>
Commit: Philipp Stephani <address@hidden>

    * src/editfns.c (Fchar_after): Small optimization.
---
 src/editfns.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/editfns.c b/src/editfns.c
index e326604..4dcf7cb 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)