4 files changed, 36 insertions, 79 deletions
diff --git a/development/racket/README b/development/racket/README
index fe94786696..7bcfe02e1c 100644
--- a/development/racket/README
+++ b/development/racket/README
@@ -1,7 +1,14 @@
-Racket (formerly named PLT Scheme) is a general purpose, multi-paradigm 
-programming language in the Lisp/Scheme family. One of its design goals is to 
-serve as a platform for language creation, design, and implementation. The 
-language is used in a variety of contexts such as scripting, general-purpose 
-programming, computer science education, and research. (source: Wikipedia)
+Racket (formerly named PLT Scheme) is a general purpose, multi-paradigm
+programming language in the Lisp/Scheme family. One of its design
+goals is to serve as a platform for language creation, design, and
+implementation. The language is used in a variety of contexts such as
+scripting, general-purpose programming, computer science education, and
+research. (source: Wikipedia)
 
 racket is the command line version, drracket is the GUI-version
+
+This SlackBuild uses the src + built packages distribution. It builds
+faster as it contains platform-independent bytecode. If you wish to
+build from pure source code can be downloaded from the racket site:
+
+https://download.racket-lang.org/
diff --git a/development/racket/racket.SlackBuild b/development/racket/racket.SlackBuild
index e9bb528a37..c35cdd1017 100644
--- a/development/racket/racket.SlackBuild
+++ b/development/racket/racket.SlackBuild
@@ -1,8 +1,9 @@
-#!/bin/sh
+#!/bin/bash
 
 # Slackware build script for racket
 
 # Copyright 2013-2014 Markus Hutmacher, Germany <mailing@markhu.de>
+# Copyright 2020 Jeff Parent, US <jeff+SBo@sh0.xyz>
 # All rights reserved.
 #
 # Redistribution and use of this script, with or without modification, is
@@ -22,27 +23,37 @@
 #  OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 #  ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
+cd $(dirname $0) ; CWD=$(pwd)
+
 PRGNAM=racket
-VERSION=${VERSION:-6.4}
-SUFFIX=src    # suffix of the UNIX sourcepackage
+VERSION=${VERSION:-7.9}
+SUFFIX=src-builtpkgs    # suffix of the UNIX sourcepackage
 BUILD=${BUILD:-1}
 TAG=${TAG:-_SBo}
+PKGTYPE=${PKGTYPE:-tgz}
 
 if [ -z "$ARCH" ]; then
   case "$( uname -m )" in
-    i?86) ARCH=i486 ;;
+    i?86) ARCH=i586 ;;
     arm*) ARCH=arm ;;
        *) ARCH=$( uname -m ) ;;
   esac
 fi
 
-CWD=$(pwd)
+# If the variable PRINT_PACKAGE_NAME is set, then this script will report what
+# the name of the created package would be, and then exit. This information
+# could be useful to other scripts.
+if [ ! -z "${PRINT_PACKAGE_NAME}" ]; then
+  echo "$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.$PKGTYPE"
+  exit 0
+fi
+
 TMP=${TMP:-/tmp/SBo}
 PKG=$TMP/package-$PRGNAM
 OUTPUT=${OUTPUT:-/tmp}
 
-if [ "$ARCH" = "i486" ]; then
-  SLKCFLAGS="-O2 -march=i486 -mtune=i686"
+if [ "$ARCH" = "i586" ]; then
+  SLKCFLAGS="-O2 -march=i586 -mtune=i686"
   LIBDIRSUFFIX=""
 elif [ "$ARCH" = "i686" ]; then
   SLKCFLAGS="-O2 -march=i686 -mtune=i686"
@@ -70,10 +81,6 @@ find -L . \
  \( -perm 666 -o -perm 664 -o -perm 640 -o -perm 600 -o -perm 444 \
   -o -perm 440 -o -perm 400 \) -exec chmod 644 {} \;
 
-# https://github.com/racket/racket/issues/1222
-# http://copr-dist-git.fedorainfracloud.org/cgit/bthomas/racket/racket.git/plain/xform-errors-converting-fix.patch
-patch -p1 < $CWD/xform-errors-converting-fix.patch
-
 mkdir src/build
 cd src/build
 
@@ -103,4 +110,4 @@ mkdir -p $PKG/install
 cat $CWD/slack-desc > $PKG/install/slack-desc
 
 cd $PKG
-/sbin/makepkg -l y -c n $OUTPUT/$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.${PKGTYPE:-tgz}
+/sbin/makepkg -l y -c n $OUTPUT/$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.$PKGTYPE
diff --git a/development/racket/racket.info b/development/racket/racket.info
index 58d3934c70..0b7cfc47e5 100644
--- a/development/racket/racket.info
+++ b/development/racket/racket.info
@@ -1,10 +1,10 @@
 PRGNAM="racket"
-VERSION="6.4"
+VERSION="7.9"
 HOMEPAGE="http://racket-lang.org/"
-DOWNLOAD="http://mirror.informatik.uni-tuebingen.de/mirror/racket/6.4/racket-6.4-src.tgz"
-MD5SUM="9938340227b3f31843dc87cb17ec21c5"
+DOWNLOAD="https://mirror.racket-lang.org/installers/7.9/racket-7.9-src-builtpkgs.tgz"
+MD5SUM="be3b9ba2b5b5fb04b48cc6d2942f26a2"
 DOWNLOAD_x86_64=""
 MD5SUM_x86_64=""
 REQUIRES=""
-MAINTAINER="Markus Hutmacher"
-EMAIL="mailing@markhu.de"
+MAINTAINER="Jeff Parent"
+EMAIL="jeff+SBo@sh0.xyz"
diff --git a/development/racket/xform-errors-converting-fix.patch b/development/racket/xform-errors-converting-fix.patch
deleted file mode 100644
index 687d653f4e..0000000000
--- a/development/racket/xform-errors-converting-fix.patch
+++ /dev/null
@@ -1,57 +0,0 @@
-diff -Naur racket-6.3/src/racket/src/bool.c my-racket-6.3/src/racket/src/bool.c
---- racket-6.3/src/racket/src/bool.c	2015-10-16 17:00:55.000000000 -0400
-+++ my-racket-6.3/src/racket/src/bool.c	2016-01-23 12:04:20.710628127 -0500
-@@ -202,6 +202,9 @@
-   return SAME_OBJ(obj1, obj2);
- }
- 
-+#ifdef MZ_XFORM
-+START_XFORM_SKIP;
-+#endif
- #ifdef MZ_LONG_DOUBLE
- XFORM_NONGCING static MZ_INLINE int mz_long_double_eqv(long_double a, long_double b)
- {
-@@ -239,6 +242,10 @@
- # endif
- }
- #endif
-+
-+#ifdef MZ_XFORM
-+START_XFORM_SKIP;
-+#endif
- XFORM_NONGCING static MZ_INLINE int double_eqv(double a, double b)
- {
- # ifndef NAN_EQUALS_ANYTHING
-@@ -419,6 +426,9 @@
- 
-  return -1;
- }
-+#ifdef MZ_XFORM
-+END_XFORM_SKIP;
-+#endif
- 
- int is_slow_equal (Scheme_Object *obj1, Scheme_Object *obj2)
- {
-diff -Naur racket-6.3/src/racket/src/number.c my-racket-6.3/src/racket/src/number.c
---- racket-6.3/src/racket/src/number.c	2015-10-16 17:00:55.000000000 -0400
-+++ my-racket-6.3/src/racket/src/number.c	2016-01-23 12:05:08.076767488 -0500
-@@ -1917,6 +1917,9 @@
-   return (is_rational(argv[0]) ? scheme_true : scheme_false);
- }
- 
-+#ifdef MZ_XFORM
-+START_XFORM_SKIP;
-+#endif
- XFORM_NONGCING static int double_is_integer(double d)
- {
- # ifdef NAN_EQUALS_ANYTHING
-@@ -1943,6 +1946,9 @@
- 
-   return 0;
- }
-+#ifdef MZ_XFORM
-+END_XFORM_SKIP;
-+#endif
- 
- 
- static Scheme_Object *