home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / lucid / bug-lucid-emacs / text0032.txt < prev    next >
Encoding:
Text File  |  1993-07-04  |  10.8 KB  |  357 lines
  1. I didn't have time to test the beta for 19.6 (I was only given a week,
  2. which is too short a time for testing PD software at our site - I need
  3. at least 2 weeks notice to have a reasonable chance of installing and
  4. trying a new release of anything:-).  Anyway, that's why I'm posting
  5. this - it is the diffs I used to make 19.6 on our system (your mileage
  6. may vary, etc. etc.).  I hope that Jaimie will include at least some
  7. of them in the next release and perhaps more comment notes also (for
  8. the changes not included:-).
  9.  
  10. The last diff, for file event-Xt.c, is a hack to provide proper
  11. support for the keypad on AIX.  Note that you have to define two
  12. values in config.h (which are included in the diffs here).  If other
  13. people have servers that don't convert keysyms well for numlock, then
  14. you might want to look at this change also (I provided the #defines so
  15. the action could be turned on or off easily).
  16.  
  17. Of special note are the changes to s-aix3-2.h (for HAVE_TIMEVAL and
  18. the index/rindex stuff) and to config.h for the compile switch (thanks
  19. to a previous poster who built the image -O -Q; that provides an image
  20. that is smaller 14Meg to 5Meg and seems to run faster).  I don't have
  21. xpm installed (yet, I plan to once the header file moves to
  22. /usr/local/include/X11).  Also, a Sun-ism crept back into the Makefile
  23. in etc - you shouldn't do -Bstatic there!  (Note: you'll see that I
  24. built those tools -O -Q also).
  25.  
  26. I hope this helps people out.  Have fun! - Bob
  27. =====>8 Cut here and enjoy? 8<=====
  28. *** /misc/lucid/lemacs-19.6/etc/Makefile-dist    Wed Apr 14 10:50:05 1993
  29. --- /misc/lucid/lemacs-19.6/etc/Makefile    Wed Apr 14 10:50:08 1993
  30. ***************
  31. *** 6,12 ****
  32.   
  33.   # make sure executables are linked statically.
  34.   # add -DUSG for SysV movemail and timer
  35. ! CFLAGS= -g -Bstatic
  36.   # For Xenix.  Needed for movemail
  37.   #  LOADLIBES= -lx
  38.   
  39. --- 6,12 ----
  40.   
  41.   # make sure executables are linked statically.
  42.   # add -DUSG for SysV movemail and timer
  43. ! CFLAGS= -O -Q
  44.   # For Xenix.  Needed for movemail
  45.   #  LOADLIBES= -lx
  46.   
  47. *** /misc/lucid/lemacs-19.6/src/s/s-aix3-2.h-dist    Tue Apr 13 12:03:12 1993
  48. --- /misc/lucid/lemacs-19.6/src/s/s-aix3-2.h    Tue Apr 13 17:05:06 1993
  49. ***************
  50. *** 20,29 ****
  51. --- 20,46 ----
  52.   #ifndef __S_AIX3_2_H
  53.   #define __S_AIX3_2_H 1
  54.   
  55. + #ifdef index
  56. + #undef index
  57. + #endif
  58. + 
  59. + #ifdef rindex
  60. + #undef rindex
  61. + #endif
  62. + 
  63.   #include "s-aix3-1.h"
  64.   
  65.   #define NEED_REALPATH
  66.   #define HAVE_SETPRIORITY
  67. + #define NEED_TIME_H
  68. + 
  69. + #ifdef index
  70. + #undef index
  71. + #endif
  72. + 
  73. + #ifdef rindex
  74. + #undef rindex
  75. + #endif
  76.   
  77.   #pragma alloca
  78.   
  79. *** /misc/lucid/lemacs-19.6/src/config.h-dist    Thu Apr  1 15:13:00 1993
  80. --- /misc/lucid/lemacs-19.6/src/config.h    Tue Apr 13 17:03:20 1993
  81. ***************
  82. *** 34,40 ****
  83.      This has to come before include the m- file.
  84.    */
  85.   
  86. ! #define USE_GCC
  87.   /* #define USE_LCC */
  88.   
  89.   /* Include here a s- file that describes the system type you are using.
  90. --- 34,40 ----
  91.      This has to come before include the m- file.
  92.    */
  93.   
  94. ! /* #define USE_GCC */
  95.   /* #define USE_LCC */
  96.   
  97.   /* Include here a s- file that describes the system type you are using.
  98. ***************
  99. *** 42,48 ****
  100.      the s- files to use for them.  See s-template.h for documentation on 
  101.      writing s- files.
  102.    */
  103. ! #include "s/s-sunos4shr.h"
  104.   
  105.   /* Include here a m- file that describes the machine and system you use.
  106.      See the file ../etc/MACHINES for a list of machines and the names of 
  107. --- 42,48 ----
  108.      the s- files to use for them.  See s-template.h for documentation on 
  109.      writing s- files.
  110.    */
  111. ! #include "s/s-aix3-2.h"
  112.   
  113.   /* Include here a m- file that describes the machine and system you use.
  114.      See the file ../etc/MACHINES for a list of machines and the names of 
  115. ***************
  116. *** 49,55 ****
  117.      the m- files to use for them.   See m-template.h for info on what m- 
  118.      files should define.
  119.    */
  120. ! #include "m/m-sparc.h"
  121.   
  122.   /* Load in the conversion definitions if this system
  123.      needs them and the source file being compiled has not
  124. --- 49,55 ----
  125.      the m- files to use for them.   See m-template.h for info on what m- 
  126.      files should define.
  127.    */
  128. ! #include "m/m-ibmrs6000.h"
  129.   
  130.   /* Load in the conversion definitions if this system
  131.      needs them and the source file being compiled has not
  132. ***************
  133. *** 72,79 ****
  134.   #endif
  135.   
  136.   /* Define HAVE_XPM if you have the `xpm' library and want emacs to use it. */
  137. ! #define HAVE_XPM
  138.   
  139.   /* Define `subprocesses' if you want to have code for asynchronous
  140.      subprocesses (as used in M-x compile and M-x shell).  These do not
  141.      work for some USG systems yet; for the ones where they work, the
  142. --- 72,85 ----
  143.   #endif
  144.   
  145.   /* Define HAVE_XPM if you have the `xpm' library and want emacs to use it. */
  146. ! /* #define HAVE_XPM */
  147.   
  148. + /*
  149. +    Define numlock behavior if default is not good. */
  150. + 
  151. + #define SPECIAL_NUM_LOCK_BEHAVIOR
  152. + #define NUM_LOCK_MODIFIER Mod5Mask
  153. + 
  154.   /* Define `subprocesses' if you want to have code for asynchronous
  155.      subprocesses (as used in M-x compile and M-x shell).  These do not
  156.      work for some USG systems yet; for the ones where they work, the
  157. ***************
  158. *** 129,138 ****
  159. --- 135,146 ----
  160.      If you have trouble with _malloc being multiply-defined, or if you're
  161.      on a NeXT (or possibly MACH in general) comment out the next four lines.
  162.    */
  163. + /*
  164.   #ifdef SYSTEM_MALLOC
  165.   #undef SYSTEM_MALLOC
  166.   #endif
  167.   #define GNU_MALLOC
  168. + */
  169.   
  170.   /* The SunOS 4.1 version of localtime() allocates 8 bytes and writes to 9,
  171.      which causes predictably bad problems unless you use the SunOS version
  172. ***************
  173. *** 197,203 ****
  174.   
  175.      See the comments in lwlib/Imakefile for more info.
  176.    */
  177. ! /* #define LWLIB_USES_MOTIF */
  178.   /* #define LWLIB_USES_OLIT */
  179.   
  180.   /* Energize requires Motif. */
  181. --- 205,211 ----
  182.   
  183.      See the comments in lwlib/Imakefile for more info.
  184.    */
  185. ! #define LWLIB_USES_MOTIF
  186.   /* #define LWLIB_USES_OLIT */
  187.   
  188.   /* Energize requires Motif. */
  189. ***************
  190. *** 214,220 ****
  191.      X libraries aren't in a place that your loader can find on its own,
  192.      you might want to add "-L/..." or something similar.  */
  193.   
  194. ! /* #define LD_SWITCH_SITE -L/x11r4/usr.`arch`/lib */
  195.   
  196.   /* Define C_SWITCH_SITE to contain any special flags your compiler may
  197.      need.  For instance, if you've defined HAVE_X_WINDOWS above and your
  198. --- 222,228 ----
  199.      X libraries aren't in a place that your loader can find on its own,
  200.      you might want to add "-L/..." or something similar.  */
  201.   
  202. ! #define LD_SWITCH_SITE -L/usr/local/lib
  203.   
  204.   /* Define C_SWITCH_SITE to contain any special flags your compiler may
  205.      need.  For instance, if you've defined HAVE_X_WINDOWS above and your
  206. ***************
  207. *** 221,227 ****
  208.      X include files aren't in a place that your compiler can find on its
  209.      own, you might want to add "-I/..." or something similar.  */
  210.   
  211. ! /* #define C_SWITCH_SITE -I/x11r4/usr/include */
  212.   
  213.   #ifdef USE_GCC
  214.   /* Depending on how GCC is installed, you may need to add the gcc library
  215. --- 229,235 ----
  216.      X include files aren't in a place that your compiler can find on its
  217.      own, you might want to add "-I/..." or something similar.  */
  218.   
  219. ! /* #define C_SWITCH_SITE -O -Q */
  220.   
  221.   #ifdef USE_GCC
  222.   /* Depending on how GCC is installed, you may need to add the gcc library
  223. ***************
  224. *** 241,246 ****
  225. --- 249,256 ----
  226.   # undef C_OPTIMIZE_SWITCH
  227.   # define C_OPTIMIZE_SWITCH -O4 -Oi -G
  228.   #endif
  229. + 
  230. + #define C_OPTIMIZE_SWITCH -O -Q
  231.   
  232.   /* If you are using SunOS 4.1.1 and X11r5, then you need this patch.
  233.      There is a stupid bug in the SunOS libc.a: two functions which X11r5
  234. *** /misc/lucid/lemacs-19.6/src/event-Xt.c-dist    Tue Apr 13 11:58:41 1993
  235. --- /misc/lucid/lemacs-19.6/src/event-Xt.c    Tue Apr 13 12:01:36 1993
  236. ***************
  237. *** 40,45 ****
  238. --- 40,49 ----
  239.   static void describe_event ();
  240.   void emacs_Xt_focus_event_handler ();
  241.   
  242. + #ifdef SPECIAL_NUM_LOCK_BEHAVIOR
  243. + static void ConvertNumLockKeys ( );
  244. + #endif
  245. + 
  246.   /* The timestamp of the last button or key event used by emacs itself.
  247.      This is used for asserting selections and input focus. */
  248.   Time mouse_timestamp;
  249. ***************
  250. *** 376,381 ****
  251. --- 380,464 ----
  252.   
  253.   static XComposeStatus *x_compose_status;
  254.   
  255. + #ifdef SPECIAL_NUM_LOCK_BEHAVIOR
  256. + static void ConvertNumLockKeys ( KeySym *keysym, XKeyEvent *xKey )
  257. + {
  258. +     if ( ( xKey->state & NUM_LOCK_MODIFIER ) == NUM_LOCK_MODIFIER )             /* Num Lock is on in here. */
  259. +     {
  260. +         switch ( *keysym )                                                      /* Now, only change keypad keys. */
  261. +         {
  262. +             /*******************************************************************/
  263. +             /* Here we convert keypad keysyms to numeric keysyms.              */
  264. +             /*******************************************************************/
  265. +             case XK_KP_0:
  266. +             {
  267. +                 *keysym = XK_0;
  268. +                 break;
  269. +             }
  270. + 
  271. +             case XK_KP_1:
  272. +             {
  273. +                 *keysym = XK_1;
  274. +                 break;
  275. +             }
  276. +             case XK_KP_2:
  277. +             {
  278. +                 *keysym = XK_2;
  279. +                 break;
  280. +             }
  281. + 
  282. +             case XK_KP_3:
  283. +             {
  284. +                 *keysym = XK_3;
  285. +                 break;
  286. +             }
  287. + 
  288. +             case XK_KP_4:
  289. +             {
  290. +                 *keysym = XK_4;
  291. +                 break;
  292. +             }
  293. + 
  294. +             case XK_KP_5:
  295. +             {
  296. +                 *keysym = XK_5;
  297. +                 break;
  298. +             }
  299. + 
  300. +             case XK_KP_6:
  301. +             {
  302. +                 *keysym = XK_6;
  303. +                 break;
  304. +             }
  305. + 
  306. +             case XK_KP_7:
  307. +             {
  308. +                 *keysym = XK_7;
  309. +                 break;
  310. +             }
  311. + 
  312. +             case XK_KP_8:
  313. +             {
  314. +                 *keysym = XK_8;
  315. +                 break;
  316. +             }
  317. + 
  318. +             case XK_KP_9:
  319. +             {
  320. +                 *keysym = XK_9;
  321. +                 break;
  322. +             }
  323. + 
  324. +             case XK_KP_Decimal:
  325. +             {
  326. +                 *keysym = XK_period;
  327. +                 break;
  328. +             }
  329. +         }
  330. +     }
  331. + }
  332. + #endif
  333. + 
  334.   static Lisp_Object
  335.   x_to_emacs_keysym (event, simple_p)
  336.        XEvent *event;
  337. ***************
  338. *** 388,393 ****
  339. --- 471,480 ----
  340.     XLookupString (&event->xkey, 0, 0, &keysym, x_compose_status);
  341.     UNBLOCK_INPUT;
  342.     
  343. + #ifdef SPECIAL_NUM_LOCK_BEHAVIOR
  344. +   ConvertNumLockKeys ( &keysym, &event->xkey );
  345. + #endif
  346. + 
  347.     if (keysym >= XK_exclam && keysym <= XK_asciitilde)
  348.       /* We must assume that the X keysym numbers for the ASCII graphic
  349.          characters are the same as their ASCII codes.  */
  350. =====>8 Cut here and enjoy? 8<=====
  351. -- 
  352. ===============================================================================
  353. The opinions expressed above are those of Bob Hays and not SPSS, Inc.
  354.  bobhays@spss.com  Phone: (312) 329-3529 | "I do not remember the anal probe"
  355.                    Fax:   (312) 329-3657 |  - Passion Fish
  356.  
  357.