[arch-commits] Commit in maxima-ecl/trunk (PKGBUILD maxima-printing.patch)

[Antonio Rojas]

    Date: Saturday, June 1, 2019 @ 09:01:33
  Author: arojas
Revision: 476312

Add patch to fix bogus ? printing

Added:
  maxima-ecl/trunk/maxima-printing.patch
Modified:
  maxima-ecl/trunk/PKGBUILD

-----------------------+
 PKGBUILD              |    9 ++++++---
 maxima-printing.patch |   19 +++++++++++++++++++
 2 files changed, 25 insertions(+), 3 deletions(-)

Modified: PKGBUILD
===================================================================
--- PKGBUILD	2019-06-01 08:58:32 UTC (rev 476311)
+++ PKGBUILD	2019-06-01 09:01:33 UTC (rev 476312)
@@ -7,7 +7,7 @@
 _pkgname=maxima
 pkgver=5.43.0
 _eclver=16.1.3
-pkgrel=1
+pkgrel=2
 pkgdesc="A sophisticated computer algebra system (compiled against ecl)"
 arch=(x86_64)
 license=(GPL)
@@ -19,11 +19,12 @@
 provides=(maxima)
 options=(!zipman) # don't zip info pages or they won't work inside maxima
 source=("https://downloads.sourceforge.net/sourceforge/$_pkgname/$_pkgname-$pkgver.tar.gz"
-        build-fasl.patch matrixexp.patch stack.patch)
+        build-fasl.patch matrixexp.patch stack.patch maxima-printing.patch)
 sha256sums=('dcfda54511035276fd074ac736e97d41905171e43a5802bb820914c3c885ca77'
             '90ced3b33361fa24c2b417e0aeba8956892f0965b4a22d57d0c04115f2a3274b'
             'ef1bc6a15fc982ff8c6aa1800bbbd3284d9e060ca27abf9d8c1266632c0c2619'
-            '60ed7d96da06361a2f2f2e9df36aecae0384fe454bf3f963a2cab6033e1bd7a5')
+            '60ed7d96da06361a2f2f2e9df36aecae0384fe454bf3f963a2cab6033e1bd7a5'
+            '631f65e477a1496b0ce71d385117713274fcabfa2487c52b165fc3b1d015c0db')
 
 prepare() {
   cd $_pkgname-$pkgver
@@ -34,6 +35,8 @@
   patch -p1 -i ../matrixexp.patch
 # fix segfaults in sagemath
   patch -p1 -i ../stack.patch
+# fix bogus ? characters
+  patch -p1 -i ../maxima-printing.patch
 }
 
 build() {

Added: maxima-printing.patch
===================================================================
--- maxima-printing.patch	                        (rev 0)
+++ maxima-printing.patch	2019-06-01 09:01:33 UTC (rev 476312)
@@ -0,0 +1,19 @@
+diff --git a/src/grind.lisp b/src/grind.lisp
+index 4ae73a3..86b80e6 100644
+--- a/src/grind.lisp
++++ b/src/grind.lisp
+@@ -295,12 +295,12 @@
+       (msz nil l r)
+       (do ((nl) (w 0))
+           ((null (cdr x))
+-           (setq nl (cons (if (stringp (car x))
++           (setq nl (cons (if (atom (car x))
+                               (msz (makestring (car x)) l r)
+                               (msize (car x) l r lop rop))
+                           nl))
+            (cons (+ w (caar nl)) (nreverse nl)))
+-        (setq nl (cons (if (stringp (car x))
++        (setq nl (cons (if (atom (car x))
+                            (msz (makestring (car x)) l r)
+                            (msize (car x) l r lop rop))
+                        nl)