emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/src/print.c [lexbind]


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/src/print.c [lexbind]
Date: Tue, 06 Jul 2004 07:05:47 -0400

Index: emacs/src/print.c
diff -c emacs/src/print.c:1.175.2.8 emacs/src/print.c:1.175.2.9
*** emacs/src/print.c:1.175.2.8 Tue Jul  6 09:24:07 2004
--- emacs/src/print.c   Tue Jul  6 10:10:53 2004
***************
*** 1822,1828 ****
  
          PRINTCHAR ('#');
          PRINTCHAR ('&');
!         sprintf (buf, "%d", XBOOL_VECTOR (obj)->size);
          strout (buf, -1, -1, printcharfun, 0);
          PRINTCHAR ('\"');
  
--- 1822,1828 ----
  
          PRINTCHAR ('#');
          PRINTCHAR ('&');
!         sprintf (buf, "%ld", (long) XBOOL_VECTOR (obj)->size);
          strout (buf, -1, -1, printcharfun, 0);
          PRINTCHAR ('\"');
  
***************
*** 1875,1881 ****
        else if (WINDOWP (obj))
        {
          strout ("#<window ", -1, -1, printcharfun, 0);
!         sprintf (buf, "%d", XFASTINT (XWINDOW (obj)->sequence_number));
          strout (buf, -1, -1, printcharfun, 0);
          if (!NILP (XWINDOW (obj)->buffer))
            {
--- 1875,1881 ----
        else if (WINDOWP (obj))
        {
          strout ("#<window ", -1, -1, printcharfun, 0);
!         sprintf (buf, "%ld", (long) XFASTINT (XWINDOW 
(obj)->sequence_number));
          strout (buf, -1, -1, printcharfun, 0);
          if (!NILP (XWINDOW (obj)->buffer))
            {
***************
*** 1896,1903 ****
              PRINTCHAR (' ');
              strout (SDATA (SYMBOL_NAME (h->weak)), -1, -1, printcharfun, 0);
              PRINTCHAR (' ');
!             sprintf (buf, "%d/%d", XFASTINT (h->count),
!                      XVECTOR (h->next)->size);
              strout (buf, -1, -1, printcharfun, 0);
            }
          sprintf (buf, " 0x%lx", (unsigned long) h);
--- 1896,1903 ----
              PRINTCHAR (' ');
              strout (SDATA (SYMBOL_NAME (h->weak)), -1, -1, printcharfun, 0);
              PRINTCHAR (' ');
!             sprintf (buf, "%ld/%ld", (long) XFASTINT (h->count),
!                      (long) XVECTOR (h->next)->size);
              strout (buf, -1, -1, printcharfun, 0);
            }
          sprintf (buf, " 0x%lx", (unsigned long) h);
***************
*** 2020,2026 ****
          break;
  
        case Lisp_Misc_Intfwd:
!         sprintf (buf, "#<intfwd to %d>", *XINTFWD (obj)->intvar);
          strout (buf, -1, -1, printcharfun, 0);
          break;
  
--- 2020,2026 ----
          break;
  
        case Lisp_Misc_Intfwd:
!         sprintf (buf, "#<intfwd to %ld>", (long) *XINTFWD (obj)->intvar);
          strout (buf, -1, -1, printcharfun, 0);
          break;
  




reply via email to

[Prev in Thread] Current Thread [Next in Thread]