From 2f5fe7a459a3c6a5afcb7b2496552af56feaf8b7 Mon Sep 17 00:00:00 2001 From: Christophe Rhodes Date: Wed, 17 Jul 2002 14:29:51 +0000 Subject: [PATCH] 0.7.5.14: Add support for Solaris 9 ... MAP_ANON is the same as in Solaris 8 (not that surprising). Mention one or two other bits of NEWS --- NEWS | 7 +++++++ src/runtime/sunos-os.c | 6 +++--- version.lisp-expr | 2 +- 3 files changed, 11 insertions(+), 4 deletions(-) diff --git a/NEWS b/NEWS index 4bdbcd5..4ee47b2 100644 --- a/NEWS +++ b/NEWS @@ -1163,10 +1163,17 @@ changes in sbcl-0.7.5 relative to sbcl-0.7.4: Instead, an error of type FILE-ERROR is signalled. changes in sbcl-0.7.6 relative to sbcl-0.7.5: + * Array initialization with :INITIAL-ELEMENT is now much faster for + cases when the compiler cannot open code the array creation, but + does know what the UPGRADED-ARRAY-ELEMENT-TYPE will be. * bug fix: LOAD :IF-DOES-NOT-EXIST NIL now works when file type is specified. (This was at the root of some bad interactions between SBCL and ILISP: thanks to Gregory Wright for diagnosing this and reporting the bug.) + * bug fix: Floating point exceptions are treated much more + consistently on the x86/Linux and PPC/Linux platforms. + * Support for the Solaris 9 operating environment has been included + (thanks to Daniel Merritt) planned incompatible changes in 0.7.x: * When the profiling interface settles down, maybe in 0.7.x, maybe diff --git a/src/runtime/sunos-os.c b/src/runtime/sunos-os.c index 4ed611d..5e721f9 100644 --- a/src/runtime/sunos-os.c +++ b/src/runtime/sunos-os.c @@ -50,10 +50,10 @@ void os_init(void) lose("sunos major version=%d (which isn't 5!)", major_version); } minor_version = atoi(name.release+2); - if (minor_version == 8) { + if ((minor_version == 8) || (minor_version == 9)) { KLUDGE_MAYBE_MAP_ANON = 0x100; - } else if (minor_version > 8) { - FSHOW((stderr, "os_init: Solaris version greater than 8?\nUnknown MAP_ANON behaviour.\n")); + } else if (minor_version > 9) { + FSHOW((stderr, "os_init: Solaris version greater than 9?\nUnknown MAP_ANON behaviour.\n")); lose("Unknown mmap() interaction with MAP_ANON"); } else { /* minor_version < 8 */ kludge_mmap_fd = open("/dev/zero",O_RDONLY); diff --git a/version.lisp-expr b/version.lisp-expr index 51c2d9d..9169f4f 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -18,4 +18,4 @@ ;;; for internal versions, especially for internal versions off the ;;; main CVS branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.7.5.13" +"0.7.5.14" -- 1.7.10.4