(ispell-word): Don't alter args; set them only thru `interactive' spec.
[emacs.git] / src / m / news-r6.h
blobcf6e019fd051320c74bcb6abb45a0af4e3cb6a15
1 /* news-risc6.h is for the "RISC News", OS version 6. */
2 /* This is in the public domain. */
4 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
5 * group of arguments and treat it as an array of the arguments. */
7 #define NO_ARG_ARRAY
9 /* Use type int rather than a union, to represent Lisp_Object */
10 /* This is desirable for most machines. */
12 #define NO_UNION_TYPE
14 /* Data type of load average, as read out of kmem. */
16 #define LOAD_AVE_TYPE long
18 /* Convert that into an integer that is 100 for a load average of 1.0 */
20 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / 256.0)
22 /* Define NO_REMAP if memory segmentation makes it not work well
23 to change the boundary between the text section and data section
24 when Emacs is dumped. If you define this, the preloaded Lisp
25 code will not be sharable; but that's better than failing completely. */
27 #define NO_REMAP
29 /* Alter some of the options used when linking. */
31 /*#define C_DEBUG_SWITCH -g*/
32 #define C_DEBUG_SWITCH -O -Olimit 2000
33 #ifdef __GNUC__
34 #define LD_SWITCH_MACHINE -g -Xlinker -D -Xlinker 800000
35 #else /* !__GNUC__ */
36 /*#define LD_SWITCH_MACHINE -D 800000 -g*/
37 #define LD_SWITCH_MACHINE -D 800000
38 #endif /* !__GNUC__ */
39 #define LIBS_MACHINE -lmld
40 #define LIBS_TERMCAP -lcurses
42 /* The standard definitions of these macros would work ok,
43 but these are faster because the constants are short. */
45 #define XUINT(a) (((unsigned)(a) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS))
47 #define XSET(var, type, ptr) \
48 ((var) = \
49 ((int)(type) << VALBITS) \
50 + (((unsigned) (ptr) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS)))
52 /* arch-tag: b9fd7b75-ba3c-46d4-8966-24381b13001b
53 (do not change this comment) */