Mercurial > hg > xemacs-beta

comparison src/console.h @ 120:cca96a509cfe r20-1b12

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b12
author cvs
date Mon, 13 Aug 2007 09:25:29 +0200
parents a145efe76779
children 3d6bfa290dbd
comparison
equal deleted inserted replaced
119:d101af7320b8 120:cca96a509cfe
435 #ifdef HAVE_X_WINDOWS 435 #ifdef HAVE_X_WINDOWS
436 #define CONSOLE_TYPESYM_X_P(typesym) EQ (typesym, Qx) 436 #define CONSOLE_TYPESYM_X_P(typesym) EQ (typesym, Qx)
437 #else 437 #else
438 #define CONSOLE_TYPESYM_X_P(typesym) 0 438 #define CONSOLE_TYPESYM_X_P(typesym) 0
439 #endif 439 #endif
440 #ifdef HAVE_NEXTSTEP
441 #define CONSOLE_TYPESYM_NS_P(typesym) EQ (typesym, Qns)
442 #else
443 #define CONSOLE_TYPESYM_NS_P(typesym) 0
444 #endif
445 #ifdef HAVE_TTY 440 #ifdef HAVE_TTY
446 #define CONSOLE_TYPESYM_TTY_P(typesym) EQ (typesym, Qtty) 441 #define CONSOLE_TYPESYM_TTY_P(typesym) EQ (typesym, Qtty)
447 #else 442 #else
448 #define CONSOLE_TYPESYM_TTY_P(typesym) 0 443 #define CONSOLE_TYPESYM_TTY_P(typesym) 0
449 #endif 444 #endif
450 #define CONSOLE_TYPESYM_STREAM_P(typesym) EQ (typesym, Qstream) 445 #define CONSOLE_TYPESYM_STREAM_P(typesym) EQ (typesym, Qstream)
451 446
452 #define CONSOLE_TYPESYM_WIN_P(typesym) \ 447 #define CONSOLE_TYPESYM_WIN_P(typesym) \
453 (CONSOLE_TYPESYM_X_P (typesym) || CONSOLE_TYPESYM_NS_P (typesym)) 448 (CONSOLE_TYPESYM_X_P (typesym))
454 449
455 #define CONSOLE_X_P(con) CONSOLE_TYPESYM_X_P (CONSOLE_TYPE (con)) 450 #define CONSOLE_X_P(con) CONSOLE_TYPESYM_X_P (CONSOLE_TYPE (con))
456 #define CHECK_X_CONSOLE(z) CHECK_CONSOLE_TYPE (z, x) 451 #define CHECK_X_CONSOLE(z) CHECK_CONSOLE_TYPE (z, x)
457 #define CONCHECK_X_CONSOLE(z) CONCHECK_CONSOLE_TYPE (z, x) 452 #define CONCHECK_X_CONSOLE(z) CONCHECK_CONSOLE_TYPE (z, x)
458
459 #define CONSOLE_NS_P(con) CONSOLE_TYPESYM_NS_P (CONSOLE_TYPE (con))
460 #define CHECK_NS_CONSOLE(z) CHECK_CONSOLE_TYPE (z, ns)
461 #define CONCHECK_NS_CONSOLE(z) CONCHECK_CONSOLE_TYPE (z, ns)
462 453
463 #define CONSOLE_TTY_P(con) CONSOLE_TYPESYM_TTY_P (CONSOLE_TYPE (con)) 454 #define CONSOLE_TTY_P(con) CONSOLE_TYPESYM_TTY_P (CONSOLE_TYPE (con))
464 #define CHECK_TTY_CONSOLE(z) CHECK_CONSOLE_TYPE (z, tty) 455 #define CHECK_TTY_CONSOLE(z) CHECK_CONSOLE_TYPE (z, tty)
465 #define CONCHECK_TTY_CONSOLE(z) CONCHECK_CONSOLE_TYPE (z, tty) 456 #define CONCHECK_TTY_CONSOLE(z) CONCHECK_CONSOLE_TYPE (z, tty)
466 457
502 493
503 extern Lisp_Object Qtty, Qstream, Qdead; 494 extern Lisp_Object Qtty, Qstream, Qdead;
504 #ifdef HAVE_X_WINDOWS 495 #ifdef HAVE_X_WINDOWS
505 extern Lisp_Object Qx; 496 extern Lisp_Object Qx;
506 #endif /* HAVE_X_WINDOWS */ 497 #endif /* HAVE_X_WINDOWS */
507 #ifdef HAVE_NEXTSTEP
508 extern Lisp_Object Qns;
509 #endif /* HAVE_NEXTSTEP */
510 498
511 int valid_console_type_p (Lisp_Object type); 499 int valid_console_type_p (Lisp_Object type);
512 500
513 #define CONSOLE_LIVE_P(con) (!EQ (CONSOLE_TYPE (con), Qdead)) 501 #define CONSOLE_LIVE_P(con) (!EQ (CONSOLE_TYPE (con), Qdead))
514 502