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

Diff of /emacs/src/term.c

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

revision 1.139 by akochoi, Fri Apr 26 23:39:05 2002 UTC revision 1.140 by miles, Sun May 26 07:23:47 2002 UTC
# Line 1987  turn_off_face (f, face_id) Line 1987  turn_off_face (f, face_id)
1987  }  }
1988        
1989            
1990    /* Return non-zero if the terminal on frame F supports all of the
1991       capabilities in CAPS simultaneously, with foreground and background
1992       colors FG and BG.  */
1993    
1994    int tty_capable_p (f, caps, fg, bg)
1995         struct frame *f;
1996         unsigned caps;
1997         unsigned long fg, bg;
1998    {
1999    #define TTY_CAPABLE_P_TRY(cap, TS, NC_bit)                              \
2000      if ((caps & (cap)) && (!(TS) || !MAY_USE_WITH_COLORS_P(NC_bit)))      \
2001        return 0;
2002    
2003      TTY_CAPABLE_P_TRY (TTY_CAP_INVERSE,   TS_standout_mode,        NC_REVERSE);
2004      TTY_CAPABLE_P_TRY (TTY_CAP_UNDERLINE, TS_enter_underline_mode, NC_UNDERLINE);
2005      TTY_CAPABLE_P_TRY (TTY_CAP_BOLD,      TS_enter_bold_mode,      NC_BOLD);
2006      TTY_CAPABLE_P_TRY (TTY_CAP_DIM,       TS_enter_dim_mode,       NC_DIM);
2007      TTY_CAPABLE_P_TRY (TTY_CAP_BLINK,     TS_enter_blink_mode,     NC_BLINK);
2008      TTY_CAPABLE_P_TRY (TTY_CAP_ALT_CHARSET, TS_enter_alt_charset_mode, NC_ALT_CHARSET);
2009    
2010      /* We can do it!  */
2011      return 1;
2012    }
2013    
2014    
2015  /* Return non-zero if the terminal is capable to display colors.  */  /* Return non-zero if the terminal is capable to display colors.  */
2016    
2017  DEFUN ("tty-display-color-p", Ftty_display_color_p, Stty_display_color_p,  DEFUN ("tty-display-color-p", Ftty_display_color_p, Stty_display_color_p,

Legend:
Removed from v.1.139  
changed lines
  Added in v.1.140

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