Mercurial > hg > xemacs-beta
view src/m/hp800.h @ 5736:3192994c49ca
Convert C (un)signed long long values to bignums properly.
This patch also does the following:
- Uses make_fixnum instead of make_integer when the argument is guaranteed to
be in the fixnum range.
- Introduces make_unsigned_integer so that we handle unsigned values with the
high bit set correctly.
- Introduces conversions between bignums and (un)signed long long values.
- Uses mp_set_memory_functions with the BSD MP code, if it exists.
- Eliminates some unnecessary consing in the Lisp + and * implementations.
- Fixes a problem with check_valid_xbm_inline(). This function is called
during intialization. It calls Ftimes. When using pdump, this is a
problem, because (a) the bignum code is not initialized until *after*
dumping, so we don't try to dump any bignums, and (b) multiplication of
integers is done inside bignums so we handle fixnum overflow correctly. I
decided that an XBM file with dimensions that don't fit into fixnums is
probably not something we want to try to handle anyway, and did the
arithmetic with C values instead of Lisp values. Doing that broke one test,
which started getting a different error message from the one it expected, so
I adjusted the test to match the new reality.
- Fixes a few miscellaneous bugs in the BSD MP code.
See <CAHCOHQk0u0=eD1fUMHTNWi2Yh=1WgiYyCXdMbsGzHBNhdqYz4w@mail.gmail.com> in
xemacs-patches, as well as followup messages.
author | Jerry James <james@xemacs.org> |
---|---|
date | Mon, 17 Jun 2013 10:23:00 -0600 |
parents | 1f0b15040456 |
children |
line wrap: on
line source
/* machine description file for hp9000 series 800 machines. Copyright (C) 1987 Free Software Foundation, Inc. Copyright (C) 2010 Ben Wing. This file is part of XEmacs. XEmacs is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. XEmacs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with XEmacs. If not, see <http://www.gnu.org/licenses/>. */ /* Synched up with: FSF 19.31. */ /* The following line tells the configuration script what sort of operating system this machine is likely to run. USUAL-OPSYS="hpux" */ /* Now define a symbol for the cpu type, if your compiler does not define it automatically: Ones defined so far include vax, m68000, ns16000, pyramid, orion, tahoe, APOLLO and many others */ #ifndef hp9000s800 # define hp9000s800 #endif #ifdef __hpux #ifdef ENABLE_SM_FILE_DECLS_OF_LOADAVG_STUFF /* Data type of load average, as read out of kmem. */ #define LOAD_AVE_TYPE double /* Convert that into an integer that is 100 for a load average of 1.0 */ #define LOAD_AVE_CVT(x) ((int) (x * 100.0)) #endif /* ENABLE_SM_FILE_DECLS_OF_LOADAVG_STUFF */ /* the data segment on this machine always starts at address 0x40000000. */ #ifdef DATA_START #undef DATA_START #endif #ifdef TEXT_START #undef TEXT_START #endif #define DATA_START 0x40000000 #define TEXT_START 0x00000000 /* Define NO_REMAP if memory segmentation makes it not work well to change the boundary between the text section and data section when Emacs is dumped. If you define this, the preloaded Lisp code will not be sharable; but that's better than failing completely. */ #define NO_REMAP /* This machine requires completely different unexec code which lives in a separate file. Specify the file name. */ #define UNEXEC "unexhp9k800.o" /* Deleted LDAV_SYMBOL, handled in getloadavg.c */ #if 0 /* Supposedly no longer true. */ /* In hpux, for unknown reasons, S_IFLNK is defined even though symbolic links do not exist. Make sure our conditionals based on S_IFLNK are not confused. Here we assume that stat.h is included before config.h so that we can override it here. */ #undef S_IFLNK #endif #endif /* __hpux */