| 1 |
grozin 14/01/29 13:46:26 |
| 2 |
|
| 3 |
Added: ecls-1.patch |
| 4 |
Log: |
| 5 |
Fix the library version of the ecls maxima needed by sage (bug #499634), thanks to Martin von Gagern <Martin.vGagern@×××.net> |
| 6 |
|
| 7 |
(Portage version: 2.2.8-r1/cvs/Linux i686, signed Manifest commit with key 0x3AFFCE974D34BD8C!) |
| 8 |
|
| 9 |
Revision Changes Path |
| 10 |
1.1 sci-mathematics/maxima/files/ecls-1.patch |
| 11 |
|
| 12 |
file : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-mathematics/maxima/files/ecls-1.patch?rev=1.1&view=markup |
| 13 |
plain: http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-mathematics/maxima/files/ecls-1.patch?rev=1.1&content-type=text/plain |
| 14 |
|
| 15 |
Index: ecls-1.patch |
| 16 |
=================================================================== |
| 17 |
diff -r -U1 maxima-5.30.0.orig/src/maxima.in maxima-5.30.0/src/maxima.in |
| 18 |
--- maxima-5.30.0.orig/src/maxima.in 2012-12-04 12:54:50.000000000 +0700 |
| 19 |
+++ maxima-5.30.0/src/maxima.in 2013-04-13 12:57:12.037579805 +0700 |
| 20 |
@@ -191,3 +191,3 @@ |
| 21 |
elif [ "$MAXIMA_LISP" = "ecl" ]; then |
| 22 |
- exec "$maxima_image_base" $MAXIMA_LISP_OPTIONS -- "$arg1" "$arg2" "$arg3" "$arg4" "$arg5" "$arg6" "$arg7" "$arg8" "$arg9" |
| 23 |
+ exec "$maxima_image_base" $MAXIMA_LISP_OPTIONS -norc -- "$arg1" "$arg2" "$arg3" "$arg4" "$arg5" "$arg6" "$arg7" "$arg8" "$arg9" |
| 24 |
|
| 25 |
diff -r -U1 maxima-5.30.0.orig/src/maxima.system maxima-5.30.0/src/maxima.system |
| 26 |
--- maxima-5.30.0.orig/src/maxima.system 2013-03-23 08:32:08.000000000 +0700 |
| 27 |
+++ maxima-5.30.0/src/maxima.system 2013-04-13 12:59:54.086730845 +0700 |
| 28 |
@@ -61,2 +61,10 @@ |
| 29 |
#+ecl |
| 30 |
+(defun split-ld-flags-for-ecl (string &aux space) |
| 31 |
+ (setf string (string-trim '(#\Space) string)) |
| 32 |
+ (if (setf space (position #\Space string)) |
| 33 |
+ (cons (subseq string 0 space) |
| 34 |
+ (split-ld-flags-for-ecl (subseq string (1+ space)))) |
| 35 |
+ (cons string nil))) |
| 36 |
+ |
| 37 |
+#+ecl |
| 38 |
(defun build-maxima-lib () |
| 39 |
@@ -77,7 +85,12 @@ |
| 40 |
files))) |
| 41 |
+ (c::build-fasl "binary-ecl/maxima" :lisp-files obj |
| 42 |
+ :ld-flags |
| 43 |
+ (let ((x (symbol-value (find-symbol "*AUTOCONF-LD-FLAGS*" |
| 44 |
+ (find-package "MAXIMA"))))) |
| 45 |
+ (if (and x (not (string= x ""))) (split-ld-flags-for-ecl x)))) |
| 46 |
(c::build-program "binary-ecl/maxima" :lisp-files obj |
| 47 |
:ld-flags |
| 48 |
(let ((x (symbol-value (find-symbol "*AUTOCONF-LD-FLAGS*" |
| 49 |
(find-package "MAXIMA"))))) |
| 50 |
- (if (and x (not (string= x ""))) (list x))) |
| 51 |
+ (if (and x (not (string= x ""))) (split-ld-flags-for-ecl x))) |
| 52 |
:epilogue-code '(progn (require :defsystem) |
Archives