687 |
list_var = XCDR (list_var)) |
list_var = XCDR (list_var)) |
688 |
|
|
689 |
|
|
690 |
extern Lisp_Object Qframep, Qframe_live_p, Qicon; |
extern Lisp_Object Qframep, Qframe_live_p; |
|
extern Lisp_Object Qleft_fringe, Qright_fringe; |
|
691 |
|
|
692 |
extern struct frame *last_nonminibuf_frame; |
extern struct frame *last_nonminibuf_frame; |
693 |
|
|
837 |
? make_float ((double) (Y) / CANON_Y_UNIT (F)) \ |
? make_float ((double) (Y) / CANON_Y_UNIT (F)) \ |
838 |
: make_number ((Y) / CANON_Y_UNIT (F))) |
: make_number ((Y) / CANON_Y_UNIT (F))) |
839 |
|
|
840 |
|
|
841 |
|
/*********************************************************************** |
842 |
|
Frame Parameters |
843 |
|
***********************************************************************/ |
844 |
|
|
845 |
|
extern Lisp_Object Qauto_raise, Qauto_lower; |
846 |
|
extern Lisp_Object Qborder_color, Qborder_width; |
847 |
|
extern Lisp_Object Qbuffer_predicate, Qbuffer_list; |
848 |
|
extern Lisp_Object Qcursor_color, Qcursor_type; |
849 |
|
extern Lisp_Object Qfont; |
850 |
|
extern Lisp_Object Qbackground_color, Qforeground_color; |
851 |
|
extern Lisp_Object Qicon, Qicon_name, Qicon_type, Qicon_left, Qicon_top; |
852 |
|
extern Lisp_Object Qinternal_border_width; |
853 |
|
extern Lisp_Object Qmenu_bar_lines, Qtool_bar_lines; |
854 |
|
extern Lisp_Object Qmouse_color; |
855 |
|
extern Lisp_Object Qname, Qtitle; |
856 |
|
extern Lisp_Object Qparent_id; |
857 |
|
extern Lisp_Object Qunsplittable, Qvisibility; |
858 |
|
extern Lisp_Object Qscroll_bar_width, Qvertical_scroll_bars; |
859 |
|
extern Lisp_Object Qscroll_bar_foreground, Qscroll_bar_background; |
860 |
|
extern Lisp_Object Qscreen_gamma; |
861 |
|
extern Lisp_Object Qline_spacing; |
862 |
|
extern Lisp_Object Qwait_for_wm; |
863 |
|
extern Lisp_Object Qfullscreen; |
864 |
|
|
865 |
|
extern Lisp_Object Qleft_fringe, Qright_fringe; |
866 |
|
extern Lisp_Object Qheight, Qwidth; |
867 |
|
extern Lisp_Object Qminibuffer, Qmodeline; |
868 |
|
extern Lisp_Object Qonly; |
869 |
|
extern Lisp_Object Qx, Qw32, Qmac, Qpc; |
870 |
|
extern Lisp_Object Qvisible; |
871 |
|
extern Lisp_Object Qdisplay_type; |
872 |
|
extern Lisp_Object Qbackground_mode; |
873 |
|
|
874 |
|
extern Lisp_Object Qx_resource_name; |
875 |
|
|
876 |
|
extern Lisp_Object Qleft, Qright, Qtop, Qbox; |
877 |
|
extern Lisp_Object Qdisplay; |
878 |
|
|
879 |
|
#ifdef HAVE_WINDOW_SYSTEM |
880 |
|
|
881 |
|
/* The class of this X application. */ |
882 |
|
#define EMACS_CLASS "Emacs" |
883 |
|
|
884 |
|
enum |
885 |
|
{ |
886 |
|
/* Values used as a bit mask, BOTH == WIDTH | HEIGHT. */ |
887 |
|
FULLSCREEN_NONE = 0, |
888 |
|
FULLSCREEN_WIDTH = 1, |
889 |
|
FULLSCREEN_HEIGHT = 2, |
890 |
|
FULLSCREEN_BOTH = 3, |
891 |
|
FULLSCREEN_WAIT = 4, |
892 |
|
FULLSCREEN_MOVE_WAIT = 8, |
893 |
|
}; |
894 |
|
|
895 |
|
|
896 |
|
/* These are in xterm.c, w32term.c, etc. */ |
897 |
|
|
898 |
|
extern void x_set_scroll_bar_default_width P_ ((struct frame *)); |
899 |
|
extern void x_set_offset P_ ((struct frame *, int, int, int)); |
900 |
|
extern void x_wm_set_icon_position P_ ((struct frame *, int, int)); |
901 |
|
|
902 |
|
extern Lisp_Object x_new_font P_ ((struct frame *, char *)); |
903 |
|
extern Lisp_Object x_new_fontset P_ ((struct frame *, char *)); |
904 |
|
|
905 |
|
|
906 |
|
/* These are in frame.c */ |
907 |
|
|
908 |
|
extern Lisp_Object Vx_resource_name; |
909 |
|
extern Lisp_Object Vx_resource_class; |
910 |
|
|
911 |
|
|
912 |
|
extern Lisp_Object Qface_set_after_frame_default; |
913 |
|
|
914 |
|
extern void x_fullscreen_adjust P_ ((struct frame *f, int *, int *, |
915 |
|
int *, int *)); |
916 |
|
|
917 |
|
extern void x_set_frame_parameters P_ ((struct frame *, Lisp_Object)); |
918 |
|
extern void x_report_frame_params P_ ((struct frame *, Lisp_Object *)); |
919 |
|
|
920 |
|
extern void x_set_fullscreen P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
921 |
|
extern void x_set_line_spacing P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
922 |
|
extern void x_set_screen_gamma P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
923 |
|
extern void x_set_font P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
924 |
|
extern void x_set_fringe_width P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
925 |
|
extern void x_set_border_width P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
926 |
|
extern void x_set_internal_border_width P_ ((struct frame *, Lisp_Object, |
927 |
|
Lisp_Object)); |
928 |
|
extern void x_set_visibility P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
929 |
|
extern void x_set_autoraise P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
930 |
|
extern void x_set_autolower P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
931 |
|
extern void x_set_unsplittable P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
932 |
|
extern void x_set_vertical_scroll_bars P_ ((struct frame *, Lisp_Object, |
933 |
|
Lisp_Object)); |
934 |
|
extern void x_set_scroll_bar_width P_ ((struct frame *, Lisp_Object, |
935 |
|
Lisp_Object)); |
936 |
|
|
937 |
|
extern Lisp_Object x_icon_type P_ ((struct frame *)); |
938 |
|
|
939 |
|
extern int x_figure_window_size P_ ((struct frame *, Lisp_Object, int)); |
940 |
|
|
941 |
|
|
942 |
|
extern void validate_x_resource_name P_ ((void)); |
943 |
|
|
944 |
|
#endif /* HAVE_WINDOW_SYSTEM */ |
945 |
|
|
946 |
#endif /* not EMACS_FRAME_H */ |
#endif /* not EMACS_FRAME_H */ |