HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
0f26b95
)
(doprnt1): If lispstrings, accept a string
author
Richard M. Stallman
<rms@gnu.org>
Tue, 3 Sep 1996 23:23:40 +0000
(23:23 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Tue, 3 Sep 1996 23:23:40 +0000
(23:23 +0000)
as a `struct Lisp_String *'.
src/doprnt.c
patch
|
blob
|
blame
|
history
diff --git
a/src/doprnt.c
b/src/doprnt.c
index
3a1e417
..
d9b6566
100644
(file)
--- a/
src/doprnt.c
+++ b/
src/doprnt.c
@@
-201,8
+201,8
@@
doprnt1 (lispstrings, buffer, bufsize, format, format_end, nargs, args)
minlen = atoi (&fmtcpy[1]);
if (lispstrings)
{
- string = (char *)
XSTRING (((Lisp_Object *) args)
[cnt])->data;
- tem =
XSTRING (((Lisp_Object *) args)
[cnt])->size;
+ string = (char *)
((struct Lisp_String *)args
[cnt])->data;
+ tem =
((struct Lisp_String *)args
[cnt])->size;
cnt++;
}
else