From: <cli...@li...> - 2005-08-29 15:17:52
|
Send clisp-cvs mailing list submissions to cli...@li... To subscribe or unsubscribe via the World Wide Web, visit https://lists.sourceforge.net/lists/listinfo/clisp-cvs or, via email, send a message with subject or body 'help' to cli...@li... You can reach the person managing the list at cli...@li... When replying, please edit your Subject line so it is more specific than "Re: Contents of clisp-cvs digest..." CLISP CVS commits for today Today's Topics: 1. clisp Makefile.devel,1.138,1.139 (Sam Steingold) 2. clisp/src ChangeLog,1.4848,1.4849 (Sam Steingold) 3. clisp/src/m4 rusage.m4,1.5,1.6 (Bruno Haible) 4. clisp/src ChangeLog,1.4849,1.4850 (Bruno Haible) 5. clisp/src/m4 intparam.m4,1.2,NONE (Bruno Haible) 6. clisp/src/m4 param.m4,NONE,1.1 (Bruno Haible) 7. clisp/src/m4 intparam.m4,1.3,1.4 (Bruno Haible) 8. clisp/src/m4 floatparam.m4,NONE,1.1 (Bruno Haible) 9. clisp/src configure.in,1.100,1.101 ChangeLog,1.4850,1.4851 (Bruno Haible) 10. clisp/src/m4 param.m4,1.1,1.2 (Bruno Haible) 11. clisp/src aridecl.d,1.20,1.21 ChangeLog,1.4851,1.4852 (Bruno Haible) 12. clisp/doc clisp.xml.in,1.48,1.49 (Sam Steingold) --__--__-- Message: 1 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp Makefile.devel,1.138,1.139 Date: Mon, 29 Aug 2005 14:30:54 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12946 Modified Files: Makefile.devel Log Message: (src/configure): depend on version.sh Index: Makefile.devel =================================================================== RCS file: /cvsroot/clisp/clisp/Makefile.devel,v retrieving revision 1.138 retrieving revision 1.139 diff -u -d -r1.138 -r1.139 --- Makefile.devel 26 Aug 2005 15:02:45 -0000 1.138 +++ Makefile.devel 29 Aug 2005 14:30:51 -0000 1.139 @@ -154,7 +154,7 @@ AUTOHEADER = autoheader $(CLISP_CONFIGURES) utils/hln/configure: %/configure : \ - %/configure.in $(AUTOCONF_FILES) + %/configure.in $(AUTOCONF_FILES) version.sh cd $*; $(AUTOCONF) --include=$(CURDIR)/src/autoconf --include=$(CURDIR) $(MOD_CONFIG_H_IN) : %/config.h.in : %/configure.in $(AUTOCONF_FILES) --__--__-- Message: 2 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/src ChangeLog,1.4848,1.4849 Date: Mon, 29 Aug 2005 14:30:54 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12946/src Modified Files: ChangeLog Log Message: (src/configure): depend on version.sh Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4848 retrieving revision 1.4849 diff -u -d -r1.4848 -r1.4849 --- ChangeLog 28 Aug 2005 20:30:56 -0000 1.4848 +++ ChangeLog 29 Aug 2005 14:30:51 -0000 1.4849 @@ -1,3 +1,7 @@ +2005-08-29 Sam Steingold <sd...@gn...> + + * Makefile.devel (src/configure): depend on version.sh + 2005-08-28 Sam Steingold <sd...@gn...> * noreadline.d: add prototypes to avoid warnings --__--__-- Message: 3 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src/m4 rusage.m4,1.5,1.6 Date: Mon, 29 Aug 2005 14:40:09 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/m4 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14940/m4 Modified Files: rusage.m4 Log Message: Fix for an error message when cross-compiling: checking whether getrusage works... guessing no ./configure: line 20174: test: too many arguments Index: rusage.m4 =================================================================== RCS file: /cvsroot/clisp/clisp/src/m4/rusage.m4,v retrieving revision 1.5 retrieving revision 1.6 diff -u -d -r1.5 -r1.6 --- rusage.m4 3 Aug 2003 00:22:38 -0000 1.5 +++ rusage.m4 29 Aug 2005 14:40:07 -0000 1.6 @@ -1,5 +1,5 @@ dnl -*- Autoconf -*- -dnl Copyright (C) 1993-2003 Free Software Foundation, Inc. +dnl Copyright (C) 1993-2005 Free Software Foundation, Inc. dnl This file is free software, distributed under the terms of the GNU dnl General Public License. As a special exception to the GNU General dnl Public License, this file may be distributed as part of a program @@ -73,7 +73,7 @@ dnl When cross-compiling, don't assume anything. cl_cv_func_getrusage_works="guessing no")]) fi - if test $cl_cv_func_getrusage_works = yes; then + if test "$cl_cv_func_getrusage_works" = yes; then AC_DEFINE(HAVE_GETRUSAGE,,[have <sys/time.h>, the getrusage() function, the struct rusage type, and <sys/resource.h> defines RUSAGE_SELF]) AC_DEFINE_UNQUOTED(RUSAGE_WHO_T,$cl_cv_proto_getrusage_arg1,[type of `who' in getrusage() declaration]) fi --__--__-- Message: 4 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src ChangeLog,1.4849,1.4850 Date: Mon, 29 Aug 2005 14:40:09 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14940 Modified Files: ChangeLog Log Message: Fix for an error message when cross-compiling: checking whether getrusage works... guessing no ./configure: line 20174: test: too many arguments Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4849 retrieving revision 1.4850 diff -u -d -r1.4849 -r1.4850 --- ChangeLog 29 Aug 2005 14:30:51 -0000 1.4849 +++ ChangeLog 29 Aug 2005 14:40:07 -0000 1.4850 @@ -1,3 +1,7 @@ +2005-08-27 Bruno Haible <br...@cl...> + + * m4/rusage.m4 (CL_RUSAGE): Fix error when cross-compiling. + 2005-08-29 Sam Steingold <sd...@gn...> * Makefile.devel (src/configure): depend on version.sh --__--__-- Message: 5 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src/m4 intparam.m4,1.2,NONE Date: Mon, 29 Aug 2005 14:44:22 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/m4 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16035 Removed Files: intparam.m4 Log Message: Move to param.m4. --- intparam.m4 DELETED --- --__--__-- Message: 6 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src/m4 param.m4,NONE,1.1 Date: Mon, 29 Aug 2005 14:44:37 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/m4 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16087 Added Files: param.m4 Log Message: Moved here from intparam.m4. --- NEW FILE: param.m4 --- dnl -*- Autoconf -*- dnl Copyright (C) 1993-2003 Free Software Foundation, Inc. dnl This file is free software, distributed under the terms of the GNU dnl General Public License. As a special exception to the GNU General dnl Public License, this file may be distributed as part of a program dnl that contains a configuration script generated by Autoconf, under dnl the same distribution terms as the rest of that program. dnl From Bruno Haible, Marcus Daniels, Sam Steingold. AC_PREREQ(2.13) AC_DEFUN([CL_MACHINE], [AC_REQUIRE([AC_PROG_CC])dnl AC_REQUIRE([AC_C_CHAR_UNSIGNED])dnl cl_machine_file_c=$2 cl_machine_file_h=$3 if test $cross_compiling = no; then if test -z "$[$4]"; then AC_CHECKING(for [$1]) cat > conftest.$ac_ext <<EOF #include "confdefs.h" EOF cat "$cl_machine_file_c" >> conftest.$ac_ext ORIGCC="$CC" if test $ac_cv_prog_gcc = yes; then # gcc -O (gcc version <= 2.3.2) crashes when compiling long long shifts for # target 80386. Strip "-O". CC=`echo "$CC " | sed -e 's/-O //g'` fi AC_TRY_EVAL(ac_link) CC="$ORIGCC" if test -s conftest; then echo "creating $cl_machine_file_h" ./conftest > conftest.h if cmp -s "$cl_machine_file_h" conftest.h 2>/dev/null; then # The file exists and we would not be changing it rm -f conftest.h else rm -f "$cl_machine_file_h" mv conftest.h "$cl_machine_file_h" fi [$4]=1 else echo "creation of $cl_machine_file_h failed" fi rm -f conftest* fi else echo "cross-compiling - cannot create $cl_machine_file_h" fi ]) --__--__-- Message: 7 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src/m4 intparam.m4,1.3,1.4 Date: Mon, 29 Aug 2005 14:45:30 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/m4 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16271 Added Files: intparam.m4 Log Message: Determination of integer type parameters when cross-compiling. --- NEW FILE: intparam.m4 --- # intparam.m4 serial 1 dnl Copyright (C) 2005 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. AC_DEFUN([CL_INTPARAM_CROSS], [ AC_REQUIRE([CL_LONGLONG]) AC_REQUIRE([CL_LONGDOUBLE]) AC_REQUIRE([AC_C_BIGENDIAN]) cl_machine_file_h=$1 { CL_INTPARAM_BITSIZE([signed char], [char_bitsize]) CL_INTPARAM_BITSIZE([short], [short_bitsize]) CL_INTPARAM_BITSIZE([int], [int_bitsize]) CL_INTPARAM_BITSIZE([long], [long_bitsize]) if test $cl_cv_c_longlong = yes; then CL_INTPARAM_BITSIZE([long long], [longlong_bitsize]) fi CL_INTPARAM_BITSIZE([unsigned char], [uchar_bitsize]) CL_INTPARAM_BITSIZE([unsigned short], [ushort_bitsize]) CL_INTPARAM_BITSIZE([unsigned int], [uint_bitsize]) CL_INTPARAM_BITSIZE([unsigned long], [ulong_bitsize]) if test $cl_cv_c_longlong = yes; then CL_INTPARAM_BITSIZE([unsigned long long], [ulonglong_bitsize]) fi if test -n "$char_bitsize"; then echo "/* Integers of type char have $char_bitsize bits. */" echo "#define char_bitsize $char_bitsize" echo else echo "#error \"Integers of type char have no binary representation!!\"" fi if test -n "$short_bitsize"; then echo "/* Integers of type short have $short_bitsize bits. */" echo "#define short_bitsize $short_bitsize" echo else echo "#error \"Integers of type short have no binary representation!!\"" fi if test -n "$int_bitsize"; then echo "/* Integers of type int have $int_bitsize bits. */" echo "#define int_bitsize $int_bitsize" echo else echo "#error \"Integers of type int have no binary representation!!\"" fi if test -n "$long_bitsize"; then echo "/* Integers of type long have $long_bitsize bits. */" echo "#define long_bitsize $long_bitsize" echo else echo "#error \"Integers of type long have no binary representation!!\"" fi if test $cl_cv_c_longlong = yes; then if test -n "$longlong_bitsize"; then echo "/* Integers of type long long have $longlong_bitsize bits. */" echo "#define long_long_bitsize $longlong_bitsize" echo else echo "#error \"Integers of type long long have no binary representation!!\"" fi fi if test -n "$uchar_bitsize"; then echo "/* Integers of type unsigned char have $uchar_bitsize bits. */" echo else echo "#error \"Integers of type unsigned char have no binary representation!!\"" fi if test -n "$ushort_bitsize"; then echo "/* Integers of type unsigned short have $ushort_bitsize bits. */" echo else echo "#error \"Integers of type unsigned short have no binary representation!!\"" fi if test -n "$uint_bitsize"; then echo "/* Integers of type unsigned int have $uint_bitsize bits. */" echo else echo "#error \"Integers of type unsigned int have no binary representation!!\"" fi if test -n "$ulong_bitsize"; then echo "/* Integers of type unsigned long have $ulong_bitsize bits. */" echo else echo "#error \"Integers of type unsigned long have no binary representation!!\"" fi if test $cl_cv_c_longlong = yes; then if test -n "$ulonglong_bitsize"; then echo "/* Integers of type unsigned long long have $ulonglong_bitsize bits. */" echo else echo "#error \"Integers of type unsigned long long have no binary representation!!\"" fi fi if test "$char_bitsize" != "$uchar_bitsize"; then echo "#error \"Integer types char and unsigned char have different sizes!!\"" fi if test "$short_bitsize" != "$ushort_bitsize"; then echo "#error \"Integer types short and unsigned short have different sizes!!\"" fi if test "$int_bitsize" != "$uint_bitsize"; then echo "#error \"Integer types int and unsigned int have different sizes!!\"" fi if test "$long_bitsize" != "$ulong_bitsize"; then echo "#error \"Integer types long and unsigned long have different sizes!!\"" fi if test $cl_cv_c_longlong = yes; then if test "$longlong_bitsize" != "$ulonglong_bitsize"; then echo "#error \"Integer types long long and unsigned long long have different sizes!!\"" fi fi AC_TRY_COMPILE([], [typedef int verify[2*(sizeof(char*)<=sizeof (long))-1];], [], [echo "#error \"Type char * does not fit into a long!!\""]) _AC_COMPUTE_INT([sizeof (char *)], [pointer_size]) pointer_bitsize=`expr $pointer_size '*' $char_bitsize` echo "/* Pointers of type char * have $pointer_bitsize bits. */" echo "#define pointer_bitsize $pointer_bitsize" echo CL_INTPARAM_SIZEOF([char], [sizeof_char]) CL_INTPARAM_ALIGNOF([char], [alignment_char]) echo "/* Type char has sizeof = $sizeof_char and alignment = $alignment_char. */" echo "#define sizeof_char $sizeof_char" echo "#define alignment_char $alignment_char" echo CL_INTPARAM_SIZEOF([unsigned char], [sizeof_uchar]) CL_INTPARAM_ALIGNOF([unsigned char], [alignment_uchar]) echo "/* Type unsigned char has sizeof = $sizeof_uchar and alignment = $alignment_uchar. */" echo CL_INTPARAM_SIZEOF([short], [sizeof_short]) CL_INTPARAM_ALIGNOF([short], [alignment_short]) echo "/* Type short has sizeof = $sizeof_short and alignment = $alignment_short. */" echo "#define sizeof_short $sizeof_short" echo "#define alignment_short $alignment_short" echo CL_INTPARAM_SIZEOF([unsigned short], [sizeof_ushort]) CL_INTPARAM_ALIGNOF([unsigned short], [alignment_ushort]) echo "/* Type unsigned short has sizeof = $sizeof_ushort and alignment = $alignment_ushort. */" echo CL_INTPARAM_SIZEOF([int], [sizeof_int]) CL_INTPARAM_ALIGNOF([int], [alignment_int]) echo "/* Type int has sizeof = $sizeof_int and alignment = $alignment_int. */" echo "#define sizeof_int $sizeof_int" echo "#define alignment_int $alignment_int" echo CL_INTPARAM_SIZEOF([unsigned int], [sizeof_uint]) CL_INTPARAM_ALIGNOF([unsigned int], [alignment_uint]) echo "/* Type unsigned int has sizeof = $sizeof_uint and alignment = $alignment_uint. */" echo CL_INTPARAM_SIZEOF([long], [sizeof_long]) CL_INTPARAM_ALIGNOF([long], [alignment_long]) echo "/* Type long has sizeof = $sizeof_long and alignment = $alignment_long. */" echo "#define sizeof_long $sizeof_long" echo "#define alignment_long $alignment_long" echo CL_INTPARAM_SIZEOF([unsigned long], [sizeof_ulong]) CL_INTPARAM_ALIGNOF([unsigned long], [alignment_ulong]) echo "/* Type unsigned long has sizeof = $sizeof_ulong and alignment = $alignment_ulong. */" echo if test $cl_cv_c_longlong = yes; then CL_INTPARAM_SIZEOF([long long], [sizeof_longlong]) CL_INTPARAM_ALIGNOF([long long], [alignment_longlong]) echo "/* Type long long has sizeof = $sizeof_longlong and alignment = $alignment_longlong. */" echo "#define sizeof_long_long $sizeof_longlong" echo "#define alignment_long_long $alignment_longlong" echo CL_INTPARAM_SIZEOF([unsigned long long], [sizeof_ulonglong]) CL_INTPARAM_ALIGNOF([unsigned long long], [alignment_ulonglong]) echo "/* Type unsigned long long has sizeof = $sizeof_ulonglong and alignment = $alignment_ulonglong. */" echo fi CL_INTPARAM_SIZEOF([float], [sizeof_float]) CL_INTPARAM_ALIGNOF([float], [alignment_float]) echo "/* Type float has sizeof = $sizeof_float and alignment = $alignment_float. */" echo "#define sizeof_float $sizeof_float" echo "#define alignment_float $alignment_float" echo CL_INTPARAM_SIZEOF([double], [sizeof_double]) CL_INTPARAM_ALIGNOF([double], [alignment_double]) echo "/* Type double has sizeof = $sizeof_double and alignment = $alignment_double. */" echo "#define sizeof_double $sizeof_double" echo "#define alignment_double $alignment_double" echo if test $cl_cv_c_longdouble = yes; then CL_INTPARAM_SIZEOF([long double], [sizeof_longdouble]) CL_INTPARAM_ALIGNOF([long double], [alignment_longdouble]) echo "/* Type long double has sizeof = $sizeof_longdouble and alignment = $alignment_longdouble. */" echo "#define sizeof_long_double $sizeof_longdouble" echo "#define alignment_long_double $alignment_longdouble" echo fi CL_INTPARAM_SIZEOF([char *], [sizeof_char_ptr]) CL_INTPARAM_ALIGNOF([char *], [alignment_char_ptr]) echo "/* Type char * has sizeof = $sizeof_char_ptr and alignment = $alignment_char_ptr. */" echo CL_INTPARAM_SIZEOF([long *], [sizeof_long_ptr]) CL_INTPARAM_ALIGNOF([long *], [alignment_long_ptr]) echo "/* Type long * has sizeof = $sizeof_long_ptr and alignment = $alignment_long_ptr. */" echo CL_INTPARAM_SIZEOF([void (*)(void)], [sizeof_function_ptr]) CL_INTPARAM_ALIGNOF([void (*)(void)], [alignment_function_ptr]) echo "/* Type function * has sizeof = $sizeof_function_ptr and alignment = $alignment_function_ptr. */" echo case $ac_cv_c_bigendian in yes) echo "/* Type unsigned short is stored BIG-ENDIAN in memory (i.e. like mc68000 or sparc). */" echo "#define short_big_endian" echo "/* Type unsigned int is stored BIG-ENDIAN in memory (i.e. like mc68000 or sparc). */" echo "#define int_big_endian" echo "/* Type unsigned long is stored BIG-ENDIAN in memory (i.e. like mc68000 or sparc). */" echo "#define long_big_endian" if test $cl_cv_c_longlong = yes; then echo "/* Type unsigned long long is stored BIG-ENDIAN in memory (i.e. like mc68000 or sparc). */" echo "#define long_long_big_endian" fi ;; no) echo "/* Type unsigned short is stored LITTLE-ENDIAN in memory (i.e. like Z80 or VAX). */" echo "#define short_little_endian" echo "/* Type unsigned int is stored LITTLE-ENDIAN in memory (i.e. like Z80 or VAX). */" echo "#define int_little_endian" echo "/* Type unsigned long is stored LITTLE-ENDIAN in memory (i.e. like Z80 or VAX). */" echo "#define long_little_endian" if test $cl_cv_c_longlong = yes; then echo "/* Type unsigned long long is stored LITTLE-ENDIAN in memory (i.e. like Z80 or VAX). */" echo "#define long_long_little_endian" fi ;; *) echo "#error \"Type short is stored in memory in an obscure manner!!\"" echo "#error \"Type int is stored in memory in an obscure manner!!\"" echo "#error \"Type long is stored in memory in an obscure manner!!\"" if test $cl_cv_c_longlong = yes; then echo "#error \"Type long long is stored in memory in an obscure manner!!\"" fi ;; esac echo case $host_cpu in hppa) echo "/* Stack grows up. */" echo "#define stack_grows_up" ;; *) echo "/* Stack grows down. */" echo "#define stack_grows_down" ;; esac } > "$cl_machine_file_h" ]) dnl CL_INTPARAM_BITSIZE(type, variable) dnl puts into variable the determined bitsize of the type. AC_DEFUN([CL_INTPARAM_BITSIZE], [ n=1; x="($1)2" while true; do AC_TRY_COMPILE([], [typedef int verify[2*(($1)($x) == 0) - 1];], [$2=$n; break;], [if test $n = 1000; then $2=; break; fi;]) n=`expr $n + 1`; x="$x * ($1)2" done ]) dnl CL_INTPARAM_SIZEOF(type, variable) dnl puts into variable the determined size of the type. AC_DEFUN([CL_INTPARAM_SIZEOF], [ _AC_COMPUTE_INT([sizeof($1)], [$2]) ]) dnl CL_INTPARAM_ALIGNOF(type, variable) dnl puts into variable the determined alignment of the type. AC_DEFUN([CL_INTPARAM_ALIGNOF], [ dnl Simplify the guessing by assuming that the alignment is a power of 2. n=1 while true; do AC_TRY_COMPILE([ #ifdef __cplusplus # ifdef __GNUC__ # define alignof(type) __alignof__ (type) # else template <class type> struct alignof_helper { char slot1; type slot2; }; # define alignof(type) offsetof (alignof_helper<type>, slot2) # endif #else # define alignof(type) offsetof (struct { char slot1; type slot2; }, slot2) #endif ], [typedef int verify[2*(alignof($1) == $n) - 1];], [$2=$n; break;] [if test $n = 0; then $2=; break; fi]) n=`expr $n '*' 2` done ]) --__--__-- Message: 8 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src/m4 floatparam.m4,NONE,1.1 Date: Mon, 29 Aug 2005 14:45:52 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/m4 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16372 Added Files: floatparam.m4 Log Message: Determination of floating-point type parameters when cross-compiling. --- NEW FILE: floatparam.m4 --- # floatparam.m4 serial 1 dnl Copyright (C) 2005 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. AC_DEFUN([CL_FLOATPARAM_CROSS], [ AC_REQUIRE([CL_LONGDOUBLE]) cl_machine_file_h=$1 { echo "/* Rounding modes, for use below */" echo "#define rounds_to_nearest 0 /* 0.5 ulp */" echo "#define rounds_to_zero 1 /* 1 ulp */" echo "#define rounds_to_infinity 2 /* 1 ulp */" echo "#define rounds_to_minus_infinity 3 /* 1 ulp */" echo for type in float double "`if test $cl_cv_c_longdouble = yes; then echo 'long double'; fi`"; do if test -n "$type"; then epsilon_bits=-1; y="($type)1.0" while true; do AC_TRY_COMPILE([], [typedef int verify[2*( (($type)(($type)1.0 + ($type)($y)) == ($type)1.0) || ($type)(($type)(($type)1.0 + ($type)($y)) - ($type)1.0) != ($type)($y) ) - 1];], [break;]) epsilon_bits=`expr $epsilon_bits + 1`; y="$y * ($type)0.5" done negepsilon_bits=-1; y="($type)-1.0" while true; do AC_TRY_COMPILE([], [typedef int verify[2*( (($type)(($type)1.0 + ($type)($y)) == ($type)1.0) || ($type)(($type)(($type)1.0 + ($type)($y)) - ($type)1.0) != ($type)($y) ) - 1];], [break;]) negepsilon_bits=`expr $negepsilon_bits + 1`; y="$y * ($type)0.5" done echo "/* Properties of type \`$type': */" echo "/* Largest n for which 1+2^(-n) is exactly represented is $epsilon_bits. */" echo "/* Largest n for which 1-2^(-n) is exactly represented is $negepsilon_bits. */" if test `expr $negepsilon_bits '<=' $epsilon_bits` = 1; then echo "#error \"No exponent jump at 1.0 for type $type!\"" else if test `expr $negepsilon_bits '>' $epsilon_bits + 1` = 1; then echo "/* Base for type '$type' is 2^"`expr $negepsilon_bits - $epsilon_bits` fi echo "#define "`echo $type | sed -e 's, ,_,g'`"_mant_bits "`expr $epsilon_bits + 1` fi x="($type)1.0" i=$epsilon_bits while test $i != 0; do x="$x * ($type)0.5" i=`expr $i - 1` done x="($type)($x)" y1="($type)(($type)1.0 + ($type)5.0*$x)" y2="($type)(($type)1.0 + ($type)6.0*$x)" ys1="($type)(($type)1.0 + ($type)5.4*$x)" ys2="($type)(($type)1.0 + ($type)5.6*$x)" z1="($type)(($type)-1.0 + ($type)(-5.0)*$x)" z2="($type)(($type)-1.0 + ($type)(-6.0)*$x)" zs1="($type)(($type)-1.0 + ($type)(-5.4)*$x)" zs2="($type)(($type)-1.0 + ($type)(-5.6)*$x)" rounds= if test -z "$rounds"; then AC_TRY_COMPILE([], [typedef int verify[2*( $ys1 == $y1 && $ys2 == $y2 && $zs1 == $z1 && $zs2 == $z2 ) - 1];], [rounds=rounds_to_nearest]) fi if test -z "$rounds"; then AC_TRY_COMPILE([], [typedef int verify[2*( $ys1 == $y1 && $ys2 == $y1 && $zs1 == $z1 && $zs2 == $z1 ) - 1];], [rounds=rounds_to_zero]) fi if test -z "$rounds"; then AC_TRY_COMPILE([], [typedef int verify[2*( $ys1 == $y2 && $ys2 == $y2 && $zs1 == $z1 && $zs2 == $z1 ) - 1];], [rounds=rounds_to_infinity]) fi if test -z "$rounds"; then AC_TRY_COMPILE([], [typedef int verify[2*( $ys1 == $y1 && $ys2 == $y1 && $zs1 == $z2 && $zs2 == $z2 ) - 1];], [rounds=rounds_to_minus_infinity]) fi if test -n "$rounds"; then echo "#define "`echo $type | sed -e 's, ,_,g'`"_rounds $rounds" else echo "#error \"Unknown rounding mode for type $type!\"" fi echo fi done dnl Words-in-a-double endianness test. Note that, assuming IEEE 754 format, dnl 2.5479915693083957 = { 0x40 0x04 0x62 0x49 0x67 0x65 0x4E 0x64 } ..bIgeNd dnl 1.4396527506122064e164 = { 0x62 0x04 0x00 0x00 0x4E 0x65 0x67 0x49 } b...NegI dnl 2.5495230282078065 = { 0x40 0x04 0x65 0x6C 0x54 0x54 0x69 0x4C } ..elTTiL dnl 1.4139248369879473e214 = { 0x6C 0x65 0x00 0x00 0x4C 0x69 0x54 0x54 } le..LiTT double_wordorder_bigendian_p= AC_TRY_COMPILE([double a[9] = { 0, 2.5479915693083957, 0, 1.4396527506122064e164, 0, 2.5495230282078065, 0, 1.4139248369879473e214, 0 };], [], [ if grep LiTTle conftest.$ac_objext >/dev/null ; then double_wordorder_bigendian_p=0 else if grep bIgeN conftest.$ac_objext >/dev/null ; then double_wordorder_bigendian_p=1 fi fi]) if test -n "$double_wordorder_bigendian_p"; then echo "#define double_wordorder_bigendian_p $double_wordorder_bigendian_p" else echo "/* Dazed and confused! Better not define anything. */" fi echo } > "$cl_machine_file_h" ]) --__--__-- Message: 9 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src configure.in,1.100,1.101 ChangeLog,1.4850,1.4851 Date: Mon, 29 Aug 2005 14:48:15 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16808 Modified Files: configure.in ChangeLog Log Message: Improved cross-compilation support. Index: configure.in =================================================================== RCS file: /cvsroot/clisp/clisp/src/configure.in,v retrieving revision 1.100 retrieving revision 1.101 diff -u -d -r1.100 -r1.101 --- configure.in 28 Aug 2005 16:21:04 -0000 1.100 +++ configure.in 29 Aug 2005 14:48:13 -0000 1.101 @@ -299,10 +299,10 @@ CL_DOUBLE_INEXACT dnl builds intparam.h CL_MACHINE([integer types and behaviour], -${srcdir}/intparam.c,intparam.h,cl_cv_file_intparam_h) +${srcdir}/intparam.c,[CL_INTPARAM_CROSS],intparam.h,cl_cv_file_intparam_h) dnl builds floatparam.h CL_MACHINE([floating-point types and behaviour], -${srcdir}/floatparam.c,floatparam.h,cl_cv_file_floatparam_h) +${srcdir}/floatparam.c,[CL_FLOATPARAM_CROSS],floatparam.h,cl_cv_file_floatparam_h) dnl AC_MSG_NOTICE([* output file generation]) dnl Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4850 retrieving revision 1.4851 diff -u -d -r1.4850 -r1.4851 --- ChangeLog 29 Aug 2005 14:40:07 -0000 1.4850 +++ ChangeLog 29 Aug 2005 14:48:13 -0000 1.4851 @@ -1,5 +1,15 @@ 2005-08-27 Bruno Haible <br...@cl...> + More cross-compilation support. + * m4/intparam.m4: New file. + * m4/floatparam.m4: New file. + * m4/param.m4: Renamed from m4/intparam.m4. + (CL_MACHINE): Add an additional CROSS_MACRO parameter. + * configure.in (CL_MACHINE): When cross-compiling, use + CL_INTPARAM_CROSS and CL_FLOATPARAM_CROSS. + +2005-08-27 Bruno Haible <br...@cl...> + * m4/rusage.m4 (CL_RUSAGE): Fix error when cross-compiling. 2005-08-29 Sam Steingold <sd...@gn...> --__--__-- Message: 10 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src/m4 param.m4,1.1,1.2 Date: Mon, 29 Aug 2005 14:48:30 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/m4 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16940/m4 Modified Files: param.m4 Log Message: Improved cross-compilation support. Index: param.m4 =================================================================== RCS file: /cvsroot/clisp/clisp/src/m4/param.m4,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- param.m4 29 Aug 2005 14:44:34 -0000 1.1 +++ param.m4 29 Aug 2005 14:48:28 -0000 1.2 @@ -1,5 +1,5 @@ dnl -*- Autoconf -*- -dnl Copyright (C) 1993-2003 Free Software Foundation, Inc. +dnl Copyright (C) 1993-2005 Free Software Foundation, Inc. dnl This file is free software, distributed under the terms of the GNU dnl General Public License. As a special exception to the GNU General dnl Public License, this file may be distributed as part of a program @@ -10,14 +10,15 @@ AC_PREREQ(2.13) +dnl CL_MACHINE([MESSAGE], [PROGRAM_TO_RUN], [CROSS_MACRO], [DESTINATION], [CACHE_VAR]) AC_DEFUN([CL_MACHINE], [AC_REQUIRE([AC_PROG_CC])dnl AC_REQUIRE([AC_C_CHAR_UNSIGNED])dnl cl_machine_file_c=$2 -cl_machine_file_h=$3 -if test $cross_compiling = no; then -if test -z "$[$4]"; then +if test -z "$[$5]"; then AC_CHECKING(for [$1]) +if test $cross_compiling = no; then +cl_machine_file_h=$4 cat > conftest.$ac_ext <<EOF #include "confdefs.h" EOF @@ -40,13 +41,14 @@ rm -f "$cl_machine_file_h" mv conftest.h "$cl_machine_file_h" fi - [$4]=1 + [$5]=1 else echo "creation of $cl_machine_file_h failed" fi rm -f conftest* -fi else -echo "cross-compiling - cannot create $cl_machine_file_h" +echo "creating $cl_machine_file_h" +$3([$4]) +fi fi ]) --__--__-- Message: 11 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src aridecl.d,1.20,1.21 ChangeLog,1.4851,1.4852 Date: Mon, 29 Aug 2005 14:51:53 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17434 Modified Files: aridecl.d ChangeLog Log Message: Make the long-float overflow check work on 64-bit platforms. (LF_exp_high+1 was evaluating to 0x0000000100000000UL, which is never equal to the 32-bit exponent field.) Index: aridecl.d =================================================================== RCS file: /cvsroot/clisp/clisp/src/aridecl.d,v retrieving revision 1.20 retrieving revision 1.21 diff -u -d -r1.20 -r1.21 --- aridecl.d 14 May 2005 13:56:55 -0000 1.20 +++ aridecl.d 29 Aug 2005 14:51:51 -0000 1.21 @@ -230,9 +230,11 @@ # Bei e /= 0 ist das höchstwertige Bit =1. # n>=ceiling(53/intDsize), damit ein LF nicht weniger Mantissenbits hat als ein DF. #define LF_minlen ceiling(53,intDsize) +# Define as 'unsigned int', not 'unsigned long', so that +# LF_exp_high+1 wraps around to 0 just like the 'expo' field does. #define LF_exp_low 1 - #define LF_exp_mid 0x80000000UL - #define LF_exp_high 0xFFFFFFFFUL + #define LF_exp_mid 0x80000000U + #define LF_exp_high 0xFFFFFFFFU #ifdef TYPECODES # Typinfo-Byte für LF >=0 : #define LF_type lfloat_type Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4851 retrieving revision 1.4852 diff -u -d -r1.4851 -r1.4852 --- ChangeLog 29 Aug 2005 14:48:13 -0000 1.4851 +++ ChangeLog 29 Aug 2005 14:51:51 -0000 1.4852 @@ -1,5 +1,11 @@ 2005-08-27 Bruno Haible <br...@cl...> + Make the long-float overflow check work on 64-bit platforms. + * aridecl.d (LF_exp_mid, LF_exp_high): Define as 'unsigned int', + not 'unsigned long'. + +2005-08-27 Bruno Haible <br...@cl...> + More cross-compilation support. * m4/intparam.m4: New file. * m4/floatparam.m4: New file. --__--__-- Message: 12 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc clisp.xml.in,1.48,1.49 Date: Mon, 29 Aug 2005 15:15:00 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22890/doc Modified Files: clisp.xml.in Log Message: use <filename role="clisp-cvs"> for COPYRIGHT Index: clisp.xml.in =================================================================== RCS file: /cvsroot/clisp/clisp/doc/clisp.xml.in,v retrieving revision 1.48 retrieving revision 1.49 diff -u -d -r1.48 -r1.49 --- clisp.xml.in 28 Aug 2005 16:22:03 -0000 1.48 +++ clisp.xml.in 29 Aug 2005 15:14:58 -0000 1.49 @@ -740,7 +740,7 @@ <para>&clisp; project was started in late 1980-ies by &bruno; and &stoll;, both in Germany.</para> -<para>See <ulink url="&clisp-cvs;COPYRIGHT">COPYRIGHT</ulink> +<para>See <filename role="clisp-cvs">COPYRIGHT</filename> for the list of other contributors and the license.</para> </refsection> --__--__-- _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest |