From 0912e16e368c939d60f7b1400a247c6e5f080ff6 Mon Sep 17 00:00:00 2001 From: Kaleb Keithley Date: Thu, 4 Dec 2003 22:03:48 +0000 Subject: XFree86 4.3.99.901 (RC 1) --- lisp/string.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp') diff --git a/lisp/string.c b/lisp/string.c index 457979f..b4e03d0 100644 --- a/lisp/string.c +++ b/lisp/string.c @@ -27,7 +27,7 @@ * Author: Paulo César Pereira de Andrade */ -/* $XFree86: xc/programs/xedit/lisp/string.c,v 1.25 2003/05/27 22:27:04 tsi Exp $ */ +/* $XFree86: xc/programs/xedit/lisp/string.c,v 1.26 2003/11/27 17:28:43 paulo Exp $ */ #include "lisp/helper.h" #include "lisp/read.h" @@ -368,7 +368,7 @@ Lisp_Char(LispBuiltin *builtin) schar simple-string index */ { - char *string; + unsigned char *string; long offset, length; LispObj *ostring, *oindex; @@ -379,7 +379,7 @@ Lisp_Char(LispBuiltin *builtin) CHECK_STRING(ostring); CHECK_INDEX(oindex); offset = FIXNUM_VALUE(oindex); - string = THESTR(ostring); + string = (unsigned char*)THESTR(ostring); length = STRLEN(ostring); if (offset >= length) -- cgit v1.2.3