From: <cli...@li...> - 2005-05-23 19:28:08
|
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/ffcall/callback/vacall_r vacall-sparc64.S,1.2,1.3 vacall-sparc64.c,1.3,1.4 (Bruno Haible) 2. clisp/ffcall/vacall vacall-sparc64.c,1.3,1.4 vacall-sparc64.S,1.3,1.4 (Bruno Haible) 3. clisp/src ChangeLog,1.4615,1.4616 (Bruno Haible) 4. clisp/src/m4 ffcall-smallstruct.m4,1.2,1.3 (Bruno Haible) 5. clisp/ffcall/avcall avcall-sparc.c,1.4,1.5 avcall-sparc64.c,1.2,1.3 avcall-sparc64.S,1.2,1.3 avcall-sparc.S,1.4,1.5 (Bruno Haible) 6. clisp/src stdint_.h,1.3,1.4 ChangeLog,1.4616,1.4617 (Bruno Haible) 7. clisp/ffcall/avcall configure,1.39,1.40 (Sam Steingold) 8. clisp/ffcall/callback/trampoline_r configure,1.48,1.49 (Sam Steingold) 9. clisp/libcharset/autoconf aclocal.m4,1.9,1.10 (Sam Steingold) 10. clisp/src/autoconf aclocal.m4,1.148,1.149 (Sam Steingold) --__--__-- Message: 1 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/ffcall/callback/vacall_r vacall-sparc64.S,1.2,1.3 vacall-sparc64.c,1.3,1.4 Date: Mon, 23 May 2005 10:15:08 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/ffcall/callback/vacall_r In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3644/ffcall/callback/vacall_r Modified Files: vacall-sparc64.S vacall-sparc64.c Log Message: list.anum was uninitialized. Fix from Valeriy E. Ushakov <uw...@pt...>. Index: vacall-sparc64.c =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/callback/vacall_r/vacall-sparc64.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- vacall-sparc64.c 2 Jun 2004 19:27:28 -0000 1.3 +++ vacall-sparc64.c 23 May 2005 10:15:06 -0000 1.4 @@ -1,7 +1,7 @@ /* vacall function for sparc64 CPU */ /* - * Copyright 1995-2004 Bruno Haible, <br...@cl...> + * Copyright 1995-2005 Bruno Haible, <br...@cl...> * * This is free software distributed under the GNU General Public Licence * described in the file COPYING. Contact the author if you don't have this @@ -113,6 +113,7 @@ list.aptr = (long)(&firstword - 6); list.raddr = (void*)0; list.rtype = __VAvoid; + list.anum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); Index: vacall-sparc64.S =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/callback/vacall_r/vacall-sparc64.S,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- vacall-sparc64.S 7 Mar 2000 20:50:31 -0000 1.2 +++ vacall-sparc64.S 23 May 2005 10:15:06 -0000 1.3 @@ -56,6 +56,7 @@ st %g0, [%fp+1775] stx %g0, [%fp+1791] st %g0, [%fp+1799] + st %g0, [%fp+1831] ldx [%g5], %o2 call %o2, 0 add %fp, 1775, %o1 --__--__-- Message: 2 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/ffcall/vacall vacall-sparc64.c,1.3,1.4 vacall-sparc64.S,1.3,1.4 Date: Mon, 23 May 2005 10:15:09 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/ffcall/vacall In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3644/ffcall/vacall Modified Files: vacall-sparc64.c vacall-sparc64.S Log Message: list.anum was uninitialized. Fix from Valeriy E. Ushakov <uw...@pt...>. Index: vacall-sparc64.S =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/vacall/vacall-sparc64.S,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- vacall-sparc64.S 2 Jun 2004 19:22:10 -0000 1.3 +++ vacall-sparc64.S 23 May 2005 10:15:06 -0000 1.4 @@ -57,8 +57,9 @@ st %f31, [%fp+1895] st %g0, [%fp+1775] stx %g0, [%fp+1791] - call %o2, 0 st %g0, [%fp+1799] + call %o2, 0 + st %g0, [%fp+1831] ld [%fp+1799], %o0 cmp %o0, 0 be,pn %icc, .LL4 Index: vacall-sparc64.c =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/vacall/vacall-sparc64.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- vacall-sparc64.c 2 Jun 2004 19:21:44 -0000 1.3 +++ vacall-sparc64.c 23 May 2005 10:15:06 -0000 1.4 @@ -1,7 +1,7 @@ /* vacall function for sparc64 CPU */ /* - * Copyright 1995-2004 Bruno Haible, <br...@cl...> + * Copyright 1995-2005 Bruno Haible, <br...@cl...> * * This is free software distributed under the GNU General Public Licence * described in the file COPYING. Contact the author if you don't have this @@ -113,6 +113,7 @@ list.aptr = (long)(&firstword - 6); list.raddr = (void*)0; list.rtype = __VAvoid; + list.anum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); --__--__-- Message: 3 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src ChangeLog,1.4615,1.4616 Date: Mon, 23 May 2005 10:16:25 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3857/src Modified Files: ChangeLog Log Message: Make CL_SMALL_STRUCT_RETURN test work on sparc64. Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4615 retrieving revision 1.4616 diff -u -d -r1.4615 -r1.4616 --- ChangeLog 23 May 2005 02:07:57 -0000 1.4615 +++ ChangeLog 23 May 2005 10:16:11 -0000 1.4616 @@ -1,3 +1,12 @@ +2005-05-22 Bruno Haible <br...@cl...> + + * m4/ffcall-smallstruct.m4 (CL_SMALL_STRUCT_RETURN): Use 'long' + instead of 'int'. Needed because on sparc64, 'int' has 32 bits, + a function returning a 'struct { int x; }' returns the result in the + 32 _high_ bits of %o0, whereas a function returning 'int' returns the + result in the 32 _low_ bits of %o0 (sign-extended to 64 bits). + Reported by Valeriy E. Ushakov <uw...@pt...>. + 2005-05-22 Sam Steingold <sd...@gn...> * modules/clx/new-clx/clx.f (make_display): when fixnum size is less --__--__-- Message: 4 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src/m4 ffcall-smallstruct.m4,1.2,1.3 Date: Mon, 23 May 2005 10:16:13 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/m4 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3857/src/m4 Modified Files: ffcall-smallstruct.m4 Log Message: Make CL_SMALL_STRUCT_RETURN test work on sparc64. Index: ffcall-smallstruct.m4 =================================================================== RCS file: /cvsroot/clisp/clisp/src/m4/ffcall-smallstruct.m4,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- ffcall-smallstruct.m4 14 Feb 2005 12:24:51 -0000 1.2 +++ ffcall-smallstruct.m4 23 May 2005 10:16:11 -0000 1.3 @@ -12,9 +12,9 @@ AC_DEFUN([CL_SMALL_STRUCT_RETURN], [AC_CACHE_CHECK([whether small structs are returned in registers], cl_cv_c_struct_return_small, [ AC_TRY_RUN(GL_NOCRASH[ -typedef struct { int x; } foo; int y; +typedef struct { long x; } foo; long y; foo foofun () { foo f; f.x = y; return f; } -int (*fun) () = (int (*) ()) foofun; +long (*fun) () = (long (*) ()) foofun; int main() { nocrash_init(); y = 37; if ((*fun)() != 37) exit(1); --__--__-- Message: 5 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/ffcall/avcall avcall-sparc.c,1.4,1.5 avcall-sparc64.c,1.2,1.3 avcall-sparc64.S,1.2,1.3 avcall-sparc.S,1.4,1.5 Date: Mon, 23 May 2005 10:17:24 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/ffcall/avcall In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4187/ffcall/avcall Modified Files: avcall-sparc.c avcall-sparc64.c avcall-sparc64.S avcall-sparc.S Log Message: Change the register allocation of iret, so that the "nop" instruction really comes immediately after the call. Reported by Valeriy E. Ushakov <uw...@pt...>. Index: avcall-sparc.c =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/avcall/avcall-sparc.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -d -r1.4 -r1.5 --- avcall-sparc.c 14 Mar 2005 12:22:52 -0000 1.4 +++ avcall-sparc.c 23 May 2005 10:17:21 -0000 1.5 @@ -108,7 +108,7 @@ } /* call function with 1st 6 args */ - i = ({ __avword iret; /* %o0 */ + i = ({ register __avword iret __asm__("%o0"); iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5]); asm ("nop"); /* struct returning functions skip this instruction */ Index: avcall-sparc.S =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/avcall/avcall-sparc.S,v retrieving revision 1.4 retrieving revision 1.5 diff -u -d -r1.4 -r1.5 --- avcall-sparc.S 7 Mar 2000 20:29:03 -0000 1.4 +++ avcall-sparc.S 23 May 2005 10:17:21 -0000 1.5 @@ -16,16 +16,11 @@ cmp %o7, 16 bne L3 sra %g3, 2, %l0 - ld [%i0+4], %g3 - andcc %g3, 8, %g0 - bne L87 - cmp %l0, 6 ld [%i0+8], %g3 st %g3, [%l2-4] L3: cmp %l0, 6 -L87: - ble,a L88 + ble,a L66 ld [%i0+12], %g3 add %l0, -6, %l0 add %i0, 40, %l1 @@ -37,9 +32,9 @@ bne L7 add %o7, 4, %o7 ld [%i0+12], %g3 -L88: +L66: cmp %g3, 16 - bne,a L89 + bne,a L67 ld [%i0], %g3 ld [%i0+4], %g3 andcc %g3, 16, %g0 @@ -75,7 +70,7 @@ ld [%i0+60], %o5 L9: ld [%i0], %g3 -L89: +L67: ld [%i0+40], %o0 ld [%i0+44], %o1 ld [%i0+48], %o2 @@ -83,31 +78,31 @@ ld [%i0+56], %o4 call %g3, 0 ld [%i0+60], %o5 - mov %o0, %l2 nop ld [%i0+12], %g3 cmp %g3, 1 be L11 + mov %o0, %l2 cmp %g3, 0 - be L84 + be L63 cmp %g3, 2 - be L85 + be L64 cmp %g3, 3 - be L85 + be L64 cmp %g3, 4 - be L85 + be L64 cmp %g3, 5 - be L86 + be L65 cmp %g3, 6 - be L86 + be L65 cmp %g3, 7 - be L84 + be L63 cmp %g3, 8 - be L84 + be L63 cmp %g3, 9 - be L84 + be L63 cmp %g3, 10 - be,a L90 + be,a L68 ld [%i0+8], %g3 ld [%i0+12], %o7 add %o7, -11, %g3 @@ -137,105 +132,38 @@ b L11 std %f0, [%g3] L38: - be L84 + be L63 cmp %o7, 16 bne L11 nop ld [%i0+4], %g3 - andcc %g3, 8, %g0 - be L43 andcc %g3, 1, %g0 + be L43 + andcc %g3, 2, %g0 ld [%i0+16], %g3 cmp %g3, 1 bne L44 cmp %g3, 2 ld [%i0+8], %o7 - ldub [%sp-1], %g3 + ldub [%l2], %g3 b L11 stb %g3, [%o7] L44: bne L46 cmp %g3, 4 ld [%i0+8], %o7 - lduh [%sp-2], %g3 + lduh [%l2], %g3 b L11 sth %g3, [%o7] L46: bne L48 cmp %g3, 8 ld [%i0+8], %o7 - ld [%sp-4], %g3 + ld [%l2], %g3 b L11 st %g3, [%o7] L48: bne L50 - andcc %g3, 3, %g0 - ld [%sp-8], %g3 - ld [%i0+8], %o7 - st %g3, [%o7] - ld [%i0+8], %l0 - ld [%sp-4], %g3 - b L11 - st %g3, [%l0+4] -L50: - be L52 - sub %sp, %g3, %o7 - ld [%i0+8], %i0 - cmp %g3, 4 - bleu L53 - mov %g3, %l0 - and %o7, -4, %o7 -L53: - cmp %g3, 0 - be L11 - nop -L56: - ldub [%o7], %g3 - addcc %l0, -1, %l0 - stb %g3, [%i0] - add %o7, 1, %o7 - bne L56 - add %i0, 1, %i0 - b,a L11 -L52: - cmp %o7, %sp - bgeu L11 - ld [%i0+8], %i0 -L61: - ld [%o7], %g3 - add %o7, 4, %o7 - st %g3, [%i0] - cmp %o7, %sp - blu L61 - add %i0, 4, %i0 - b,a L11 -L43: - be L64 - andcc %g3, 2, %g0 - ld [%i0+16], %g3 - cmp %g3, 1 - bne L65 - cmp %g3, 2 - ld [%i0+8], %o7 - ldub [%l2], %g3 - b L11 - stb %g3, [%o7] -L65: - bne L67 - cmp %g3, 4 - ld [%i0+8], %o7 - lduh [%l2], %g3 - b L11 - sth %g3, [%o7] -L67: - bne L69 - cmp %g3, 8 - ld [%i0+8], %o7 - ld [%l2], %g3 - b L11 - st %g3, [%o7] -L69: - bne L71 add %g3, 3, %g3 ld [%l2], %g3 ld [%i0+8], %o7 @@ -244,43 +172,43 @@ ld [%l2+4], %g3 b L11 st %g3, [%l0+4] -L71: +L50: srl %g3, 2, %l1 addcc %l1, -1, %l1 bneg L11 sll %l1, 2, %l0 -L75: +L54: ld [%l0+%l2], %o7 addcc %l1, -1, %l1 ld [%i0+8], %g3 st %o7, [%g3+%l0] - bpos L75 + bpos L54 add %l0, -4, %l0 b,a L11 -L64: +L43: be L11 nop ld [%i0+16], %g3 cmp %g3, 1 - bne L79 + bne L58 cmp %g3, 2 -L85: +L64: ld [%i0+8], %g3 b L11 stb %l2, [%g3] -L79: - bne L81 +L58: + bne L60 cmp %g3, 4 -L86: +L65: ld [%i0+8], %g3 b L11 sth %l2, [%g3] -L81: +L60: bne L11 nop -L84: +L63: ld [%i0+8], %g3 -L90: +L68: st %l2, [%g3] L11: ret Index: avcall-sparc64.c =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/avcall/avcall-sparc64.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- avcall-sparc64.c 26 Jan 2004 15:22:14 -0000 1.2 +++ avcall-sparc64.c 23 May 2005 10:17:21 -0000 1.3 @@ -185,7 +185,7 @@ } /* call function with 1st 6 args */ - i = ({ __avword iret; /* %o0 */ + i = ({ register __avword iret __asm__ ("%o0"); iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5]); asm ("nop"); /* struct returning functions skip this instruction */ Index: avcall-sparc64.S =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/avcall/avcall-sparc64.S,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- avcall-sparc64.S 7 Mar 2000 20:29:03 -0000 1.2 +++ avcall-sparc64.S 23 May 2005 10:17:21 -0000 1.3 @@ -241,11 +241,11 @@ ldx [%i0+104], %o4 call %g3, 0 ldx [%i0+112], %o5 - mov %o0, %g1 nop ld [%i0+24], %g3 cmp %g3, 1 be,pn %icc, .LL43 + mov %o0, %g1 cmp %g3, 0 be,pn %icc, .LL157 cmp %g3, 2 --__--__-- Message: 6 From: Bruno Haible <ha...@us...> To: cli...@li... Subject: clisp/src stdint_.h,1.3,1.4 ChangeLog,1.4616,1.4617 Date: Mon, 23 May 2005 10:20:41 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4855 Modified Files: stdint_.h ChangeLog Log Message: Improvements, from gnulib. Index: stdint_.h =================================================================== RCS file: /cvsroot/clisp/clisp/src/stdint_.h,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- stdint_.h 20 May 2005 20:03:54 -0000 1.3 +++ stdint_.h 23 May 2005 10:20:38 -0000 1.4 @@ -38,7 +38,7 @@ /* Solaris 7 <sys/inttypes.h> has the types except the *_fast*_t types, and the macros except for *_FAST*_*, INTPTR_MIN, PTRDIFF_MIN, PTRDIFF_MAX. But note that <sys/int_types.h> contains only the type definitions! */ -# define HAVE_SYSTEM_INTTYPES +# define _STDINT_H_HAVE_SYSTEM_INTTYPES #endif #if (defined(__hpux) || defined(_AIX)) && HAVE_INTTYPES_H # include <inttypes.h> @@ -46,46 +46,49 @@ UINT_FAST8_MAX, PTRDIFF_MIN, PTRDIFF_MAX. */ /* AIX 4 <inttypes.h> has nearly everything, except INTPTR_MIN, INTPTR_MAX, UINTPTR_MAX, PTRDIFF_MIN, PTRDIFF_MAX. */ -# define HAVE_SYSTEM_INTTYPES +# define _STDINT_H_HAVE_SYSTEM_INTTYPES #endif #if !(defined(UNIX_CYGWIN32) && defined(__BIT_TYPES_DEFINED__)) -# define NEED_SIGNED_INT_TYPES +# define _STDINT_H_NEED_SIGNED_INT_TYPES #endif -#if !defined(HAVE_SYSTEM_INTTYPES) +#if !defined(_STDINT_H_HAVE_SYSTEM_INTTYPES) /* 7.18.1.1. Exact-width integer types */ #if !defined(__FreeBSD__) -#ifdef NEED_SIGNED_INT_TYPES +#ifdef _STDINT_H_NEED_SIGNED_INT_TYPES typedef signed char int8_t; #endif typedef unsigned char uint8_t; -#ifdef NEED_SIGNED_INT_TYPES +#ifdef _STDINT_H_NEED_SIGNED_INT_TYPES typedef short int16_t; #endif typedef unsigned short uint16_t; -#ifdef NEED_SIGNED_INT_TYPES +#ifdef _STDINT_H_NEED_SIGNED_INT_TYPES typedef int int32_t; #endif typedef unsigned int uint32_t; #if @HAVE_LONG_64BIT@ -#ifdef NEED_SIGNED_INT_TYPES +#ifdef _STDINT_H_NEED_SIGNED_INT_TYPES typedef long int64_t; #endif typedef unsigned long uint64_t; +#define _STDINT_H_HAVE_INT64 #elif @HAVE_LONG_LONG_64BIT@ -#ifdef NEED_SIGNED_INT_TYPES +#ifdef _STDINT_H_NEED_SIGNED_INT_TYPES typedef long long int64_t; #endif typedef unsigned long long uint64_t; +#define _STDINT_H_HAVE_INT64 #elif defined(_MSC_VER) typedef __int64 int64_t; typedef unsigned __int64 uint64_t; +#define _STDINT_H_HAVE_INT64 #endif #endif /* !FreeBSD */ @@ -98,7 +101,7 @@ typedef uint16_t uint_least16_t; typedef int32_t int_least32_t; typedef uint32_t uint_least32_t; -#if @HAVE_LONG_64BIT@ || @HAVE_LONG_LONG_64BIT@ || defined(_MSC_VER) +#ifdef _STDINT_H_HAVE_INT64 typedef int64_t int_least64_t; typedef uint64_t uint_least64_t; #endif @@ -111,7 +114,7 @@ typedef uint32_t uint_fast16_t; typedef int32_t int_fast32_t; typedef uint32_t uint_fast32_t; -#if @HAVE_LONG_64BIT@ || @HAVE_LONG_LONG_64BIT@ || defined(_MSC_VER) +#ifdef _STDINT_H_HAVE_INT64 typedef int64_t int_fast64_t; typedef uint64_t uint_fast64_t; #endif @@ -129,7 +132,7 @@ /* 7.18.1.5. Greatest-width integer types */ -#if @HAVE_LONG_64BIT@ || @HAVE_LONG_LONG_64BIT@ || defined(_MSC_VER) +#ifdef _STDINT_H_HAVE_INT64 typedef int64_t intmax_t; typedef uint64_t uintmax_t; #else @@ -152,19 +155,19 @@ #define INT32_MIN (~INT32_MAX) #define INT32_MAX 2147483647 #define UINT32_MAX 4294967295U +#ifdef _STDINT_H_HAVE_INT64 +#define INT64_MIN (~INT64_MAX) #if @HAVE_LONG_64BIT@ -#define INT64_MIN (~INT64_MIN) #define INT64_MAX 9223372036854775807L #define UINT64_MAX 18446744073709551615UL #elif @HAVE_LONG_LONG_64BIT@ -#define INT64_MIN (~INT64_MIN) #define INT64_MAX 9223372036854775807LL #define UINT64_MAX 18446744073709551615ULL #elif defined(_MSC_VER) -#define INT64_MIN (~INT64_MIN) #define INT64_MAX 9223372036854775807i64 #define UINT64_MAX 18446744073709551615ui64 #endif +#endif /* 7.18.2.2. Limits of minimum-width integer types */ @@ -177,7 +180,7 @@ #define INT_LEAST32_MIN INT32_MIN #define INT_LEAST32_MAX INT32_MAX #define UINT_LEAST32_MAX UINT32_MAX -#if @HAVE_LONG_64BIT@ || @HAVE_LONG_LONG_64BIT@ || defined(_MSC_VER) +#ifdef _STDINT_H_HAVE_INT64 #define INT_LEAST64_MIN INT64_MIN #define INT_LEAST64_MAX INT64_MAX #define UINT_LEAST64_MAX UINT64_MAX @@ -194,7 +197,7 @@ #define INT_FAST32_MIN INT32_MIN #define INT_FAST32_MAX INT32_MAX #define UINT_FAST32_MAX UINT32_MAX -#if @HAVE_LONG_64BIT@ || @HAVE_LONG_LONG_64BIT@ || defined(_MSC_VER) +#ifdef _STDINT_H_HAVE_INT64 #define INT_FAST64_MIN INT64_MIN #define INT_FAST64_MAX INT64_MAX #define UINT_FAST64_MAX UINT64_MAX @@ -208,7 +211,7 @@ /* 7.18.2.5. Limits of greatest-width integer types */ -#if @HAVE_LONG_64BIT@ || @HAVE_LONG_LONG_64BIT@ || defined(_MSC_VER) +#ifdef _STDINT_H_HAVE_INT64 #define INTMAX_MIN INT64_MIN #define INTMAX_MAX INT64_MAX #define UINTMAX_MAX UINT64_MAX @@ -275,6 +278,6 @@ #endif -#endif /* !HAVE_SYSTEM_INTTYPES */ +#endif /* !_STDINT_H_HAVE_SYSTEM_INTTYPES */ #endif /* _STDINT_H */ Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4616 retrieving revision 1.4617 diff -u -d -r1.4616 -r1.4617 --- ChangeLog 23 May 2005 10:16:11 -0000 1.4616 +++ ChangeLog 23 May 2005 10:20:38 -0000 1.4617 @@ -1,5 +1,17 @@ 2005-05-22 Bruno Haible <br...@cl...> + * stdint_.h (_STDINT_H_HAVE_INT64): New macro. Use it in #ifdefs. + (INT64_MIN): Fix definition. + Suggested by Paul Eggert <eg...@cs...>. + + * stdint_.h (_STDINT_H_NEED_SIGNED_INT_TYPES): Renamed from + NEED_SIGNED_INT_TYPES. + + * stdint_.h (_STDINT_H_HAVE_SYSTEM_INTTYPES): Renamed from + HAVE_SYSTEM_INTTYPES. + +2005-05-22 Bruno Haible <br...@cl...> + * m4/ffcall-smallstruct.m4 (CL_SMALL_STRUCT_RETURN): Use 'long' instead of 'int'. Needed because on sparc64, 'int' has 32 bits, a function returning a 'struct { int x; }' returns the result in the --__--__-- Message: 7 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/ffcall/avcall configure,1.39,1.40 Date: Mon, 23 May 2005 19:22:20 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/ffcall/avcall In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29143/ffcall/avcall Modified Files: configure Log Message: regenerated Index: configure =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/avcall/configure,v retrieving revision 1.39 retrieving revision 1.40 diff -u -d -r1.39 -r1.40 --- configure 27 Mar 2005 00:56:52 -0000 1.39 +++ configure 23 May 2005 19:22:16 -0000 1.40 @@ -8902,7 +8902,8 @@ # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, +# USA. # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a @@ -10868,11 +10869,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:10871: $lt_compile\"" >&5) + (eval echo "\"\$as_me:10872: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:10875: \$? = $ac_status" >&5 + echo "$as_me:10876: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -10928,11 +10929,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:10931: $lt_compile\"" >&5) + (eval echo "\"\$as_me:10932: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 - echo "$as_me:10935: \$? = $ac_status" >&5 + echo "$as_me:10936: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized @@ -12291,7 +12292,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 12294 "configure" +#line 12295 "configure" #include "confdefs.h" #if HAVE_DLFCN_H @@ -12389,7 +12390,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 12392 "configure" +#line 12393 "configure" #include "confdefs.h" #if HAVE_DLFCN_H @@ -13247,11 +13248,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:13250: $lt_compile\"" >&5) + (eval echo "\"\$as_me:13251: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:13254: \$? = $ac_status" >&5 + echo "$as_me:13255: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -13307,11 +13308,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:13310: $lt_compile\"" >&5) + (eval echo "\"\$as_me:13311: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 - echo "$as_me:13314: \$? = $ac_status" >&5 + echo "$as_me:13315: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized @@ -15367,11 +15368,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:15370: $lt_compile\"" >&5) + (eval echo "\"\$as_me:15371: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:15374: \$? = $ac_status" >&5 + echo "$as_me:15375: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -15625,11 +15626,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:15628: $lt_compile\"" >&5) + (eval echo "\"\$as_me:15629: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:15632: \$? = $ac_status" >&5 + echo "$as_me:15633: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -15685,11 +15686,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:15688: $lt_compile\"" >&5) + (eval echo "\"\$as_me:15689: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 - echo "$as_me:15692: \$? = $ac_status" >&5 + echo "$as_me:15693: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized @@ -17885,7 +17886,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 17888 "configure" +#line 17889 "configure" #include "confdefs.h" #if HAVE_DLFCN_H @@ -17983,7 +17984,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 17986 "configure" +#line 17987 "configure" #include "confdefs.h" #if HAVE_DLFCN_H @@ -19260,9 +19261,9 @@ } #endif -typedef struct { int x; } foo; int y; +typedef struct { long x; } foo; long y; foo foofun () { foo f; f.x = y; return f; } -int (*fun) () = (int (*) ()) foofun; +long (*fun) () = (long (*) ()) foofun; int main() { nocrash_init(); y = 37; if ((*fun)() != 37) exit(1); --__--__-- Message: 8 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/ffcall/callback/trampoline_r configure,1.48,1.49 Date: Mon, 23 May 2005 19:22:22 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/ffcall/callback/trampoline_r In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29143/ffcall/callback/trampoline_r Modified Files: configure Log Message: regenerated Index: configure =================================================================== RCS file: /cvsroot/clisp/clisp/ffcall/callback/trampoline_r/configure,v retrieving revision 1.48 retrieving revision 1.49 diff -u -d -r1.48 -r1.49 --- configure 27 Mar 2005 00:56:54 -0000 1.48 +++ configure 23 May 2005 19:22:10 -0000 1.49 @@ -8902,7 +8902,8 @@ # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, +# USA. # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a @@ -10868,11 +10869,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:10871: $lt_compile\"" >&5) + (eval echo "\"\$as_me:10872: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:10875: \$? = $ac_status" >&5 + echo "$as_me:10876: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -10928,11 +10929,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:10931: $lt_compile\"" >&5) + (eval echo "\"\$as_me:10932: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 - echo "$as_me:10935: \$? = $ac_status" >&5 + echo "$as_me:10936: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized @@ -12291,7 +12292,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 12294 "configure" +#line 12295 "configure" #include "confdefs.h" #if HAVE_DLFCN_H @@ -12389,7 +12390,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 12392 "configure" +#line 12393 "configure" #include "confdefs.h" #if HAVE_DLFCN_H @@ -13247,11 +13248,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:13250: $lt_compile\"" >&5) + (eval echo "\"\$as_me:13251: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:13254: \$? = $ac_status" >&5 + echo "$as_me:13255: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -13307,11 +13308,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:13310: $lt_compile\"" >&5) + (eval echo "\"\$as_me:13311: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 - echo "$as_me:13314: \$? = $ac_status" >&5 + echo "$as_me:13315: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized @@ -15367,11 +15368,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:15370: $lt_compile\"" >&5) + (eval echo "\"\$as_me:15371: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:15374: \$? = $ac_status" >&5 + echo "$as_me:15375: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -15625,11 +15626,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:15628: $lt_compile\"" >&5) + (eval echo "\"\$as_me:15629: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 - echo "$as_me:15632: \$? = $ac_status" >&5 + echo "$as_me:15633: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings @@ -15685,11 +15686,11 @@ -e 's:.*FLAGS}? :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` - (eval echo "\"\$as_me:15688: $lt_compile\"" >&5) + (eval echo "\"\$as_me:15689: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 - echo "$as_me:15692: \$? = $ac_status" >&5 + echo "$as_me:15693: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized @@ -17885,7 +17886,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 17888 "configure" +#line 17889 "configure" #include "confdefs.h" #if HAVE_DLFCN_H @@ -17983,7 +17984,7 @@ lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<EOF -#line 17986 "configure" +#line 17987 "configure" #include "confdefs.h" #if HAVE_DLFCN_H --__--__-- Message: 9 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/libcharset/autoconf aclocal.m4,1.9,1.10 Date: Mon, 23 May 2005 19:22:05 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/libcharset/autoconf In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29143/libcharset/autoconf Modified Files: aclocal.m4 Log Message: regenerated Index: aclocal.m4 =================================================================== RCS file: /cvsroot/clisp/clisp/libcharset/autoconf/aclocal.m4,v retrieving revision 1.9 retrieving revision 1.10 diff -u -d -r1.9 -r1.10 --- aclocal.m4 16 Feb 2005 22:22:51 -0000 1.9 +++ aclocal.m4 23 May 2005 19:22:01 -0000 1.10 @@ -1,4 +1,4 @@ -# generated automatically by aclocal 1.9.4 -*- Autoconf -*- +# generated automatically by aclocal 1.9.2 -*- Autoconf -*- # Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004 # Free Software Foundation, Inc. --__--__-- Message: 10 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/src/autoconf aclocal.m4,1.148,1.149 Date: Mon, 23 May 2005 19:22:03 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src/autoconf In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29143/src/autoconf Modified Files: aclocal.m4 Log Message: regenerated Index: aclocal.m4 =================================================================== RCS file: /cvsroot/clisp/clisp/src/autoconf/aclocal.m4,v retrieving revision 1.148 retrieving revision 1.149 diff -u -d -r1.148 -r1.149 --- aclocal.m4 18 May 2005 21:35:41 -0000 1.148 +++ aclocal.m4 23 May 2005 19:21:44 -0000 1.149 @@ -1314,9 +1314,9 @@ AC_DEFUN([CL_SMALL_STRUCT_RETURN], [AC_CACHE_CHECK([whether small structs are returned in registers], cl_cv_c_struct_return_small, [ AC_TRY_RUN(GL_NOCRASH[ -typedef struct { int x; } foo; int y; +typedef struct { long x; } foo; long y; foo foofun () { foo f; f.x = y; return f; } -int (*fun) () = (int (*) ()) foofun; +long (*fun) () = (long (*) ()) foofun; int main() { nocrash_init(); y = 37; if ((*fun)() != 37) exit(1); @@ -1521,8 +1521,8 @@ # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA -# 02111-1307, USA. +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, +# USA. # _AC_FUNC_FNMATCH_IF(STANDARD = GNU | POSIX, CACHE_VAR, IF-TRUE, IF-FALSE) # ------------------------------------------------------------------------- @@ -7933,7 +7933,8 @@ # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, +# USA. # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a --__--__-- _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest |