diff options
author | Simon Stelling <blubb@gentoo.org> | 2006-01-28 13:24:20 +0000 |
---|---|---|
committer | Simon Stelling <blubb@gentoo.org> | 2006-01-28 13:24:20 +0000 |
commit | 4e50af98fd2b7131be4feca5c27e9ea3b89d29c2 (patch) | |
tree | 202b6ebfd6ddc32d8b58d8b4c8821e6e8e6ce064 /dev-lisp/plt | |
parent | no need to gzip a smallish patch (diff) | |
download | gentoo-2-4e50af98fd2b7131be4feca5c27e9ea3b89d29c2.tar.gz gentoo-2-4e50af98fd2b7131be4feca5c27e9ea3b89d29c2.tar.bz2 gentoo-2-4e50af98fd2b7131be4feca5c27e9ea3b89d29c2.zip |
no need to bzip a smallish patch
(Portage version: 2.1_pre3-r1)
Diffstat (limited to 'dev-lisp/plt')
-rw-r--r-- | dev-lisp/plt/ChangeLog | 9 | ||||
-rw-r--r-- | dev-lisp/plt/files/plt-202-gcc3.3.patch | 345 | ||||
-rw-r--r-- | dev-lisp/plt/files/plt-202-gcc3.3.patch.tar.bz2 | bin | 1982 -> 0 bytes | |||
-rw-r--r-- | dev-lisp/plt/plt-202.ebuild | 6 |
4 files changed, 355 insertions, 5 deletions
diff --git a/dev-lisp/plt/ChangeLog b/dev-lisp/plt/ChangeLog index 3359100b2752..cd728ff27fb4 100644 --- a/dev-lisp/plt/ChangeLog +++ b/dev-lisp/plt/ChangeLog @@ -1,6 +1,11 @@ # ChangeLog for dev-lisp/plt -# Copyright 2002-2004 Gentoo Foundation; Distributed under the GPL v2 -# $Header: /var/cvsroot/gentoo-x86/dev-lisp/plt/ChangeLog,v 1.7 2004/07/02 04:59:03 eradicator Exp $ +# Copyright 2002-2006 Gentoo Foundation; Distributed under the GPL v2 +# $Header: /var/cvsroot/gentoo-x86/dev-lisp/plt/ChangeLog,v 1.8 2006/01/28 13:24:20 blubb Exp $ + + 28 Jan 2006; Simon Stelling <blubb@gentoo.org> + +files/plt-202-gcc3.3.patch, -files/plt-202-gcc3.3.patch.tar.bz2, + plt-202.ebuild: + no need to bzip a smallish patch 01 Jul 2004; Jeremy Huddleston <eradicator@gentoo.org> plt-202.ebuild: virtual/glibc -> virtual/libc diff --git a/dev-lisp/plt/files/plt-202-gcc3.3.patch b/dev-lisp/plt/files/plt-202-gcc3.3.patch new file mode 100644 index 000000000000..d1eb03a63824 --- /dev/null +++ b/dev-lisp/plt/files/plt-202-gcc3.3.patch @@ -0,0 +1,345 @@ +diff -ur plt/src/mzscheme/src/gmp/gmplonglong.h plt-gentoo/src/mzscheme/src/gmp/gmplonglong.h +--- plt/src/mzscheme/src/gmp/gmplonglong.h 2001-06-27 04:46:25.000000000 +1200 ++++ plt-gentoo/src/mzscheme/src/gmp/gmplonglong.h 2003-10-13 03:20:44.000000000 +1300 +@@ -231,19 +231,19 @@ + #define UMUL_TIME 5 + #else + #define umul_ppmm(xh, xl, a, b) \ +- __asm__ ("%@ Inlined umul_ppmm +- mov %|r0, %2, lsr #16 +- mov %|r2, %3, lsr #16 +- bic %|r1, %2, %|r0, lsl #16 +- bic %|r2, %3, %|r2, lsl #16 +- mul %1, %|r1, %|r2 +- mul %|r2, %|r0, %|r2 +- mul %|r1, %0, %|r1 +- mul %0, %|r0, %0 +- adds %|r1, %|r2, %|r1 +- addcs %0, %0, #65536 +- adds %1, %1, %|r1, lsl #16 +- adc %0, %0, %|r1, lsr #16" \ ++ __asm__ ("%@ Inlined umul_ppmm\n" ++" mov %|r0, %2, lsr #16\n" ++" mov %|r2, %3, lsr #16\n" ++" bic %|r1, %2, %|r0, lsl #16\n" ++" bic %|r2, %3, %|r2, lsl #16\n" ++" mul %1, %|r1, %|r2\n" ++" mul %|r2, %|r0, %|r2\n" ++" mul %|r1, %0, %|r1\n" ++" mul %0, %|r0, %0\n" ++" adds %|r1, %|r2, %|r1\n" ++" addcs %0, %0, #65536\n" ++" adds %1, %1, %|r1, lsl #16\n" ++" adc %0, %0, %|r1, lsr #16" \ + : "=&r" (xh), "=r" (xl) \ + : "r" (a), "r" (b) \ + : "r0", "r1", "r2") +@@ -360,22 +360,22 @@ + do { \ + USItype __tmp; \ + __asm__ ( \ +- "ldi 1,%0 +- extru,= %1,15,16,%%r0 ; Bits 31..16 zero? +- extru,tr %1,15,16,%1 ; No. Shift down, skip add. +- ldo 16(%0),%0 ; Yes. Perform add. +- extru,= %1,23,8,%%r0 ; Bits 15..8 zero? +- extru,tr %1,23,8,%1 ; No. Shift down, skip add. +- ldo 8(%0),%0 ; Yes. Perform add. +- extru,= %1,27,4,%%r0 ; Bits 7..4 zero? +- extru,tr %1,27,4,%1 ; No. Shift down, skip add. +- ldo 4(%0),%0 ; Yes. Perform add. +- extru,= %1,29,2,%%r0 ; Bits 3..2 zero? +- extru,tr %1,29,2,%1 ; No. Shift down, skip add. +- ldo 2(%0),%0 ; Yes. Perform add. +- extru %1,30,1,%1 ; Extract bit 1. +- sub %0,%1,%0 ; Subtract it. +- " : "=r" (count), "=r" (__tmp) : "1" (x)); \ ++ "ldi 1,%0\n" ++" extru,= %1,15,16,%%r0 ; Bits 31..16 zero?\n" ++" extru,tr %1,15,16,%1 ; No. Shift down, skip add.\n" ++" ldo 16(%0),%0 ; Yes. Perform add.\n" ++" extru,= %1,23,8,%%r0 ; Bits 15..8 zero?\n" ++" extru,tr %1,23,8,%1 ; No. Shift down, skip add.\n" ++" ldo 8(%0),%0 ; Yes. Perform add.\n" ++" extru,= %1,27,4,%%r0 ; Bits 7..4 zero?\n" ++" extru,tr %1,27,4,%1 ; No. Shift down, skip add.\n" ++" ldo 4(%0),%0 ; Yes. Perform add.\n" ++" extru,= %1,29,2,%%r0 ; Bits 3..2 zero?\n" ++" extru,tr %1,29,2,%1 ; No. Shift down, skip add.\n" ++" ldo 2(%0),%0 ; Yes. Perform add.\n" ++" extru %1,30,1,%1 ; Extract bit 1.\n" ++" sub %0,%1,%0 ; Subtract it.\n" ++ : "=r" (count), "=r" (__tmp) : "1" (x)); \ + } while (0) + #endif /* hppa */ + +@@ -529,28 +529,28 @@ + #else /* for other 68k family members use 16x16->32 multiplication */ + #define umul_ppmm(xh, xl, a, b) \ + do { USItype __umul_tmp1, __umul_tmp2; \ +- __asm__ ("| Inlined umul_ppmm +- move%.l %5,%3 +- move%.l %2,%0 +- move%.w %3,%1 +- swap %3 +- swap %0 +- mulu%.w %2,%1 +- mulu%.w %3,%0 +- mulu%.w %2,%3 +- swap %2 +- mulu%.w %5,%2 +- add%.l %3,%2 +- jcc 1f +- add%.l %#0x10000,%0 +-1: move%.l %2,%3 +- clr%.w %2 +- swap %2 +- swap %3 +- clr%.w %3 +- add%.l %3,%1 +- addx%.l %2,%0 +- | End inlined umul_ppmm" \ ++ __asm__ ("| Inlined umul_ppmm\n" ++" move%.l %5,%3\n" ++" move%.l %2,%0\n" ++" move%.w %3,%1\n" ++" swap %3\n" ++" swap %0\n" ++" mulu%.w %2,%1\n" ++" mulu%.w %3,%0\n" ++" mulu%.w %2,%3\n" ++" swap %2\n" ++" mulu%.w %5,%2\n" ++" add%.l %3,%2\n" ++" jcc 1f\n" ++" add%.l %#0x10000,%0\n" ++"1: move%.l %2,%3\n" ++" clr%.w %2\n" ++" swap %2\n" ++" swap %3\n" ++" clr%.w %3\n" ++" add%.l %3,%1\n" ++" addx%.l %2,%0\n" ++" | End inlined umul_ppmm" \ + : "=&d" ((USItype)(xh)), "=&d" ((USItype)(xl)), \ + "=d" (__umul_tmp1), "=&d" (__umul_tmp2) \ + : "%2" ((USItype)(a)), "d" ((USItype)(b))); \ +@@ -827,26 +827,26 @@ + "1" ((USItype)(al)), "r" ((USItype)(bl))) + #define smul_ppmm(ph, pl, m0, m1) \ + __asm__ ( \ +- "s r2,r2 +- mts r10,%2 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- m r2,%3 +- cas %0,r2,r0 +- mfs r10,%1" \ ++ "s r2,r2\n" ++" mts r10,%2\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" m r2,%3\n" ++" cas %0,r2,r0\n" ++" mfs r10,%1" \ + : "=r" ((USItype)(ph)), "=r" ((USItype)(pl)) \ + : "%r" ((USItype)(m0)), "r" ((USItype)(m1)) \ + : "r2"); \ +@@ -936,45 +936,45 @@ + __asm__ ("umul %2,%3,%1;rd %%y,%0" : "=r" (w1), "=r" (w0) : "r" (u), "r" (v)) + #define UMUL_TIME 5 + #define udiv_qrnnd(q, r, n1, n0, d) \ +- __asm__ ("! Inlined udiv_qrnnd +- wr %%g0,%2,%%y ! Not a delayed write for sparclite +- tst %%g0 +- divscc %3,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%%g1 +- divscc %%g1,%4,%0 +- rd %%y,%1 +- bl,a 1f +- add %1,%4,%1 +-1: ! End of inline udiv_qrnnd" \ ++ __asm__ ("! Inlined udiv_qrnnd\n" ++" wr %%g0,%2,%%y ! Not a delayed write for sparclite\n" ++" tst %%g0\n" ++" divscc %3,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%%g1\n" ++" divscc %%g1,%4,%0\n" ++" rd %%y,%1\n" ++" bl,a 1f\n" ++" add %1,%4,%1\n" ++"1: ! End of inline udiv_qrnnd" \ + : "=r" (q), "=r" (r) : "r" (n1), "r" (n0), "rI" (d) + : "%g1" __AND_CLOBBER_CC) + #define UDIV_TIME 37 +@@ -989,46 +989,46 @@ + /* Default to sparc v7 versions of umul_ppmm and udiv_qrnnd. */ + #ifndef umul_ppmm + #define umul_ppmm(w1, w0, u, v) \ +- __asm__ ("! Inlined umul_ppmm +- wr %%g0,%2,%%y ! SPARC has 0-3 delay insn after a wr +- sra %3,31,%%g2 ! Don't move this insn +- and %2,%%g2,%%g2 ! Don't move this insn +- andcc %%g0,0,%%g1 ! Don't move this insn +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,%3,%%g1 +- mulscc %%g1,0,%%g1 +- add %%g1,%%g2,%0 +- rd %%y,%1" \ ++ __asm__ ("! Inlined umul_ppmm\n" ++" wr %%g0,%2,%%y ! SPARC has 0-3 delay insn after a wr\n" ++" sra %3,31,%%g2 ! Don't move this insn\n" ++" and %2,%%g2,%%g2 ! Don't move this insn\n" ++" andcc %%g0,0,%%g1 ! Don't move this insn\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,%3,%%g1\n" ++" mulscc %%g1,0,%%g1\n" ++" add %%g1,%%g2,%0\n" ++" rd %%y,%1" \ + : "=r" (w1), "=r" (w0) : "%rI" (u), "r" (v) \ + : "%g1", "%g2" __AND_CLOBBER_CC) + #define UMUL_TIME 39 /* 39 instructions */ diff --git a/dev-lisp/plt/files/plt-202-gcc3.3.patch.tar.bz2 b/dev-lisp/plt/files/plt-202-gcc3.3.patch.tar.bz2 Binary files differdeleted file mode 100644 index 38129711fa19..000000000000 --- a/dev-lisp/plt/files/plt-202-gcc3.3.patch.tar.bz2 +++ /dev/null diff --git a/dev-lisp/plt/plt-202.ebuild b/dev-lisp/plt/plt-202.ebuild index 5c9559748d87..4216e761722f 100644 --- a/dev-lisp/plt/plt-202.ebuild +++ b/dev-lisp/plt/plt-202.ebuild @@ -1,6 +1,6 @@ -# Copyright 1999-2004 Gentoo Foundation +# Copyright 1999-2006 Gentoo Foundation # Distributed under the terms of the GNU General Public License v2 -# $Header: /var/cvsroot/gentoo-x86/dev-lisp/plt/plt-202.ebuild,v 1.12 2004/07/02 04:59:03 eradicator Exp $ +# $Header: /var/cvsroot/gentoo-x86/dev-lisp/plt/plt-202.ebuild,v 1.13 2006/01/28 13:24:20 blubb Exp $ inherit eutils @@ -23,7 +23,7 @@ S=${WORKDIR}/${PN}/src src_unpack() { unpack ${A} cd ${S} - epatch ${FILESDIR}/${P}-gcc3.3.patch.tar.bz2 + epatch ${FILESDIR}/${P}-gcc3.3.patch } src_compile() { |