diff options
| author | YAMAMOTO Mitsuharu | 2006-04-12 08:07:32 +0000 |
|---|---|---|
| committer | YAMAMOTO Mitsuharu | 2006-04-12 08:07:32 +0000 |
| commit | 28a11ed69d786148a28808b208e520bbde51387b (patch) | |
| tree | e8194fb84bbcf640f2e6c265888ba5a7ea1fdcd6 /src | |
| parent | 1fcd1370e2c893b3cf233cea502d285a04cf48ee (diff) | |
| download | emacs-28a11ed69d786148a28808b208e520bbde51387b.tar.gz emacs-28a11ed69d786148a28808b208e520bbde51387b.zip | |
(x_to_mac_color): Remove unused variable `tail'.
(x_set_mouse_color): Remove unused variable `dpy'.
(Fx_create_frame): Remove unused variable `x_frame_count'.
(Fx_server_version): Add explicit braces to avoid ambiguous `else'.
(x_sync): Move from macterm.c.
(Fx_file_dialog): Remove unused variable `default_filter_index'.
Diffstat (limited to 'src')
| -rw-r--r-- | src/macfns.c | 49 |
1 files changed, 28 insertions, 21 deletions
diff --git a/src/macfns.c b/src/macfns.c index 8e241205cd4..f9a5f051eb4 100644 --- a/src/macfns.c +++ b/src/macfns.c | |||
| @@ -1024,7 +1024,7 @@ Lisp_Object | |||
| 1024 | x_to_mac_color (colorname) | 1024 | x_to_mac_color (colorname) |
| 1025 | char * colorname; | 1025 | char * colorname; |
| 1026 | { | 1026 | { |
| 1027 | register Lisp_Object tail, ret = Qnil; | 1027 | register Lisp_Object ret = Qnil; |
| 1028 | 1028 | ||
| 1029 | BLOCK_INPUT; | 1029 | BLOCK_INPUT; |
| 1030 | 1030 | ||
| @@ -1359,7 +1359,6 @@ x_set_mouse_color (f, arg, oldval) | |||
| 1359 | Lisp_Object arg, oldval; | 1359 | Lisp_Object arg, oldval; |
| 1360 | { | 1360 | { |
| 1361 | struct x_output *x = f->output_data.x; | 1361 | struct x_output *x = f->output_data.x; |
| 1362 | Display *dpy = FRAME_MAC_DISPLAY (f); | ||
| 1363 | Cursor cursor, nontext_cursor, mode_cursor, hand_cursor; | 1362 | Cursor cursor, nontext_cursor, mode_cursor, hand_cursor; |
| 1364 | Cursor hourglass_cursor, horizontal_drag_cursor; | 1363 | Cursor hourglass_cursor, horizontal_drag_cursor; |
| 1365 | unsigned long pixel = x_decode_color (f, arg, BLACK_PIX_DEFAULT (f)); | 1364 | unsigned long pixel = x_decode_color (f, arg, BLACK_PIX_DEFAULT (f)); |
| @@ -2387,7 +2386,6 @@ This function is an internal primitive--use `make-frame' instead. */) | |||
| 2387 | struct mac_display_info *dpyinfo = NULL; | 2386 | struct mac_display_info *dpyinfo = NULL; |
| 2388 | Lisp_Object parent; | 2387 | Lisp_Object parent; |
| 2389 | struct kboard *kb; | 2388 | struct kboard *kb; |
| 2390 | static int x_frame_count = 2; /* begins at 2 because terminal frame is F1 */ | ||
| 2391 | 2389 | ||
| 2392 | check_mac (); | 2390 | check_mac (); |
| 2393 | 2391 | ||
| @@ -2910,23 +2908,25 @@ If omitted or nil, that stands for the selected frame's display. */) | |||
| 2910 | BLOCK_INPUT; | 2908 | BLOCK_INPUT; |
| 2911 | err = Gestalt (gestaltSystemVersion, &response); | 2909 | err = Gestalt (gestaltSystemVersion, &response); |
| 2912 | if (err == noErr) | 2910 | if (err == noErr) |
| 2913 | if (response >= 0x00001040) | 2911 | { |
| 2914 | { | 2912 | if (response >= 0x00001040) |
| 2915 | err = Gestalt ('sys1', &major); /* gestaltSystemVersionMajor */ | 2913 | { |
| 2916 | if (err == noErr) | 2914 | err = Gestalt ('sys1', &major); /* gestaltSystemVersionMajor */ |
| 2917 | err = Gestalt ('sys2', &minor); /* gestaltSystemVersionMinor */ | 2915 | if (err == noErr) |
| 2918 | if (err == noErr) | 2916 | err = Gestalt ('sys2', &minor); /* gestaltSystemVersionMinor */ |
| 2919 | err = Gestalt ('sys3', &bugfix); /* gestaltSystemVersionBugFix */ | 2917 | if (err == noErr) |
| 2920 | } | 2918 | err = Gestalt ('sys3', &bugfix); /* gestaltSystemVersionBugFix */ |
| 2921 | else | 2919 | } |
| 2922 | { | 2920 | else |
| 2923 | bugfix = response & 0xf; | 2921 | { |
| 2924 | response >>= 4; | 2922 | bugfix = response & 0xf; |
| 2925 | minor = response & 0xf; | 2923 | response >>= 4; |
| 2926 | response >>= 4; | 2924 | minor = response & 0xf; |
| 2927 | /* convert BCD to int */ | 2925 | response >>= 4; |
| 2928 | major = response - (response >> 4) * 6; | 2926 | /* convert BCD to int */ |
| 2929 | } | 2927 | major = response - (response >> 4) * 6; |
| 2928 | } | ||
| 2929 | } | ||
| 2930 | UNBLOCK_INPUT; | 2930 | UNBLOCK_INPUT; |
| 2931 | 2931 | ||
| 2932 | if (err != noErr) | 2932 | if (err != noErr) |
| @@ -3210,6 +3210,14 @@ DEFUN ("x-synchronize", Fx_synchronize, Sx_synchronize, 1, 2, 0, | |||
| 3210 | return Qnil; | 3210 | return Qnil; |
| 3211 | } | 3211 | } |
| 3212 | 3212 | ||
| 3213 | /* x_sync is a no-op on Mac. */ | ||
| 3214 | |||
| 3215 | void | ||
| 3216 | x_sync (f) | ||
| 3217 | FRAME_PTR f; | ||
| 3218 | { | ||
| 3219 | } | ||
| 3220 | |||
| 3213 | 3221 | ||
| 3214 | /*********************************************************************** | 3222 | /*********************************************************************** |
| 3215 | Window properties | 3223 | Window properties |
| @@ -4187,7 +4195,6 @@ If ONLY-DIR-P is non-nil, the user can only select directories. */) | |||
| 4187 | int count = SPECPDL_INDEX (); | 4195 | int count = SPECPDL_INDEX (); |
| 4188 | struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5, gcpro6; | 4196 | struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5, gcpro6; |
| 4189 | char filename[MAXPATHLEN]; | 4197 | char filename[MAXPATHLEN]; |
| 4190 | int default_filter_index = 1; /* 1: All Files, 2: Directories only */ | ||
| 4191 | static NavEventUPP mac_nav_event_callbackUPP = NULL; | 4198 | static NavEventUPP mac_nav_event_callbackUPP = NULL; |
| 4192 | 4199 | ||
| 4193 | GCPRO6 (prompt, dir, default_filename, mustmatch, file, only_dir_p); | 4200 | GCPRO6 (prompt, dir, default_filename, mustmatch, file, only_dir_p); |