mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-03 13:20:26 +02:00
Code Activity

Fix NetBSD/alpha support.

Browse source
This commit is contained in:
Ludovic Courtès 2008-02-16 19:38:25 +00:00
parent 5826bf6572
commit 47c84a292d
3 changed files with 14 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
NEWS
View file

@ -20,12 +20,14 @@ called with an associator proc that returns neither a pair nor #f.
** Secondary threads now always return a valid module for (current-module). ** Secondary threads now always return a valid module for (current-module).
** Avoid MacOS build problems caused by incorrect combination of "64" ** Avoid MacOS build problems caused by incorrect combination of "64"
system and library calls. system and library calls.
** `guile-snarf' now honors `$TMPDIR'
** Fixed build with Sun Studio (Solaris 9) ** Fixed build with Sun Studio (Solaris 9)
** Fixed wrong-type-arg errors when creating zero length SRFI-4 ** Fixed wrong-type-arg errors when creating zero length SRFI-4
uniform vectors on AIX. uniform vectors on AIX.
** Fixed a deadlock that occurs upon GC with multiple threads. ** Fixed a deadlock that occurs upon GC with multiple threads.
** Fixed compile problem with GCC on Solaris and AIX (use of _Complex_I) ** Fixed compile problem with GCC on Solaris and AIX (use of _Complex_I)
** Fixed autotool-derived build problems on AIX 6.1. ** Fixed autotool-derived build problems on AIX 6.1.
** Fixed NetBSD/alpha support
** Fixed MacOS build problem caused by use of rl_get_keymap(_name) ** Fixed MacOS build problem caused by use of rl_get_keymap(_name)
* New modules (see the manual for details) * New modules (see the manual for details)

5
libguile/ChangeLog
View file

@ -1,3 +1,8 @@
2008-02-16 Ludovic Courtès <ludo@gnu.org>
* gc_os_dep.c: Add NetBSD/alpha support. Patch by Greg Troxel
<gdt@ir.bbn.com>.
2008-02-12 Ludovic Courtès <ludo@gnu.org> 2008-02-12 Ludovic Courtès <ludo@gnu.org>
* guile-snarf.in (tempdir): Honor `$TMPDIR'. * guile-snarf.in (tempdir): Honor `$TMPDIR'.

9
libguile/gc_os_dep.c
View file

@ -3,7 +3,7 @@
* Copyright (c) 1991-1995 by Xerox Corporation. All rights reserved. * Copyright (c) 1991-1995 by Xerox Corporation. All rights reserved.
* Copyright (c) 1996-1999 by Silicon Graphics. All rights reserved. * Copyright (c) 1996-1999 by Silicon Graphics. All rights reserved.
* Copyright (c) 1999 by Hewlett-Packard Company. All rights reserved. * Copyright (c) 1999 by Hewlett-Packard Company. All rights reserved.
* Copyright (c) 2000, 2001, 2002, 2003, 2004, 2006 Free Software Foundation * Copyright (c) 2000, 2001, 2002, 2003, 2004, 2006, 2008 Free Software Foundation
* *
* THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED * THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED
* OR IMPLIED. ANY USE IS AT YOUR OWN RISK. * OR IMPLIED. ANY USE IS AT YOUR OWN RISK.
@ -110,6 +110,11 @@ typedef int GC_bool;
# define OPENBSD # define OPENBSD
# define mach_type_known # define mach_type_known
# endif # endif
# if defined(__NetBSD__) && defined(__alpha__)
# define ALPHA
# define NETBSD
# define mach_type_known
# endif
# if defined(__NetBSD__) && defined(__powerpc__) # if defined(__NetBSD__) && defined(__powerpc__)
# define POWERPC # define POWERPC
# define NETBSD # define NETBSD
@ -246,7 +251,7 @@ typedef int GC_bool;
# endif # endif
# if defined(__alpha) || defined(__alpha__) # if defined(__alpha) || defined(__alpha__)
# define ALPHA # define ALPHA
# if !defined(LINUX) # if !defined(LINUX) && !defined (NETBSD)
# define OSF1 /* a.k.a Digital Unix */ # define OSF1 /* a.k.a Digital Unix */
# endif # endif
# define mach_type_known # define mach_type_known