1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00

Use imaginary_part' instead of imaginary' to fix build on Solaris 2.10.

This commit is contained in:
Ludovic Courtès 2008-02-23 11:28:11 +00:00
parent e27d249537
commit a2c25234fb
4 changed files with 17 additions and 5 deletions

1
NEWS
View file

@ -48,6 +48,7 @@ would trigger an unbound variable error for `match:andmap'.
** Fixed build issue for GNU/Linux on IA64
** Fixed build issue on NetBSD 1.6
** Fixed build issue on Solaris 2.10 x86_64
Changes in 1.8.4 (since 1.8.3)

3
THANKS
View file

@ -28,6 +28,7 @@ For fixes or providing information which led to a fix:
Stephen Compall
Brian Crowder
Christopher Cramer
David Diffenbaugh
Hyper Division
Alexandre Duret-Lutz
Nils Durner
@ -50,6 +51,7 @@ For fixes or providing information which led to a fix:
Steve Juranich
Richard Kim
Bruce Korb
René Köcher
Matthias Köppe
Matt Kraai
Miroslav Lichvar
@ -59,6 +61,7 @@ For fixes or providing information which led to a fix:
Antoine Mathys
Dan McMahill
Roger Mc Murtrie
Tim Mooney
Han-Wen Nienhuys
Jan Nieuwenhuizen
Hrvoje Nikšić

View file

@ -1,3 +1,10 @@
2008-02-23 Ludovic Courtès <ludo@gnu.org>
* numbers.c (scm_make_rectangular): Rename argument to
`real_part' and `imaginary_part' to work around Solaris 2.10
headers which define `imaginary' as a macro. Patch by Tim
Mooney <mooney@dogbert.cc.ndsu.NoDak.edu>.
2008-02-22 Ludovic Courtès <ludo@gnu.org>
* read.c (strncasecmp): Add declaration when
@ -12,7 +19,8 @@
Fix bug #22369.
* goops.c (scm_add_slot): Add `SCM_UNDEFINED' as last argument
to `scm_list_n ()'. Thanks to the anonymous reporter.
to `scm_list_n ()'. Thanks to René Köcher
<shirk87@googlemail.com>.
2008-02-17 Ludovic Courtès <ludo@gnu.org>

View file

@ -5336,13 +5336,13 @@ scm_c_make_rectangular (double re, double im)
}
SCM_DEFINE (scm_make_rectangular, "make-rectangular", 2, 0, 0,
(SCM real, SCM imaginary),
"Return a complex number constructed of the given @var{real} and\n"
"@var{imaginary} parts.")
(SCM real_part, SCM imaginary_part),
"Return a complex number constructed of the given @var{real-part} "
"and @var{imaginary-part} parts.")
#define FUNC_NAME s_scm_make_rectangular
{
struct dpair xy;
scm_two_doubles (real, imaginary, FUNC_NAME, &xy);
scm_two_doubles (real_part, imaginary_part, FUNC_NAME, &xy);
return scm_c_make_rectangular (xy.x, xy.y);
}
#undef FUNC_NAME