Mercurial > emacs
view src/m/next.h @ 3075:878381e48b0d
* xfns.c: Clear out the old face stuff.
(x_face_table, n_faces, x_set_face, x_set_glyph, Fx_set_face_font,
Fx_set_face, Fx_get_face): Removed.
(syms_of_xfns): Remove defsubr for Fx_set_face.
Arrange for font names to get fully resolved - no wildcards.
* xfns.c (x_set_frame_parameters): Store the value in the frame
parameter alist before we call the setter function, so the setter
function can touch up the value if it chooses.
(x_set_foreground_color, x_set_background_color): Call
recompute_basic_faces, so their GC's will reflect the changes.
(x_new_font): Add extern declaration - this returns a Lisp_Object
now, the fully resolved font name.
(x_set_font): Accept the fully resolved name from x_new_font, and
put it in the frame's parameter alist. Call recompute_basic_faces.
* xterm.c (x_new_font): Return the fully resolved font name, Qnil
(if no match), or Qt (match, but unacceptable metrics).
* xterm.c (x_new_font): Don't call init_frame_faces.
* xterm.h: New section for declarations for xfaces.c.
(init_frame_faces, free_frame_faces, intern_face,
face_name_id_number, same_size_fonts, recompute_basic_faces,
compute_char_face, compute_glyph_face): Declare these here.
* xfaces.c (same_size_fonts): We can now remove this extern
declaration.
* xfns.c (face_name_id_number): Likewise.
* xterm.c (intern_face): Likewise.
* xfns.c (Fx_list_fonts): Remember that FACE may not have a font
specified. Don't specify 30000 as the maximum limit on the number
of fontns returned - 2000 is more reasonable.
Treat faces as structures specifying modifications to the frame's
parameters, rather than things which need to specify a complete
set of parameters by themselves.
* xfaces.c (init_frame_faces): Don't set up the two frame display
faces by querying the GC - just leave all their fields blank, and
call recompute_basic_faces, letting build_face do the work of
consulting the frame when necessary.
(recompute_basic_faces): New function.
(compute_base_faces): New function for obtaining the "identity"
for compute_char_face and compute_glyph_face.
(compute_char_face, compute_glyph_face): Call it, instead of copying
FRAME_DEFAULT_FACE.
* xfns.c (x_make_gc): No need to call init_frame_faces here.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Tue, 25 May 1993 14:03:41 +0000 |
parents | aa7dcfbfa478 |
children | 7be0f0a02725 |
line wrap: on
line source
/* Configuration file for the NeXT machine. Copyright (C) 1990 Free Software Foundation, Inc. This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 1, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with GNU Emacs; see the file COPYING. If not, write to the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ /* Say this machine is a next if not previously defined */ #ifndef NeXT #define NeXT #endif /* The following three symbols give information on the size of various data types. */ #define SHORTBITS 16 /* Number of bits in a short */ #define INTBITS 32 /* Number of bits in an int */ #define LONGBITS 32 /* Number of bits in a long */ /* Let the compiler tell us what byte order architecture we're compiling for */ #ifdef __BIG_ENDIAN__ #define BIG_ENDIAN #endif /* Define how to take a char and sign-extend into an int. On machines where char is signed, this is a no-op. */ #define SIGN_EXTEND_CHAR(c) (c) /* Use type int rather than a union, to represent Lisp_Object */ #define NO_UNION_TYPE /* XINT must explicitly sign-extend */ #define EXPLICIT_SIGN_EXTEND /* Data type of load average, as read out of kmem. */ #define LOAD_AVE_TYPE long /* Convert that into an integer that is 100 for a load average of 1.0 */ #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) /* Say that the text segment of a.out includes the header; the header actually occupies the first few bytes of the text segment and is counted in hdr.a_text. */ #define A_TEXT_OFFSET(HDR) sizeof (HDR) /* Use dk.h, not dkstat.h, in loadst.c. */ #define DK_HEADER_FILE /* Mask for address bits within a memory segment */ #define SEGSIZ 0x20000 #define SEGMENT_MASK (SEGSIZ - 1) #define HAVE_ALLOCA #define SYSTEM_MALLOC #define HAVE_UNIX_DOMAIN #define LIB_X11_LIB -L/usr/lib/X11 -lX11 /* Conflicts in process.c between ioctl.h & tty.h use of t_foo fields */ #define NO_T_CHARS_DEFINES /* Use our own unexec routines */ #define UNEXEC unexnext.o /* We don't have a g library either, so override the -lg LIBS_DEBUG switch */ #define LIBS_DEBUG /* We don't have a libgcc.a, so we can't let LIB_GCC default to -lgcc */ #define LIB_GCC #if 0 /* ohl@chico.harvard.edu says to do this. */ /* Compile "strict bsd" to avoid warnings from include files */ #define C_SWITCH_MACHINE -bsd #endif /* Link this program just by running cc. */ #define ORDINARY_LINK /* start_of_text isn't actually used, so make it compile without error. */ #define TEXT_START 0 /* This seems to be right for end_of_text, but it may not be used anyway. */ #define TEXT_END get_etext () /* This seems to be right for end_of_data, but it may not be used anyway. */ #define DATA_END get_edata () /* Defining KERNEL_FILE causes lossage because sys/file.h stupidly gets confused by it. */ #undef KERNEL_FILE #define LD_SWITCH_MACHINE -X -noseglinkedit #define environ _environ #if 0 /* This is ok for NeXT system version 3.0 or above. */ /* Where to find the kernel, for load average. */ #define KERNEL_FILE "/mach" #endif