4 files changed, 14 insertions, 68 deletions
diff --git a/development/racket/README b/development/racket/README
index fe94786696c3..1d07f34cbf69 100644
--- a/development/racket/README
+++ b/development/racket/README
@@ -5,3 +5,9 @@ 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 e9bb528a374e..3134c4878c70 100644
--- a/development/racket/racket.SlackBuild
+++ b/development/racket/racket.SlackBuild
@@ -3,6 +3,7 @@
 # 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
@@ -23,8 +24,8 @@
 #  ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 PRGNAM=racket
-VERSION=${VERSION:-6.4}
-SUFFIX=src    # suffix of the UNIX sourcepackage
+VERSION=${VERSION:-7.8}
+SUFFIX=src-builtpkgs    # suffix of the UNIX sourcepackage
 BUILD=${BUILD:-1}
 TAG=${TAG:-_SBo}
 
@@ -70,10 +71,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
 
diff --git a/development/racket/racket.info b/development/racket/racket.info
index 58d3934c70e0..aea76e9118b0 100644
--- a/development/racket/racket.info
+++ b/development/racket/racket.info
@@ -1,10 +1,10 @@
 PRGNAM="racket"
-VERSION="6.4"
+VERSION="7.8"
 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.8/racket-7.8-src-builtpkgs.tgz"
+MD5SUM="52c264e23d68f2d627989ca29ba4f547"
 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 687d653f4e6f..000000000000
--- 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 *