mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-02 08:22:22 +00:00
1a578e9be2
2000-10-23 Andrew Choi <akochoi@i-cable.com> * dispextern.h [macintosh]: Include macgui.h instead of macterm.h. * dispnew.c [macintosh]: Include macterm.h. (init_display) [macintosh]: initialization for window system. * emacs.c (main) [macintosh]: Call syms_of_textprop, syms_of_macfns, syms_of_ccl, syms_of_fontset, syms_of_xterm, syms_of_search, x_term_init, and init_keyboard before calling init_window_once. Also, call syms_of_xmenu. * fontset.c (syms_of_fontset) [macintosh]: Set ASCII font of default fontset to Monaco. * frame.c [macintosh]: Include macterm.h. Remove declarations of NewMacWindow and DisposeMacWindow. (make_terminal_frame) [macintosh]: Call make_mac_terminal_frame instead of calling NewMacWindow and setting fields of f->output_data.mac directly. Call init_frame_faces. (Fdelete_frame) [macintosh]: Remove unused code. (Fmodify_frame_parameters) [macintosh]: Call x_set_frame_parameters instead of mac_set_frame_parameters. * frame.h [macintosh]: Define menu_bar_lines field in struct frame. Define FRAME_EXTERNAL_MENU_BAR macro. * keyboard.c [macintosh]: Include macterm.h. (kbd_buffer_get_event) [macintosh]: Generate delete_window_event and menu_bar_activate_event type events as for X and NT. (make_lispy_event) [macintosh]: Construct lisp events of type MENU_BAR_EVENT as for X and NT. * sysdep.c [macintosh]: Remove declaration for sys_signal. Include stdlib.h. Remove definition of Vx_bitmap_file_path. (sys_subshell) [macintosh]: Remove definition entirely. (init_sys_modes) [macintosh]: Do not initialize Vwindow_system and Vwindow_system_version here. Remove initialization of Vx_bitmap_file_path. (read_input_waiting): Correct the number of parameters passed to read_socket_hook. Move all Macintosh functions to mac/mac.c. * term.c [macintosh]: Include macterm.h. * window.c [macintosh]: Include macterm.h. * xdisp.c [macintosh]: Include macterm.h. Declare set_frame_menubar and pending_menu_activation. (echo_area_display) [macintosh]: Do not return if terminal frame is the selected frame. (update_menu_bar) [macintosh]: Check FRAME_EXTERNAL_MENU_BAR (f). Allow only the selected frame to set menu bar. (redisplay_window) [macintosh]: Obtain menu bar to redisplay by calling FRAME_EXTERNAL_MENU_BAR (f). (display_menu_bar) [macintosh]: Check FRAME_MAC_P (f). * xfaces.c [macintosh]: Include macterm.h. Define x_display_info and check_x. Declare XCreateGC. Define x_create_gc and x_free_gc. Initialize font_sort_order. (x_face_list_fonts) [macintosh]: Use the same code as WINDOWSNT, but call x_list_fonts instead of w32_list_fonts. (Finternal_face_x_get_resource) [macintosh]: Do not call display_x_get_resource. (prepare_face_for_display) [macintosh]: Set xgcv.font. (realize_x_face) [macintosh]: Load the font if it is specified in ATTRS. (syms_of_xfaces) [macintosh]: Initialize Vscalable_fonts_allowed to Qt. * cus-edit.el (custom-button-face): Use 3D look for mac. (custom-button-pressed-face): Likewise. * faces.el (set-face-attributes-from-resources): Handle mac frames in the same way as x and w32 frames. (face-valid-attribute-values): Likewise. (read-face-attribute): Likewise. (defined-colors): Likewise. (color-defined-p): Likewise. (color-values): Likewise. (display-grayscale-p): Likewise. (face-set-after-frame-default): Likewise. (mode-line): Same default face as for x and w32. (tool-bar): Likewise. * frame.el: Remove call to frame-notice-user-settings at end of the file. * info.el (Info-fontify-node): make underlines invisible for mac as for x, pc, and w32 frame types. * term/mac-win.el: New file.
321 lines
9.1 KiB
C
321 lines
9.1 KiB
C
/* Handcrafted s-mac.h file for building GNU Emacs on the Macintosh.
|
|
Copyright (C) 1999, 2000 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 2, 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, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
/* Contributed by Andrew Choi (akochoi@users.sourceforge.net). */
|
|
|
|
/*
|
|
* Define symbols to identify the version of Unix this is.
|
|
* Define all the symbols that apply correctly.
|
|
*/
|
|
|
|
/* #define UNIPLUS */
|
|
/* #define USG5 */
|
|
/* #define USG */
|
|
/* #define HPUX */
|
|
/* #define UMAX */
|
|
/* #define BSD4_1 */
|
|
/* #define BSD4_2 */
|
|
/* #define BSD4_3 */
|
|
/* #define BSD_SYSTEM */
|
|
/* #define VMS */
|
|
|
|
/* SYSTEM_TYPE should indicate the kind of system you are using.
|
|
It sets the Lisp variable system-type. */
|
|
|
|
#define SYSTEM_TYPE "macos"
|
|
|
|
/* NOMULTIPLEJOBS should be defined if your system's shell
|
|
does not have "job control" (the ability to stop a program,
|
|
run some other program, then continue the first one). */
|
|
|
|
#define NOMULTIPLEJOBS
|
|
|
|
/* Emacs can read input using SIGIO and buffering characters itself,
|
|
or using CBREAK mode and making C-g cause SIGINT.
|
|
The choice is controlled by the variable interrupt_input.
|
|
|
|
Define INTERRUPT_INPUT to make interrupt_input = 1 the default (use SIGIO)
|
|
|
|
Emacs uses the presence or absence of the SIGIO macro to indicate
|
|
whether or not signal-driven I/O is possible. It uses
|
|
INTERRUPT_INPUT to decide whether to use it by default.
|
|
|
|
SIGIO can be used only on systems that implement it (4.2 and 4.3).
|
|
CBREAK mode has two disadvantages
|
|
1) At least in 4.2, it is impossible to handle the Meta key properly.
|
|
I hear that in system V this problem does not exist.
|
|
2) Control-G causes output to be discarded.
|
|
I do not know whether this can be fixed in system V.
|
|
|
|
Another method of doing input is planned but not implemented.
|
|
It would have Emacs fork off a separate process
|
|
to read the input and send it to the true Emacs process
|
|
through a pipe. */
|
|
|
|
/* #define INTERRUPT_INPUT */
|
|
|
|
/* Letter to use in finding device name of first pty,
|
|
if system supports pty's. 'a' means it is /dev/ptya0 */
|
|
|
|
/* #define FIRST_PTY_LETTER 'a' */
|
|
|
|
/*
|
|
* Define HAVE_TERMIOS if the system provides POSIX-style
|
|
* functions and macros for terminal control.
|
|
*
|
|
* Define HAVE_TERMIO if the system provides sysV-style ioctls
|
|
* for terminal control.
|
|
*
|
|
* Do not define both. HAVE_TERMIOS is preferred, if it is
|
|
* supported on your system.
|
|
*/
|
|
|
|
/* #define HAVE_TERMIOS */
|
|
#define HAVE_TERMIO
|
|
|
|
/*
|
|
* Define HAVE_PTYS if the system supports pty devices.
|
|
*/
|
|
|
|
/* #define HAVE_PTYS */
|
|
|
|
/*
|
|
* Define NONSYSTEM_DIR_LIBRARY to make Emacs emulate
|
|
* The 4.2 opendir, etc., library functions.
|
|
*/
|
|
|
|
/* #define NONSYSTEM_DIR_LIBRARY */
|
|
|
|
/* Define this symbol if your system has the functions bcopy, etc. */
|
|
|
|
/* #define BSTRING */
|
|
|
|
/* subprocesses should be defined if you want to
|
|
have code for asynchronous subprocesses
|
|
(as used in M-x compile and M-x shell).
|
|
This is generally OS dependent, and not supported
|
|
under most USG systems. */
|
|
|
|
/* #define subprocesses */
|
|
|
|
/* If your system uses COFF (Common Object File Format) then define the
|
|
preprocessor symbol "COFF". */
|
|
|
|
/* #define COFF */
|
|
|
|
/* define MAIL_USE_FLOCK if the mailer uses flock
|
|
to interlock access to /usr/spool/mail/$USER.
|
|
The alternative is that a lock file named
|
|
/usr/spool/mail/$USER.lock. */
|
|
|
|
/* #define MAIL_USE_FLOCK */
|
|
|
|
/* Define CLASH_DETECTION if you want lock files to be written
|
|
so that Emacs can tell instantly when you try to modify
|
|
a file that someone else has modified in his Emacs. */
|
|
|
|
/* #define CLASH_DETECTION */
|
|
|
|
/* Define this if your operating system declares signal handlers to
|
|
have a type other than the usual. `The usual' is `void' for ANSI C
|
|
systems (i.e. when the __STDC__ macro is defined), and `int' for
|
|
pre-ANSI systems. If you're using GCC on an older system, __STDC__
|
|
will be defined, but the system's include files will still say that
|
|
signal returns int or whatever; in situations like that, define
|
|
this to be what the system's include files want. */
|
|
/* #define SIGTYPE int */
|
|
|
|
/* If the character used to separate elements of the executable path
|
|
is not ':', #define this to be the appropriate character constant. */
|
|
/* #define SEPCHAR ':' */
|
|
|
|
/* ============================================================ */
|
|
|
|
/* Here, add any special hacks needed
|
|
to make Emacs work on this system. For example,
|
|
you might define certain system call names that don't
|
|
exist on your system, or that do different things on
|
|
your system and must be used only through an encapsulation
|
|
(Which you should place, by convention, in sysdep.c). */
|
|
|
|
/* Some compilers tend to put everything declared static
|
|
into the initialized data area, which becomes pure after dumping Emacs.
|
|
On these systems, you must #define static as nothing to foil this.
|
|
Note that emacs carefully avoids static vars inside functions. */
|
|
|
|
/* #define static */
|
|
|
|
/* ============================================================ */
|
|
|
|
/* After adding support for a new system, modify the large case
|
|
statement in the `configure' script to recognize reasonable
|
|
configuration names, and add a description of the system to
|
|
`etc/MACHINES'.
|
|
|
|
If you've just fixed a problem in an existing configuration file,
|
|
you should also check `etc/MACHINES' to make sure its descriptions
|
|
of known problems in that configuration should be updated. */
|
|
|
|
#ifdef __MRC__
|
|
#define __signal_max SIGTERM /* largest one in signal.h */
|
|
#endif
|
|
|
|
#define SIGHUP (__signal_max+1)
|
|
#define SIGQUIT (__signal_max+2)
|
|
#define SIGTRAP (__signal_max+3)
|
|
#define SIGKILL (__signal_max+4)
|
|
#define SIGALRM (__signal_max+5)
|
|
#define SIGPIPE (__signal_max+6)
|
|
#define NSIG (__signal_max+6)
|
|
|
|
#ifdef __MRC__
|
|
#define PENDING_OUTPUT_COUNT(FILE) ((FILE)->_ptr - (FILE)->_base)
|
|
#elif __MWERKS__
|
|
#define PENDING_OUTPUT_COUNT(FILE) ((FILE)->buffer_ptr - (FILE)->buffer)
|
|
#endif
|
|
|
|
#ifdef __MWERKS__
|
|
#include <errno.h>
|
|
#ifndef ENOENT
|
|
#define ENOENT 100
|
|
#endif
|
|
#ifndef EXDEV
|
|
#define EXDEV 101
|
|
#endif
|
|
#ifndef EEXIST
|
|
#define EEXIST 102
|
|
#endif
|
|
#ifndef EINTR
|
|
#define EINTR 102
|
|
#endif
|
|
#ifndef EACCES
|
|
#define EACCES 103
|
|
#endif
|
|
#ifndef ENOTDIR
|
|
#define ENOTDIR 104
|
|
#endif
|
|
#ifndef EIO
|
|
#define EIO 105
|
|
#endif
|
|
#ifndef EBADF
|
|
#define EBADF 106
|
|
#endif
|
|
#endif
|
|
|
|
#define SYSTEM_PURESIZE_EXTRA (200*1024)
|
|
|
|
/* don't know what this will do, but sysdep.c needs it */
|
|
#define DATA_START 0
|
|
|
|
/* Limited by CW's 32K limit on local data! */
|
|
#define READ_BUF_SIZE (8 << 10)
|
|
|
|
#include <utsname.h>
|
|
void read_input_waiting ();
|
|
|
|
/* #define GETTIMEOFDAY_ONE_ARGUMENT */
|
|
|
|
#define SYSV_SYSTEM_DIR
|
|
|
|
#define SYSTEM_MALLOC
|
|
|
|
/* Constants such as O_RDONLY are defined in fcntl.h. Best solution is
|
|
really to patch individual files to include it: callproc.c, doc.c,
|
|
fileio.c, getloadavg.c, lread.c, and termcap.c. */
|
|
#include <fcntl.h>
|
|
|
|
#define _setjmp setjmp
|
|
#define _longjmp longjmp
|
|
|
|
#define _exit exit
|
|
|
|
#define main emacs_main
|
|
|
|
/* Include this here so it won't be include again when #include in emacs
|
|
sources. Then undefine the macro definitions in it for unlink, read,
|
|
write, access, and rmdir. */
|
|
#ifdef __MWERKS__
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#undef unlink
|
|
#define unlink sys_unlink
|
|
#undef read
|
|
#define read sys_read
|
|
#undef write
|
|
#define write sys_write
|
|
#undef access
|
|
#define access sys_access
|
|
#undef rmdir
|
|
#define rmdir sys_rmdir
|
|
|
|
#define open sys_open
|
|
#define creat sys_creat
|
|
|
|
#define rename sys_rename
|
|
#define fopen sys_fopen
|
|
#define signal sys_signal
|
|
|
|
#define gmtime sys_gmtime
|
|
#define localtime sys_localtime
|
|
#define ctime sys_ctime
|
|
#define time sys_time
|
|
|
|
#ifndef bcmp
|
|
#define bcmp(s1, s2, n) memcmp ((s1), (s2), (n))
|
|
#endif
|
|
#ifndef bcopy
|
|
#define bcopy(s, d, n) memcpy ((d), (s), (n))
|
|
#endif
|
|
#ifndef bzero
|
|
#define bzero(s, n) memset ((s), 0, (n))
|
|
#endif
|
|
|
|
extern char *index (const char *, int);
|
|
|
|
/* MPW strftime broken for "%p" format */
|
|
#ifdef __MRC__
|
|
#define strftime sys_strftime
|
|
#endif
|
|
|
|
#include <time.h>
|
|
/* Editfns.c includes types.h which indirectly includes time.h before config.h.
|
|
So gmtime (localtime) is defined and not sys_gmtime (sys_localtime). Define
|
|
here explicitly. */
|
|
extern struct tm *sys_gmtime (const time_t *);
|
|
extern struct tm *sys_localtime (const time_t *);
|
|
extern char *sys_ctime (const time_t *);
|
|
extern time_t sys_time (time_t *);
|
|
|
|
/* Emacs.c includes signal.h before config.h. Define this to make it happy. */
|
|
#ifdef __MRC__
|
|
#include <signal.h>
|
|
extern __sigfun sys_signal (int signal_num, __sigfun signal_func);
|
|
#elif __MWERKS__
|
|
#include <signal.h>
|
|
extern __signal_func_ptr sys_signal (int signal_num, __signal_func_ptr signal_func);
|
|
#endif
|
|
|
|
extern double atof (const char *);
|
|
|
|
#define volatile
|
|
|
|
#define SYMS_SYSTEM syms_of_mac()
|