Re: Building guile 1.8.6 on Tru64 5.1b

[Didier Godefroy]

Ok, the patch fixes that problem and there is another popping up a bit
further now:

/bin/bash ../libtool --tag=CC   --mode=compile gcc -pthread -DHAVE_CONFIG_H
-I.. -I.. -I.. -I/opt/TWWfsw/libgmp41/include -I/usr/local/readline/include
-I/usr/local/include -I/opt/TWWfsw/libgmp41/include
-I/usr/local/readline/include -I/usr/local/include -D_REENTRANT  -O2 -g
-Wall -Wmissing-prototypes -Werror -MT libguile_la-numbers.lo -MD -MP -MF
.deps/libguile_la-numbers.Tpo -c -o libguile_la-numbers.lo `test -f
'numbers.c' || echo './'`numbers.c
libtool: compile:  gcc -pthread -DHAVE_CONFIG_H -I.. -I.. -I..
-I/opt/TWWfsw/libgmp41/include -I/usr/local/readline/include
-I/usr/local/include -I/opt/TWWfsw/libgmp41/include
-I/usr/local/readline/include -I/usr/local/include -D_REENTRANT -O2 -g -Wall
-Wmissing-prototypes -Werror -MT libguile_la-numbers.lo -MD -MP -MF
.deps/libguile_la-numbers.Tpo -c numbers.c  -DPIC -o
.libs/libguile_la-numbers.o
cc1: warnings being treated as errors
numbers.c: In function 'scm_is_unsigned_integer':
numbers.c:5756: warning: control may reach end of non-void function
'__gmpz_get_ui' being inlined
gmake[3]: *** [libguile_la-numbers.lo] Error 1



> The attached patch is less radical than the Cairo one.  Can you try it
> and report back?
> 

> diff --git a/libguile/numbers.c b/libguile/numbers.c
> index 52dfb73..37435b5 100644
> --- a/libguile/numbers.c
> +++ b/libguile/numbers.c
> @@ -1,4 +1,4 @@
> -/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004,2005,
> 2006, 2007, 2008 Free Software Foundation, Inc.
> +/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004,2005,
> 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
>   *
>   * Portions Copyright 1990, 1991, 1992, 1993 by AT&T Bell Laboratories
>   * and Bellcore.  See scm_divide.
> @@ -5352,7 +5352,12 @@ SCM
>  scm_c_make_polar (double mag, double ang)
>  {
>    double s, c;
> -#if HAVE_SINCOS
> +
> +  /* The sincos(3) function is undocumented an broken on Tru64.  Thus we only
> +     use it on Glibc-based systems that have it (it's a GNU extension).  See
> +     http://lists.gnu.org/archive/html/guile-user/2009-04/msg00033.html for
> +     details.  */
> +#if (defined HAVE_SINCOS) && (defined __GLIBC__) && (defined _GNU_SOURCE)
>    sincos (ang, &s, &c);
>  #else
>    s = sin (ang);


-- 
Didier Godefroy
mailto:address@hidden