On Jul 16, 2008, at 5:25 AM, Dan Nicolaescu wrote: > Adrian Robert writes: > >> http://cortex.med.cornell.edu/~arobert/emacs-app/ >> diffBeforeMerge.patch > > I looked over this patch and I wrote quite a few comments. Can you > please look over and try to address them? It would be good if you > could > find a system to keep track of these comments so that they don't get > lost. Some of the comments from the previous rounds have been > lost :-(. Thanks for the comments and sorry if some previous ones have been inadvertently left unaddresses. >> The newly-added 'nextstep' directory contains additional information. >> FOR-RELEASE in that directory contains a list of TODOs before release >> of 23.1. > > Why not just use admin/FOR-RELEASE? It's easier to look in just one > place. This is up to the maintainers. I thought while the port is settling down and there are a lot of issues, it might be good to keep them from cluttering up the admin file. > Also please get rid of the nextstep/compile file, it's not a good idea > to have to document another way of building emacs, especially since > ./configure; make should be good enough for this platform. I'm working on this... > +2008-07-15 Adrian Robert > + > + * Emacs.clr: New file, add support for X color names to NS display > + implementations. > > Is this really needed? All other platforms do just fine by > definining x-colors in elisp. Actually, the Carbon and Windows ports put these defs in source code, macfns.c and w32fns.c respectively. Keeping them in a separate data file seems a little cleaner, and also fits well with the way color lists are handled in NeXTstep. But the defs can be moved into source code if that is preferred. > Index: lib-src/Makefile.in > =================================================================== > RCS file: /sources/emacs/emacs/lib-src/Makefile.in,v > retrieving revision 1.163 > diff -a -u -r1.163 Makefile.in > --- lib-src/Makefile.in 9 May 2008 23:19:10 -0000 1.163 > +++ lib-src/Makefile.in 15 Jul 2008 16:50:14 -0000 > @@ -144,0 +144,8 @@ > +#ifdef HAVE_NS > +.m.o: > +#ifdef GNUSTEP > + $(CC) -c $(CPPFLAGS) $(ALL_CFLAGS) -fgnu-runtime -Wno-import - > fconstant-string-class=NSConstantString $< > +#else > + $(CC) -c $(CPPFLAGS) $(ALL_CFLAGS) $< > +#endif > +#endif > > No need for the extra HAVE_NS conditional. Done. > +#if defined(COCOA) > +mac-fix-env: ${srcdir}/mac-fix-env.m > + $(CC) -o mac-fix-env ${srcdir}/mac-fix-env.m -prebind -framework > Foundation > +#endif > > No need to make it conditional. And shouldn't this use > NS_IMPL_COCOA instead of COCOA ? GNUSTEP and COCOA were used instead of the NS_IMPL ones in configure. Changed everywhere for consistency. > Index: lisp/facemenu.el > =================================================================== > RCS file: /sources/emacs/emacs/lisp/facemenu.el,v > retrieving revision 1.104 > diff -a -u -r1.104 facemenu.el > --- lisp/facemenu.el 6 May 2008 07:57:34 -0000 1.104 > +++ lisp/facemenu.el 15 Jul 2008 16:52:14 -0000 > @@ -460,10 +460,11 @@ > (defun facemenu-read-color (&optional prompt) > "Read a color using the minibuffer." > (let* ((completion-ignore-case t) > + (require-match (not (eq window-system 'ns))) > (col (completing-read (or prompt "Color: ") > (or facemenu-color-alist > (defined-colors)) > - nil t))) > + nil require-match))) > (if (equal "" col) > nil > col))) > > Why do this? > > This does not seem specific to NS, if it is not, then it should be > discussed and checked in separately. This is so users can enter colors in numeric format, such as ARGBD0FFFFFF. The NS port interprets such formats to allow alpha specification. > Index: lisp/frame.el > ... > > Is this necessary? Can NS make frames on another display? If not, > then this should not be needed. The problem this solves is requesting a GUI frame from a terminal session using make-frame-on-display. As it was, only display formats compatible with X-Windows were accepted. This allows anything non-nil to work, since right now only one display is supported under NS. > Index: lisp/loadup.el > =================================================================== > RCS file: /sources/emacs/emacs/lisp/loadup.el,v > retrieving revision 1.169 > diff -a -u -r1.169 loadup.el > --- lisp/loadup.el 21 Jun 2008 01:38:37 -0000 1.169 > +++ lisp/loadup.el 15 Jul 2008 16:53:09 -0000 > @@ -212,3 +212,6 @@ > (if (featurep 'mac-carbon) > (progn > (load "term/mac-win"))) > +(if (featurep 'ns-windowing) > + (progn > + (load "emacs-lisp/easymenu") ;; for platform-related menu > adjustments > > RMS was very much against having different platforms change the menus. > Is that policy changed? If not, then this should not be needed. > And there's no need to use easymenu to modify menus. This is not done by default, only when ns-extended-platform-support is turned on. And it makes only very minor modifications, for purpose of enhancing platform consistency. Anyway, if this is retained, one option would be to move it out into a separately-loaded file (not included in dumped emacs). Another would be to manually do what easymenu does (but this would be ugly). > + (load "emacs-lisp/easy-mmode") > > Same as above, this is for adding platform specific behavior. Removed as per other discussion. > Index: lisp/startup.el > =================================================================== > RCS file: /sources/emacs/emacs/lisp/startup.el,v > retrieving revision 1.494 > diff -a -u -r1.494 startup.el > --- lisp/startup.el 2 Jul 2008 01:49:01 -0000 1.494 > +++ lisp/startup.el 15 Jul 2008 16:54:18 -0000 > @@ -182,3 +182,6 @@ > and VALUE is the value which is given to that frame parameter > \(most options use the argument for this, so VALUE is not present).") > > +(defconst command-line-ns-option-alist > + '(("-NSAutoLaunch" 1 ns-ignore-1-arg) > + ("-NXAutoLaunch" 1 ns-ignore-1-arg) > [snip] > > Can this be put somewhere else? It would be better if all other > platforms > do not have to load this definition. > + ;; Add the long NS options to longopts. > + (setq tem command-line-ns-option-alist) > + (while tem > + (if (string-match "^--" (car (car tem))) > + (setq longopts (cons (list (car (car tem))) longopts))) > + (setq tem (cdr tem))) > > Can this be avoided and use the generic code for command line > processing? NS has followed the X GUI in both these cases, using ns- prefix to distinguish variables for option lists, etc. that are specific to the NS platform, as X- is used to indicate X-windows. I do realize that w32 and mac (Carbon) seem to deal with their arguments in ways not involving this file. The question is, should every platform be done in the same way as X, or should X and NS be changed to whatever mac and w32 are doing? > +#ifdef HAVE_NS > +abbrev.o buffer.o callint.o cmds.o dispnew.o editfns.o fileio.o > frame.o \ > + fontset.o indent.o insdel.o keyboard.o macros.o minibuf.o msdos.o > process.o \ > + scroll.o sysdep.o term.o widget.o window.o xdisp.o xfaces.o > xfns.o \ > + xterm.o xselect.o sound.o: nsgui.h > +nsfns.o: nsfns.m charset.h nsterm.h nsgui.h frame.h window.h > buffer.h \ > + dispextern.h nsgui.h fontset.h $(INTERVAL_SRC) keyboard.h > blockinput.h \ > + atimer.h systime.h epaths.h termhooks.h coding.h systime.h $ > (config_h) > +nsmenu.o: nsmenu.m termhooks.h frame.h window.h dispextern.h \ > + nsgui.h keyboard.h blockinput.h atimer.h systime.h buffer.h \ > + nsterm.h $(config_h) > +nsterm.o: nsterm.m blockinput.h atimer.h systime.h syssignal.h > nsterm.h \ > + nsgui.h frame.h charset.h ccl.h dispextern.h fontset.h > termhooks.h \ > + termopts.h termchar.h disptab.h buffer.h window.h keyboard.h \ > + $(INTERVAL_SRC) process.h coding.h $(config_h) > +nsselect.o: nsselect.m blockinput.h nsterm.h nsgui.h frame.h $ > (config_h) > +nsimage.o: nsimage.m nsterm.h > +nsfont.o: nsterm.h dispextern.h frame.h lisp.h $(config_h) > > Better make this unconditional. Here I aped what the Carbon port does just above these lines. If it's wrong, which example should I follow? > Index: src/frame.c > ... > Fselect_window (XFRAME (frame)->selected_window, Qnil); > > +#ifdef NS_IMPL_COCOA > + /* term gets no other notification of this */ > + if (for_deletion) > + Fraise_frame(Qnil); > +#endif > > Why isn't his needed for other platforms too? I don't know. I would be happy to get rid of it if I knew. > +#ifndef HAVE_NS /* PENDING: ensure font attrs change goes through */ > > Better use "FIXME" instead of "PENDING". Are there other options besides FIXME? I use PENDING to flag something that is not necessarily a bug or even needing change, but that needs to be considered. What about TODO? > Index: src/fringe.c > =================================================================== > RCS file: /sources/emacs/emacs/src/fringe.c,v > retrieving revision 1.52 > diff -a -u -r1.52 fringe.c > --- src/fringe.c 14 May 2008 07:49:32 -0000 1.52 > +++ src/fringe.c 15 Jul 2008 16:59:29 -0000 > @@ -482,4 +482,4 @@ > static Lisp_Object *fringe_faces; > static int max_fringe_bitmaps; > > -static int max_used_fringe_bitmap = MAX_STANDARD_FRINGE_BITMAPS; > +int max_used_fringe_bitmap = MAX_STANDARD_FRINGE_BITMAPS; > > > Why? This is not in the ChangeLog? Undo please if not needed. Used for memory allocation handling in nsterm.m (ns_draw_fringe_bitmap(), from line 2163). It is in the ChangeLog: * fringe.c (max_used_fringe_bitmap): Make public. > Index: src/getloadavg.c > =================================================================== > RCS file: /sources/emacs/emacs/src/getloadavg.c,v > retrieving revision 1.53 > diff -a -u -r1.53 getloadavg.c > --- src/getloadavg.c 8 Jan 2008 20:44:33 -0000 1.53 > +++ src/getloadavg.c 15 Jul 2008 16:59:32 -0000 > > This file comes from gnulib, we try not to change it here. It > should go there first. > Why wasn't this needed until now? This should not have anything to > do with NS... I don't know, probably it was never working. I actually am not sure if it is now, but anyway the original is using #ifdef NeXT to check whether mach.h is in a subdirectory, but it seems all NeXT-derived systems put it in the same place (e.g., my OS X 10.5.4 machine here). ACTUALLY, it looks like this file is not even used anymore (grep thru Makefile.in), so probably it should just be removed. > Index: src/keyboard.c > =================================================================== > RCS file: /sources/emacs/emacs/src/keyboard.c,v > retrieving revision 1.960 > diff -a -u -r1.960 keyboard.c > --- src/keyboard.c 26 Jun 2008 04:24:36 -0000 1.960 > +++ src/keyboard.c 15 Jul 2008 17:00:59 -0000 > @@ -7305,3 +7312,7 @@ > void > handle_async_input () > { > +#ifdef BSD4_1 > + extern int select_alarmed; > +#endif > + > > Please remove this or use HAVE_NS instead, BSD4_1 is not defined in > the emacs tree anymore. This probably causes big problems with the > input if this code is needed. > > @@ -7317,6 +7328,9 @@ > if (nread <= 0) > break; > > +#ifdef BSD4_1 > + select_alarmed = 1; /* Force the select emulator back to > life */ > +#endif > > Same here. > > @@ -7335,3 +7349,6 @@ > signal (signo, input_available_signal); > #endif /* USG */ > > +#ifdef BSD4_1 > + sigisheld (SIGIO); > +#endif > > Same here. > > @@ -7348,3 +7366,6 @@ > handle_async_input (); > #endif > > +#ifdef BSD4_1 > + sigfree (); > +#endif > > And here. These all must be spurious merge conflicts. Removed. Sorry about this. > @@ -8044,7 +8070,12 @@ > && SYMBOLP (XSYMBOL (def)->function) > && ! NILP (Fget (def, Qmenu_alias))) > def = XSYMBOL (def)->function; > +#ifdef HAVE_NS > + /* prefer 'super' bindings */ > + tem = Fwhere_is_internal (def, Qnil, Qsuper, Qt, Qt); > +#else > tem = Fwhere_is_internal (def, Qnil, Qt, Qnil, Qt); > +#endif > > > Please run this by Stefan, not sure if we want to have a platform do > something different here. Yes, I was working to make this only happen when ns-extended-platform- support-mode is on, but it's a bit tricky since this only gets called once. > Index: src/keymap.c > =================================================================== > RCS file: /sources/emacs/emacs/src/keymap.c,v > retrieving revision 1.374 > diff -a -u -r1.374 keymap.c > --- src/keymap.c 5 Jun 2008 05:44:11 -0000 1.374 > +++ src/keymap.c 15 Jul 2008 17:01:22 -0000 > @@ -111,3 +111,6 @@ > > extern Lisp_Object Voverriding_local_map; > > +#ifdef HAVE_NS > +extern Lisp_Object Qalt, Qcontrol, Qhyper, Qmeta, Qsuper; > +#endif > > Please get the changes in this file approved by Stefan, they look a > bit suspicious. OK, being worked on. > Index: src/lisp.h > =================================================================== > RCS file: /sources/emacs/emacs/src/lisp.h,v > retrieving revision 1.631 > diff -a -u -r1.631 lisp.h > --- src/lisp.h 11 Jul 2008 14:20:06 -0000 1.631 > +++ src/lisp.h 15 Jul 2008 17:01:36 -0000 > @@ -28,3 +28,7 @@ > #define P_(proto) () > #endif > > +#ifdef NS_IMPL_GNUSTEP > +/* This conflicts with functions in the GNUstep libraries. */ > +#define hash_remove emacs_hash_remove > +#endif /* NS_IMPL_GNUSTEP */ > > Sounds odd, but if this is indeed true, better rename the function in > emacs to avoid extra #ifdefs. Yes, hash_put, hash_remove, etc. are all used in those libs. Only hash_remove is declared so publicly within emacs though. > Index: src/terminfo.c > =================================================================== > RCS file: /sources/emacs/emacs/src/terminfo.c,v > retrieving revision 1.24 > diff -a -u -r1.24 terminfo.c > --- src/terminfo.c 14 May 2008 07:49:52 -0000 1.24 > +++ src/terminfo.c 15 Jul 2008 17:03:07 -0000 > @@ -24,4 +24,7 @@ > so that we do not need to conditionalize the places in Emacs > that set them. */ > > +/* Causes a conflict on OS X 10.3 .*/ > +#ifndef NS_IMPL_COCOA > char *UP, *BC, PC; > +#endif > > Does "emacs -nw" work after doing this? How come this wasn't a > problem with the Carbon port? Yes, and I don't know. It's possible something is different in the includes brought in by Carbon vs. Cocoa. > Index: src/xdisp.c > =================================================================== > RCS file: /sources/emacs/emacs/src/xdisp.c,v > retrieving revision 1.1233 > diff -a -u -r1.1233 xdisp.c > --- src/xdisp.c 15 Jul 2008 15:45:05 -0000 1.1233 > +++ src/xdisp.c 15 Jul 2008 17:05:45 -0000 > @@ -22539,7 +22576,10 @@ > /* Switch the display of W's cursor on or off, according to the value > of ON. */ > > -static void > +#ifndef HAVE_NS > +static > +#endif > +void > update_window_cursor (w, on) > struct window *w; > int on; > > Why? It doesn't seem to be used outside this file. nsterm.m uses it for cursor blink. Yes, I know, it should use the generic mechanism for this, and that is a longstanding TODO. Help with it is welcome. Once that's done this can be removed. thanks for the comments, Adrian