/[emacs]/emacs/src/print.c
ViewVC logotype

Diff of /emacs/src/print.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.164 by rms, Tue Oct 30 00:34:18 2001 UTC revision 1.165 by pj, Fri Nov 2 20:32:11 2001 UTC
# Line 532  PRINTCHARFUN defaults to the value of `s Line 532  PRINTCHARFUN defaults to the value of `s
532    
533    if (NILP (printcharfun))    if (NILP (printcharfun))
534      printcharfun = Vstandard_output;      printcharfun = Vstandard_output;
535    CHECK_NUMBER (character, 0);    CHECK_NUMBER (character);
536    PRINTPREPARE;    PRINTPREPARE;
537    PRINTCHAR (XINT (character));    PRINTCHAR (XINT (character));
538    PRINTFINISH;    PRINTFINISH;
# Line 663  usage: (with-output-to-temp-buffer BUFFN Line 663  usage: (with-output-to-temp-buffer BUFFN
663    
664    GCPRO1(args);    GCPRO1(args);
665    name = Feval (Fcar (args));    name = Feval (Fcar (args));
666    CHECK_STRING (name, 0);    CHECK_STRING (name);
667    temp_output_buffer_setup (XSTRING (name)->data);    temp_output_buffer_setup (XSTRING (name)->data);
668    buf = Vstandard_output;    buf = Vstandard_output;
669    UNGCPRO;    UNGCPRO;
# Line 875  to make it write to the debugging output Line 875  to make it write to the debugging output
875       (character)       (character)
876       Lisp_Object character;       Lisp_Object character;
877  {  {
878    CHECK_NUMBER (character, 0);    CHECK_NUMBER (character);
879    putc (XINT (character), stderr);    putc (XINT (character), stderr);
880    
881  #ifdef WINDOWSNT  #ifdef WINDOWSNT

Legend:
Removed from v.1.164  
changed lines
  Added in v.1.165

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26