diff options
author | Andreas Schwab <schwab@suse.de> | 1998-10-30 10:13:41 +0000 |
---|---|---|
committer | Andreas Schwab <schwab@suse.de> | 1998-10-30 10:13:41 +0000 |
commit | 3c52e568d6cb9878dec3a69668cbcad8f1896b8c (patch) | |
tree | e0149aa8c2d6d81249f9dc99446a08f6616d5a09 | |
parent | 60022cb7128db8e4a9a8bf2d651e5960fa5bfc05 (diff) | |
download | emacs-3c52e568d6cb9878dec3a69668cbcad8f1896b8c.tar.gz |
(Fchar_after): Fix type clashes.
-rw-r--r-- | src/editfns.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/editfns.c b/src/editfns.c index 67758db088b..7ae39851ef5 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -603,7 +603,7 @@ If POS is out of range, the value is nil.") if (NILP (pos)) { pos_byte = PT_BYTE; - pos = PT; + XSETFASTINT (pos, PT); } if (MARKERP (pos)) @@ -637,7 +637,7 @@ If POS is out of range, the value is nil.") if (NILP (pos)) { pos_byte = PT_BYTE; - pos = PT; + XSETFASTINT (pos, PT); } if (MARKERP (pos)) |