Mercurial > emacs
changeset 37309:aecc289cb0de
(Fcompare_strings): Fix return values.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Tue, 10 Apr 2001 18:35:31 +0000 |
parents | bcbc0628e2e5 |
children | 8da1a2ed2d4a |
files | src/fns.c |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fns.c Tue Apr 10 16:13:33 2001 +0000 +++ b/src/fns.c Tue Apr 10 18:35:31 2001 +0000 @@ -326,9 +326,9 @@ past the character that we are comparing; hence we don't add or subtract 1 here. */ if (c1 < c2) - return make_number (- i1); + return make_number (- i1 + XINT (start1)); else - return make_number (i1); + return make_number (i1 - XINT (start1)); } if (i1 < end1_char)