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

Diff of /emacs/src/dispnew.c

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

revision 1.293 by gerd, Tue Oct 30 16:59:41 2001 UTC revision 1.294 by pj, Fri Nov 2 20:22:37 2001 UTC
# Line 3300  DEFUN ("redraw-frame", Fredraw_frame, Sr Line 3300  DEFUN ("redraw-frame", Fredraw_frame, Sr
3300  {  {
3301    struct frame *f;    struct frame *f;
3302    
3303    CHECK_LIVE_FRAME (frame, 0);    CHECK_LIVE_FRAME (frame);
3304    f = XFRAME (frame);    f = XFRAME (frame);
3305    
3306    /* Ignore redraw requests, if frame has no glyphs yet.    /* Ignore redraw requests, if frame has no glyphs yet.
# Line 6023  Control characters in STRING will have t Line 6023  Control characters in STRING will have t
6023       Lisp_Object string;       Lisp_Object string;
6024  {  {
6025    /* ??? Perhaps we should do something special for multibyte strings here.  */    /* ??? Perhaps we should do something special for multibyte strings here.  */
6026    CHECK_STRING (string, 0);    CHECK_STRING (string);
6027    fwrite (XSTRING (string)->data, 1, STRING_BYTES (XSTRING (string)), stdout);    fwrite (XSTRING (string)->data, 1, STRING_BYTES (XSTRING (string)), stdout);
6028    fflush (stdout);    fflush (stdout);
6029    if (termscript)    if (termscript)
# Line 6090  Emacs was built without floating point s Line 6090  Emacs was built without floating point s
6090    if (NILP (milliseconds))    if (NILP (milliseconds))
6091      XSETINT (milliseconds, 0);      XSETINT (milliseconds, 0);
6092    else    else
6093      CHECK_NUMBER (milliseconds, 1);      CHECK_NUMBER (milliseconds);
6094    usec = XINT (milliseconds) * 1000;    usec = XINT (milliseconds) * 1000;
6095    
6096    {    {
# Line 6217  Value is t if waited the full time with Line 6217  Value is t if waited the full time with
6217    if (NILP (milliseconds))    if (NILP (milliseconds))
6218      XSETINT (milliseconds, 0);      XSETINT (milliseconds, 0);
6219    else    else
6220      CHECK_NUMBER (milliseconds, 1);      CHECK_NUMBER (milliseconds);
6221    usec = XINT (milliseconds) * 1000;    usec = XINT (milliseconds) * 1000;
6222    
6223    {    {
# Line 6536  don't show a cursor.  */) Line 6536  don't show a cursor.  */)
6536        if (NILP (window))        if (NILP (window))
6537          window = selected_window;          window = selected_window;
6538        else        else
6539          CHECK_WINDOW (window, 2);          CHECK_WINDOW (window);
6540                
6541        XWINDOW (window)->cursor_off_p = NILP (show);        XWINDOW (window)->cursor_off_p = NILP (show);
6542      }      }
# Line 6557  WINDOW nil or omitted means report on th Line 6557  WINDOW nil or omitted means report on th
6557    if (NILP (window))    if (NILP (window))
6558      window = selected_window;      window = selected_window;
6559    else    else
6560      CHECK_WINDOW (window, 2);      CHECK_WINDOW (window);
6561        
6562    w = XWINDOW (window);    w = XWINDOW (window);
6563    return w->cursor_off_p ? Qnil : Qt;        return w->cursor_off_p ? Qnil : Qt;    

Legend:
Removed from v.1.293  
changed lines
  Added in v.1.294

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