comparison src/doprnt.c @ 13554:626f0886b434

(doprnt1): Add a cast.
author Richard M. Stallman <rms@gnu.org>
date Wed, 15 Nov 1995 17:44:17 +0000
parents 2e9306561b80
children ee40177f6c68
comparison
equal deleted inserted replaced
13553:fb12156faaf5 13554:626f0886b434
198 error ("not enough arguments for format string"); 198 error ("not enough arguments for format string");
199 if (fmtcpy[1] != 's') 199 if (fmtcpy[1] != 's')
200 minlen = atoi (&fmtcpy[1]); 200 minlen = atoi (&fmtcpy[1]);
201 if (lispstrings) 201 if (lispstrings)
202 { 202 {
203 string = XSTRING (((Lisp_Object *) args)[cnt])->data; 203 string = (char *) XSTRING (((Lisp_Object *) args)[cnt])->data;
204 tem = XSTRING (((Lisp_Object *) args)[cnt])->size; 204 tem = XSTRING (((Lisp_Object *) args)[cnt])->size;
205 cnt++; 205 cnt++;
206 } 206 }
207 else 207 else
208 { 208 {