diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-09-17 05:36:53 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-09-17 05:36:53 +0000 |
| commit | 2ee1a2f7a9f12372f09aa5e80a1c45c2267bf248 (patch) | |
| tree | 567bc59f5e9ad3264e9d13b528e262f72c275956 | |
| parent | 00fb3e95ef7621b8900b5d52d5b8a92aa8db1907 (diff) | |
| download | emacs-2ee1a2f7a9f12372f09aa5e80a1c45c2267bf248.tar.gz | |
(print): sprintf arg for frame depends on VALBITS.
| -rw-r--r-- | src/print.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/print.c b/src/print.c index 27e66f98dac..f9572d69744 100644 --- a/src/print.c +++ b/src/print.c @@ -972,7 +972,10 @@ print (obj, printcharfun, escapeflag) ? "#<frame " : "#<dead frame "), -1, printcharfun); print_string (XFRAME (obj)->name, printcharfun); - sprintf (buf, " 0x%lx", (EMACS_UINT) (XFRAME (obj))); + if (sizeof (EMACS_INT) > 4) + sprintf (buf, " 0x%lx", (EMACS_UINT) (XFRAME (obj))); + else + sprintf (buf, " 0x%x", (EMACS_UINT) (XFRAME (obj))); strout (buf, -1, printcharfun); strout (">", -1, printcharfun); break; |