1 files changed, 0 insertions, 48 deletions
diff --git a/sci-mathematics/maxima/files/ecls-3.patch b/sci-mathematics/maxima/files/ecls-3.patch
deleted file mode 100644
index b44dea4d09a8..000000000000
--- a/sci-mathematics/maxima/files/ecls-3.patch
+++ /dev/null
@@ -1,48 +0,0 @@
-diff -r -U3 maxima-5.42.0.orig/src/maxima.in maxima-5.42.0/src/maxima.in
---- maxima-5.42.0.orig/src/maxima.in	2018-09-21 08:21:11.000000000 +0700
-+++ maxima-5.42.0/src/maxima.in	2018-10-01 21:49:23.551633882 +0700
-@@ -236,7 +236,7 @@
-    fi
- 
- elif [ "$MAXIMA_LISP" = "ecl" ]; then
--   exec "$maxima_image_base" --frame-stack 4096 --lisp-stack 65536 $MAXIMA_LISP_OPTIONS -- "$@"
-+   exec "$maxima_image_base" --frame-stack 4096 --lisp-stack 65536 $MAXIMA_LISP_OPTIONS -norc -- "$@"
- 
- elif [ "$MAXIMA_LISP" = "sbcl" ]; then
- # Use executable image if it exists.
-diff -r -U3 maxima-5.42.0.orig/src/maxima.system maxima-5.42.0/src/maxima.system
---- maxima-5.42.0.orig/src/maxima.system	2016-12-04 05:27:40.000000000 +0700
-+++ maxima-5.42.0/src/maxima.system	2018-10-01 22:01:08.068604254 +0700
-@@ -59,6 +59,14 @@
- 	 (c:build-fasl output :lisp-files (list object-output)))))
- 
- #+ecl
-+(defun split-ld-flags-for-ecl (string &aux space)
-+  (setf string (string-trim '(#\Space) string))
-+  (if (setf space (position #\Space string))
-+    (cons (subseq string 0 space)
-+      (split-ld-flags-for-ecl (subseq string (1+ space))))
-+    (cons string nil)))
-+
-+#+ecl
- (defun build-maxima-lib ()
-   (labels ((list-all-objects (module)
-              (if (eql (mk::component-type module) :file)
-@@ -75,11 +83,16 @@
- 			     ;; Convert dir/foo.fas to dir/foo.o
- 			     (make-pathname :type "o" :defaults p))
- 			 files)))
-+       (c::build-fasl "binary-ecl/maxima" :lisp-files obj
-+                      :ld-flags
-+                       (let ((x (symbol-value (find-symbol "*AUTOCONF-LD-FLAGS*"
-+                                                           (find-package "MAXIMA")))))
-+                         (if (and x (not (string= x ""))) (split-ld-flags-for-ecl x))))
- 	(c::build-program "binary-ecl/maxima" :lisp-files obj
- 			  :ld-flags
- 			  (let ((x (symbol-value (find-symbol "*AUTOCONF-LD-FLAGS*"
- 							      (find-package "MAXIMA")))))
--			    (if (and x (not (string= x ""))) (list x)))
-+			    (if (and x (not (string= x ""))) (split-ld-flags-for-ecl x)))
- 			  :epilogue-code '(progn (require :defsystem)
- 					         (cl-user::run)))))))
-