From edb487ac92ea20efece5df3fd684ed4fbb34f7c3 Mon Sep 17 00:00:00 2001
From: "B. Watson" <yalhcru@gmail.com>
Date: Sat, 19 Mar 2022 00:45:22 -0400
Subject: [PATCH] perl/perl-Math-Int128: Mark as unsupported on 32-bit (it
 really is).

Signed-off-by: B. Watson <yalhcru@gmail.com>

Signed-off-by: Willy Sudiarto Raharjo <willysr@slackbuilds.org>
---
 perl/perl-Math-Int128/README                      |  6 +++++-
 perl/perl-Math-Int128/perl-Math-Int128.SlackBuild | 13 ++++++++-----
 perl/perl-Math-Int128/perl-Math-Int128.info       |  8 ++++----
 perl/perl-Math-Int128/slack-desc                  |  4 ++--
 4 files changed, 19 insertions(+), 12 deletions(-)

diff --git a/perl/perl-Math-Int128/README b/perl/perl-Math-Int128/README
index 3c79a427c7..2e317302ee 100644
--- a/perl/perl-Math-Int128/README
+++ b/perl/perl-Math-Int128/README
@@ -1 +1,5 @@
-Math::Int64 - Manipulate 128 bits integers in Perl.
+Math::Int64 - Manipulate 128 bit integers in Perl.
+
+Note for 32-bit users: this can't be built on 32-bit systems.
+It requires compiler support for 128-bit integers, which doesn't exist
+in either gcc or clang in 32-bit Slackware 15.0.
diff --git a/perl/perl-Math-Int128/perl-Math-Int128.SlackBuild b/perl/perl-Math-Int128/perl-Math-Int128.SlackBuild
index 3767f49ad4..97b6e428d8 100644
--- a/perl/perl-Math-Int128/perl-Math-Int128.SlackBuild
+++ b/perl/perl-Math-Int128/perl-Math-Int128.SlackBuild
@@ -22,6 +22,12 @@
 #  OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 #  ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
+# 20220319 bkw: Modified by SlackBuilds.org:
+# - mark as 64-bit only in .info file, since it'll never build on 32-bit.
+#   References:
+#   https://stackoverflow.com/questions/34532528/undefined-reference-to-divdi3
+#   https://stackoverflow.com/questions/16088282/is-there-a-128-bit-integer-in-gcc
+
 cd $(dirname $0) ; CWD=$(pwd)
 
 PRGNAM=perl-Math-Int128
@@ -40,9 +46,6 @@ if [ -z "$ARCH" ]; then
   esac
 fi
 
-# 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
@@ -77,9 +80,9 @@ cd $SRCNAM-$VERSION
 chown -R root:root .
 find -L . \
  \( -perm 777 -o -perm 775 -o -perm 750 -o -perm 711 -o -perm 555 \
-  -o -perm 511 \) -exec chmod 755 {} \; -o \
+  -o -perm 511 \) -exec chmod 755 {} \+ -o \
  \( -perm 666 -o -perm 664 -o -perm 640 -o -perm 600 -o -perm 444 \
-  -o -perm 440 -o -perm 400 \) -exec chmod 644 {} \;
+  -o -perm 440 -o -perm 400 \) -exec chmod 644 {} \+
 
 perl Makefile.PL \
   PREFIX=/usr \
diff --git a/perl/perl-Math-Int128/perl-Math-Int128.info b/perl/perl-Math-Int128/perl-Math-Int128.info
index 2d6f5bf874..910db873d4 100644
--- a/perl/perl-Math-Int128/perl-Math-Int128.info
+++ b/perl/perl-Math-Int128/perl-Math-Int128.info
@@ -1,10 +1,10 @@
 PRGNAM="perl-Math-Int128"
 VERSION="0.22"
 HOMEPAGE="https://metacpan.org/pod/Math::Int128"
-DOWNLOAD="https://cpan.metacpan.org/authors/id/S/SA/SALVA/Math-Int128-0.22.tar.gz"
-MD5SUM="626603153c162a3fb95b76c68db9ea2b"
-DOWNLOAD_x86_64=""
-MD5SUM_x86_64=""
+DOWNLOAD="UNSUPPORTED"
+MD5SUM=""
+DOWNLOAD_x86_64="https://cpan.metacpan.org/authors/id/S/SA/SALVA/Math-Int128-0.22.tar.gz"
+MD5SUM_x86_64="626603153c162a3fb95b76c68db9ea2b"
 REQUIRES="perl-Math-Int64"
 MAINTAINER="Jan F. Chadima"
 EMAIL="jfch@jagda.eu"
diff --git a/perl/perl-Math-Int128/slack-desc b/perl/perl-Math-Int128/slack-desc
index c270f91c26..20e4215f8b 100644
--- a/perl/perl-Math-Int128/slack-desc
+++ b/perl/perl-Math-Int128/slack-desc
@@ -6,9 +6,9 @@
 # customary to leave one space after the ':' except on otherwise blank lines.
 
                 |-----handy-ruler------------------------------------------------------|
-perl-Math-Int128: perl-Math-Int128 (Manipulate 128 bits integers)
+perl-Math-Int128: perl-Math-Int128 (Manipulate 128 bit integers)
 perl-Math-Int128:
-perl-Math-Int128: This module provides Perl availability to work with 128 bits integers.
+perl-Math-Int128: This module provides Perl availability to work with 128 bit integers.
 perl-Math-Int128:
 perl-Math-Int128: Homepage: https://metacpan.org/pod/Math::Int128
 perl-Math-Int128: