Mercurial > emacs
annotate src/m/isi-ov.h @ 58229:7f5b01c17652
(math-integrate-by-parts): Removed unused variable var-thing.
(math-integ-depth, math-integ-level, math-integral-limit)
(math-enable-subst, math-any-substs, math-integ-msg)
(math-prev-parts-v, math-good-parts, math-max-integral-limit)
(math-int-threshold, math-int-factors, math-double-roots)
(math-solve-simplifying, var-IntegLimit, math-solve-sign)
(var-GenCount): Declared these variables.
(calcFunc-integ): Don't check if var-IntegLimit is bound.
(math-integral-cache, math-integral-cache-state): Move declarations
to earlier in the file.
(math-deriv-var, math-deriv-total, math-deriv-symb): New variables.
(math-derivative, calcFunc-deriv, calcFunc-tderiv): Replace
variables deriv-var, deriv-total and deriv-symb by declared variables
math-deriv-var, math-deriv-total and math-deriv-symb.
(math-cur-record): New variable.
(math-integral, math-replace-integral-parts, math-integrate-by-parts)
(calc-dump-integral-cache, math-try-integral): Replace variable
cur-record by declared variable math-cur-record.
(math-has-rules): New variable.
(math-try-integral, math-do-integral): Use declared variable
math-has-rules instead of has-rules.
(math-t1, math-t2, math-t3): New variables.
(math-do-integral, math-do-integral-methods, math-try-solve-for)
(math-try-solve-prod, math-solve-poly-funny-powers)
(math-solve-crunch-poly, math-decompose-poly)
(math-solve-find-root-term, math-find-root-in-prod): Replace
variables t1, t2, t3 by declared variables math-t1, math-t2,
math-t3.
(math-so-far, math-integ-expr): New variables.
(math-do-integral-methods, math-integ-try-linear-substitutions)
(math-integ-try-substitutions): Replace variables so-far and expr by
declared variables math-so-far and math-integ-expr.
(math-expr-parts): New variable.
(math-expr-rational-in, math-expr-rational-in-rec): Replace variable
parts by declared variable math-expr-parts.
(calc-low, calc-high): New variables.
(calcFunc-table, math-scan-for-limits): Replaced variable low and
high with the declared variable calc-low and calc-high.
(math-solve-var, math-solve-full): New variables.
(math-try-solve-for, math-try-solve-prod, math-solve-prod)
(math-decompose-poly, math-solve-quartic, math-poly-all-roots)
(math-solve-find-root-in-prod, math-solve-for, math-solve-system)
(math-solve-system-rec, math-solve-get-sign, math-solve-get-int):
Replace variables solve-var and solve-full with declared variables
math-solve-var and math-solve-full.
(math-solve-vars): New variable.
(math-solve-system, math-solve-system-rec): Replace variable
solve-vars with declared variable math-solve-vars.
(math-try-solve-sign): New variable.
(math-try-solve-for, math-try-solve-prod): Replace variable
sign by declared variable math-try-solve-sign.
(math-solve-b): New variable.
(math-solve-poly-funny-powers, math-decompose-poly): Replace variable
b by declared variable math-solve-b.
(math-solve-system-vv, math-solve-res): New variables
(math-solve-system-rec, math-solve-system-subst): Replaced variables
vv and res with declared variables math-solve-system-vv and
math-solve-system-res.
author | Jay Belanger <jay.p.belanger@gmail.com> |
---|---|
date | Mon, 15 Nov 2004 06:16:21 +0000 |
parents | 695cf19ef79e |
children | 23a17af379b1 375f2633d815 |
rev | line source |
---|---|
456 | 1 /* machine description file for ISI 68000's |
44601
4be8406ebef9
Don't define HAVE_ALLOCA, C_ALLOCA and STACK_DIRECTION, now set by autoconf.
Andreas Schwab <schwab@suse.de>
parents:
14186
diff
changeset
|
2 Copyright (C) 1985, 1986, 2002 Free Software Foundation, Inc. |
456 | 3 |
4 This file is part of GNU Emacs. | |
5 | |
6 GNU Emacs is free software; you can redistribute it and/or modify | |
7 it under the terms of the GNU General Public License as published by | |
3699 | 8 the Free Software Foundation; either version 2, or (at your option) |
456 | 9 any later version. |
10 | |
11 GNU Emacs is distributed in the hope that it will be useful, | |
12 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 GNU General Public License for more details. | |
15 | |
16 You should have received a copy of the GNU General Public License | |
17 along with GNU Emacs; see the file COPYING. If not, write to | |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13374
diff
changeset
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13374
diff
changeset
|
19 Boston, MA 02111-1307, USA. */ |
456 | 20 |
21 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
44601
diff
changeset
|
22 /* The following line tells the configuration script what sort of |
456 | 23 operating system this machine is likely to run. |
24 USUAL-OPSYS="note" | |
25 | |
26 NOTE-START | |
27 Use `-opsystem=bsd4-2' or `-opsystem=bsd4-3'. | |
28 NOTE-END */ | |
29 | |
30 #define ISI68K | |
31 | |
9095
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
32 /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
33 is the most significant byte. */ |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
34 |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
35 #define WORDS_BIG_ENDIAN |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
36 |
456 | 37 /* Say this machine is a 68000 */ |
38 | |
39 #define m68000 | |
40 | |
41 /* Use type int rather than a union, to represent Lisp_Object */ | |
42 | |
43 #define NO_UNION_TYPE | |
44 | |
45 /* XINT must explicitly sign-extend */ | |
46 | |
47 #define EXPLICIT_SIGN_EXTEND | |
48 | |
49 /* Data type of load average, as read out of kmem. */ | |
50 | |
51 #ifdef BSD4_3 | |
52 #define LOAD_AVE_TYPE long | |
53 #else | |
54 #define LOAD_AVE_TYPE double | |
55 #endif BSD4_3 | |
56 | |
57 /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
58 | |
59 #ifdef BSD4_3 | |
60 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) | |
61 #else | |
62 #define LOAD_AVE_CVT(x) ((int) ((x) * 100.0)) | |
63 #endif | |
64 | |
65 /* Mask for address bits within a memory segment */ | |
66 | |
67 #define SEGMENT_MASK 0x1ffff | |
68 | |
69 /* use the -20 switch to get the 68020 code */ | |
70 /* #define C_SWITCH_MACHINE -20 */ | |
71 | |
72 /* Use the version of the library for the 68020 | |
73 because the standard library requires some special hacks in crt0 | |
74 which the GNU crt0 does not have. */ | |
75 | |
76 #define LIB_STANDARD -lmc | |
77 | |
78 /* macros to make unexec work right */ | |
79 | |
80 #define A_TEXT_OFFSET(HDR) sizeof(HDR) | |
81 #define A_TEXT_SEEK(HDR) sizeof(HDR) | |
82 | |
83 /* A few changes for the newer systems. */ | |
84 | |
85 #ifdef BSD4_3 | |
86 /* The following line affects crt0.c. */ | |
87 #undef m68k | |
88 | |
89 #undef LIB_STANDARD | |
90 #define LIB_STANDARD -lmc -lc | |
91 #define C_DEBUG_SWITCH -20 -O -X23 | |
92 #endif | |
52401 | 93 |
94 /* arch-tag: 3bfb5a11-d94e-4372-923b-9f47d0851f42 | |
95 (do not change this comment) */ |