summaryrefslogtreecommitdiff
path: root/extra/racket
diff options
context:
space:
mode:
authorMichał Masłowski <mtjm@mtjm.eu>2013-05-19 11:02:18 +0200
committerMichał Masłowski <mtjm@mtjm.eu>2013-05-19 11:02:18 +0200
commit4f22a5c482279b73ed0140e8962f75169f9b3e57 (patch)
tree1369f17af7242f30a62b7ffbacd138a7978821fd /extra/racket
parent63b47d2adad6c3c625196b2717bbd42283e9bb79 (diff)
parent9a30c3d0083b8330b1aa6c0f89245e68ae762ee5 (diff)
Merge branch 'master' of ssh://parabolagnulinux.org:1863/home/parabola/abslibre-pre-mips64el
Conflicts: community/libgdamm/PKGBUILD community/mingetty/PKGBUILD extra/cups/PKGBUILD extra/xorg-appres/PKGBUILD extra/xorg-xrefresh/PKGBUILD extra/xorg-xwininfo/PKGBUILD
Diffstat (limited to 'extra/racket')
-rw-r--r--extra/racket/PKGBUILD22
-rw-r--r--extra/racket/racket-libpng16.patch52
2 files changed, 66 insertions, 8 deletions
diff --git a/extra/racket/PKGBUILD b/extra/racket/PKGBUILD
index fb728058e..7925e4a87 100644
--- a/extra/racket/PKGBUILD
+++ b/extra/racket/PKGBUILD
@@ -1,8 +1,8 @@
-# $Id: PKGBUILD 178310 2013-02-19 23:15:41Z eric $
+# $Id: PKGBUILD 185732 2013-05-18 02:31:12Z eric $
# Maintainer: Eric Bélanger <eric@archlinux.org>
pkgname=racket
-pkgver=5.3.3
+pkgver=5.3.4
pkgrel=1
pkgdesc="A programming language environment (formerly known as PLT Scheme) suitable for tasks ranging from scripting to application development"
arch=('i686' 'x86_64' 'mips64el')
@@ -13,19 +13,25 @@ makedepends=('gsfonts' 'sqlite')
options=('!libtool' '!strip')
install=racket.install
source=(http://download.racket-lang.org/installers/${pkgver}/racket/${pkgname}-${pkgver}-src-unix.tgz \
- drracket.desktop)
-sha1sums=('96995fe20b332c4644dd51668851193b16976071'
- 'a20808f6b250225704856f82a544681a962a299d')
+ drracket.desktop racket-libpng16.patch)
+sha1sums=('7e37738e34c73a25bc7d51aeb53cf3dc5b0d533d'
+ 'a20808f6b250225704856f82a544681a962a299d'
+ '5b0260f92fc1ec4dc09d90a5264683bd3b5eed5e')
+
+prepare() {
+ cd ${pkgname}-${pkgver}
+ patch -p1 -i "${srcdir}/racket-libpng16.patch"
+}
build() {
- cd "${srcdir}/${pkgname}-${pkgver}/src"
- [ "$CARCH" == "x86_64" ] && export CFLAGS+="-fPIC"
+ cd ${pkgname}-${pkgver}/src
+ [ "$CARCH" == "x86_64" ] && export CFLAGS+=" -fPIC"
./configure --prefix=/usr --enable-shared
make
}
package() {
- cd "${srcdir}/${pkgname}-${pkgver}/src"
+ cd ${pkgname}-${pkgver}/src
make DESTDIR="${pkgdir}" install
install -D -m644 ../collects/icons/plt.xpm "${pkgdir}/usr/share/pixmaps/drracket.xpm"
diff --git a/extra/racket/racket-libpng16.patch b/extra/racket/racket-libpng16.patch
new file mode 100644
index 000000000..8e4b605f2
--- /dev/null
+++ b/extra/racket/racket-libpng16.patch
@@ -0,0 +1,52 @@
+From 5629a6156a5720e51a277849f75b3135cb93664f Mon Sep 17 00:00:00 2001
+From: Matthew Flatt <mflatt@racket-lang.org>
+Date: Wed, 15 May 2013 20:28:05 -0600
+Subject: [PATCH] support libpng16
+
+---
+ collects/racket/draw/unsafe/png.rkt | 21 ++++++++++++++-------
+ 1 file changed, 14 insertions(+), 7 deletions(-)
+
+diff --git a/collects/racket/draw/unsafe/png.rkt b/collects/racket/draw/unsafe/png.rkt
+index 596fcb4..a6b028d 100644
+--- a/collects/racket/draw/unsafe/png.rkt
++++ b/collects/racket/draw/unsafe/png.rkt
+@@ -10,11 +10,15 @@
+ [(unix)
+ ;; Most Linux distros supply "libpng12", while other Unix
+ ;; variants often have just "libpng", etc.
+- (ffi-lib "libpng15" '("15" "")
+- #:fail (lambda ()
+- (ffi-lib "libpng12" '("0" "")
+- #:fail (lambda ()
+- (ffi-lib "libpng")))))]
++ (let loop ([alts '(("libpng16" ("16" ""))
++ ("libpng15" ("15" ""))
++ ("libpng12" ("0" ""))
++ ("libpng"))])
++ (cond
++ [(null? alts) #f]
++ [else (apply ffi-lib (car alts)
++ #:fail (lambda ()
++ (loop (cdr alts))))]))]
+ [(macosx) (ffi-lib "libpng15.15.dylib")]
+ [(windows)
+ (ffi-lib "zlib1.dll")
+@@ -29,9 +33,12 @@
+ ;; assume that other versions are also ok
+ (define PNG_LIBPNG_VER_STRING (string->bytes/latin-1
+ (let ([v (png_access_version_number)])
+- (format "~s.~s"
++ (format "~s.~s~a"
+ (quotient v 10000)
+- (quotient (remainder v 10000) 100)))))
++ (quotient (remainder v 10000) 100)
++ (if (zero? (remainder v 100))
++ ""
++ (format ".~a" (remainder v 100)))))))
+
+ (define _png_structp (_cpointer 'png_structp))
+ (define _png_infop (_cpointer 'png_infop))
+--
+1.8.1.6
+