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:
d978068
)
(print): Make the printing understand EMACS_INTs
author
Richard M. Stallman
<rms@gnu.org>
Fri, 5 May 1995 02:23:56 +0000
(
02:23
+0000)
committer
Richard M. Stallman
<rms@gnu.org>
Fri, 5 May 1995 02:23:56 +0000
(
02:23
+0000)
that are longs as well as ints.
src/print.c
patch
|
blob
|
blame
|
history
diff --git
a/src/print.c
b/src/print.c
index
12da3b3
..
3609684
100644
(file)
--- a/
src/print.c
+++ b/
src/print.c
@@
-755,7
+755,12
@@
print (obj, printcharfun, escapeflag)
switch (XGCTYPE (obj))
{
case Lisp_Int:
- sprintf (buf, "%d", XINT (obj));
+ if (sizeof (int) == sizeof (EMACS_INT))
+ sprintf (buf, "%d", XINT (obj));
+ else if (sizeof (long) == sizeof (EMACS_INT))
+ sprintf (buf, "%ld", XINT (obj));
+ else
+ abort ();
strout (buf, -1, printcharfun);
break;