Mercurial > emacs
comparison src/print.c @ 88549:c88e9fa13453
(print_object): Fix print format for 64-bit
systems.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Fri, 17 May 2002 16:37:56 +0000 |
| parents | 4bff91d684f4 |
| children | 5ca38cce6f72 |
comparison
equal
deleted
inserted
replaced
| 88548:d8ddbdfc33da | 88549:c88e9fa13453 |
|---|---|
| 1681 | 1681 |
| 1682 GCPRO1 (obj); | 1682 GCPRO1 (obj); |
| 1683 | 1683 |
| 1684 PRINTCHAR ('#'); | 1684 PRINTCHAR ('#'); |
| 1685 PRINTCHAR ('&'); | 1685 PRINTCHAR ('&'); |
| 1686 sprintf (buf, "%d", XBOOL_VECTOR (obj)->size); | 1686 if (sizeof (int) == sizeof (EMACS_INT)) |
| 1687 sprintf (buf, "%d", XBOOL_VECTOR (obj)->size); | |
| 1688 else if (sizeof (long) == sizeof (EMACS_INT)) | |
| 1689 sprintf (buf, "%ld", XBOOL_VECTOR (obj)->size); | |
| 1690 else | |
| 1691 abort (); | |
| 1687 strout (buf, -1, -1, printcharfun, 0); | 1692 strout (buf, -1, -1, printcharfun, 0); |
| 1688 PRINTCHAR ('\"'); | 1693 PRINTCHAR ('\"'); |
| 1689 | 1694 |
| 1690 /* Don't print more characters than the specified maximum. | 1695 /* Don't print more characters than the specified maximum. |
| 1691 Negative values of print-length are invalid. Treat them | 1696 Negative values of print-length are invalid. Treat them |