mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-02 04:40:29 +02:00
Code Activity

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

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

10
libguile/ChangeLog
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>

8
libguile/numbers.c
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