Gentoo Archives: gentoo-commits

From: "Ulrich Müller" <ulm@g.o>
To: gentoo-commits@l.g.o
Subject: [gentoo-commits] proj/lisp:master commit in: dev-lisp/sbcl/, dev-lisp/sbcl/files/
Date: Fri, 01 Apr 2022 11:12:55
Message-Id: 1648809000.9eb68983fcb0208ae6e35b1d3b0ce72c9cf8d17c.ulm@gentoo
1 commit: 9eb68983fcb0208ae6e35b1d3b0ce72c9cf8d17c
2 Author: Ulrich Müller <ulm <AT> gentoo <DOT> org>
3 AuthorDate: Fri Apr 1 10:30:00 2022 +0000
4 Commit: Ulrich Müller <ulm <AT> gentoo <DOT> org>
5 CommitDate: Fri Apr 1 10:30:00 2022 +0000
6 URL: https://gitweb.gentoo.org/proj/lisp.git/commit/?id=9eb68983
7
8 dev-lisp/sbcl: Remove package
9
10 Newer version in gentoo repository.
11
12 Signed-off-by: Ulrich Müller <ulm <AT> gentoo.org>
13
14 dev-lisp/sbcl/files/concurrency-test-1.3.15.patch | 17 -
15 dev-lisp/sbcl/files/sb-posix-test-1.2.15.patch | 40 ---
16 dev-lisp/sbcl/files/sbcl-1.2.11-solaris.patch | 12 -
17 .../sbcl/files/sbcl-1.4.0-bsd-sockets-test.patch | 383 ---------------------
18 dev-lisp/sbcl/files/sbcl-1.4.0-verbose-build.patch | 29 --
19 dev-lisp/sbcl/metadata.xml | 28 --
20 dev-lisp/sbcl/sbcl-1.4.10.ebuild | 246 -------------
21 dev-lisp/sbcl/sbcl-1.4.9.ebuild | 246 -------------
22 8 files changed, 1001 deletions(-)
23
24 diff --git a/dev-lisp/sbcl/files/concurrency-test-1.3.15.patch b/dev-lisp/sbcl/files/concurrency-test-1.3.15.patch
25 deleted file mode 100644
26 index 53b5bea0..00000000
27 --- a/dev-lisp/sbcl/files/concurrency-test-1.3.15.patch
28 +++ /dev/null
29 @@ -1,17 +0,0 @@
30 -diff -r -U2 sbcl-1.3.15.orig/contrib/sb-concurrency/tests/test-frlock.lisp sbcl-1.3.15/contrib/sb-concurrency/tests/test-frlock.lisp
31 ---- sbcl-1.3.15.orig/contrib/sb-concurrency/tests/test-frlock.lisp 2017-02-28 20:51:29.000000000 +0100
32 -+++ sbcl-1.3.15/contrib/sb-concurrency/tests/test-frlock.lisp 2017-03-02 18:15:41.225284441 +0100
33 -@@ -25,5 +25,5 @@
34 - (defun test-frlocks (&key (reader-count 100) (read-count 1000000)
35 - (outer-read-pause 0) (inner-read-pause 0)
36 -- (writer-count 10) (write-count (/ 1 *minimum-sleep*))
37 -+ (writer-count 10) (write-count 5000)
38 - (outer-write-pause *minimum-sleep*) (inner-write-pause 0))
39 - (let ((rw (make-frlock))
40 -@@ -88,5 +88,5 @@
41 - (deftest* (frlock.1)
42 - (handler-case
43 -- (sb-ext:with-timeout 10
44 -+ (sb-ext:with-timeout 240
45 - (test-frlocks #+win32 :outer-write-pause #+win32 t ))
46 - (sb-ext:timeout (c)
47
48 diff --git a/dev-lisp/sbcl/files/sb-posix-test-1.2.15.patch b/dev-lisp/sbcl/files/sb-posix-test-1.2.15.patch
49 deleted file mode 100644
50 index 517208a7..00000000
51 --- a/dev-lisp/sbcl/files/sb-posix-test-1.2.15.patch
52 +++ /dev/null
53 @@ -1,40 +0,0 @@
54 -diff -r -U1 sbcl-1.2.15.orig/contrib/sb-posix/posix-tests.lisp sbcl-1.2.15/contrib/sb-posix/posix-tests.lisp
55 ---- sbcl-1.2.15.orig/contrib/sb-posix/posix-tests.lisp 2015-08-31 00:59:03.000000000 +0600
56 -+++ sbcl-1.2.15/contrib/sb-posix/posix-tests.lisp 2015-09-22 10:19:20.000000000 +0600
57 -@@ -169,19 +169,19 @@
58 -
59 --(deftest rmdir.error.3
60 -- (handler-case
61 -- (sb-posix:rmdir #-win32 "/" #+win32 (sb-ext:posix-getenv "windir"))
62 -- (sb-posix:syscall-error (c)
63 -- (typep
64 -- (sb-posix:syscall-errno c)
65 -- '(member
66 -- #+(or darwin openbsd)
67 -- #.sb-posix:eisdir
68 -- #+win32
69 -- #.sb-posix::eacces
70 -- #+win32
71 -- #.sb-posix::enotempty
72 -- #+sunos
73 -- #.sb-posix::einval
74 -- #-(or darwin openbsd win32 sunos)
75 -- #.sb-posix::ebusy)))) t)
76 -+;(deftest rmdir.error.3
77 -+; (handler-case
78 -+; (sb-posix:rmdir #-win32 "/" #+win32 (sb-ext:posix-getenv "windir"))
79 -+; (sb-posix:syscall-error (c)
80 -+; (typep
81 -+; (sb-posix:syscall-errno c)
82 -+; '(member
83 -+; #+(or darwin openbsd)
84 -+; #.sb-posix:eisdir
85 -+; #+win32
86 -+; #.sb-posix::eacces
87 -+; #+win32
88 -+; #.sb-posix::enotempty
89 -+; #+sunos
90 -+; #.sb-posix::einval
91 -+; #-(or darwin openbsd win32 sunos)
92 -+; #.sb-posix::ebusy)))) t)
93 -
94
95 diff --git a/dev-lisp/sbcl/files/sbcl-1.2.11-solaris.patch b/dev-lisp/sbcl/files/sbcl-1.2.11-solaris.patch
96 deleted file mode 100644
97 index 850fd5d9..00000000
98 --- a/dev-lisp/sbcl/files/sbcl-1.2.11-solaris.patch
99 +++ /dev/null
100 @@ -1,12 +0,0 @@
101 -diff -r -U2 sbcl-1.2.11.orig/src/runtime/Config.x86-sunos sbcl-1.2.11/src/runtime/Config.x86-sunos
102 ---- sbcl-1.2.11.orig/src/runtime/Config.x86-sunos 2015-04-27 20:56:50.000000000 +0600
103 -+++ sbcl-1.2.11/src/runtime/Config.x86-sunos 2015-04-28 22:38:01.569103626 +0600
104 -@@ -12,6 +12,6 @@
105 - CC=gcc
106 - CFLAGS = -g -O2 -Wall -D__EXTENSIONS__ -D_POSIX_C_SOURCE=199506L -DSVR4 -D_REENTRANT -fno-omit-frame-pointer
107 --NM = nm -xgp
108 --GREP = ggrep
109 -+NM = nm -t x -p
110 -+GREP = grep
111 -
112 - ASSEM_SRC = x86-assem.S ldso-stubs.S
113
114 diff --git a/dev-lisp/sbcl/files/sbcl-1.4.0-bsd-sockets-test.patch b/dev-lisp/sbcl/files/sbcl-1.4.0-bsd-sockets-test.patch
115 deleted file mode 100644
116 index d51bdd5c..00000000
117 --- a/dev-lisp/sbcl/files/sbcl-1.4.0-bsd-sockets-test.patch
118 +++ /dev/null
119 @@ -1,383 +0,0 @@
120 -diff -Nuar a/contrib/sb-bsd-sockets/tests.lisp b/contrib/sb-bsd-sockets/tests.lisp
121 ---- a/contrib/sb-bsd-sockets/tests.lisp 2017-09-30 18:30:58.000000000 +0200
122 -+++ b/contrib/sb-bsd-sockets/tests.lisp 2017-10-01 18:45:57.132900158 +0200
123 -@@ -18,11 +18,11 @@
124 - (equalp (make-inet-address "242.1.211.3") #(242 1 211 3))
125 - t)
126 -
127 --#-win32
128 --(deftest make-inet6-address.1
129 -- (equalp (make-inet6-address "ffff:ffff:ffff:ffff:ffff:ffff:ffff:ffff")
130 -- #(255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255))
131 -- t)
132 -+;#-win32
133 -+;(deftest make-inet6-address.1
134 -+; (equalp (make-inet6-address "ffff:ffff:ffff:ffff:ffff:ffff:ffff:ffff")
135 -+; #(255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255))
136 -+; t)
137 -
138 - (deftest get-protocol-by-name/tcp
139 - (integerp (get-protocol-by-name "tcp"))
140 -@@ -35,15 +35,15 @@
141 - ;;; See https://bugs.launchpad.net/sbcl/+bug/659857
142 - ;;; Apparently getprotobyname_r on FreeBSD says -1 and EINTR
143 - ;;; for unknown protocols...
144 --#-(and freebsd sb-thread)
145 --#-(and dragonfly sb-thread)
146 --(deftest get-protocol-by-name/error
147 -- (handler-case (get-protocol-by-name "nonexistent-protocol")
148 -- (unknown-protocol ()
149 -- t)
150 -- (:no-error ()
151 -- nil))
152 -- t)
153 -+;#-(and freebsd sb-thread)
154 -+;#-(and dragonfly sb-thread)
155 -+;(deftest get-protocol-by-name/error
156 -+; (handler-case (get-protocol-by-name "nonexistent-protocol")
157 -+; (unknown-protocol ()
158 -+; t)
159 -+; (:no-error ()
160 -+; nil))
161 -+; t)
162 -
163 - (when (handler-case (make-instance 'inet-socket
164 - :type :stream
165 -@@ -102,21 +102,21 @@
166 - (:no-error nil))
167 - t)
168 -
169 --#-win32
170 --(deftest make-inet6-socket.smoke
171 -- (handler-case
172 -- (let ((s (make-instance 'inet6-socket :type :stream :protocol (get-protocol-by-name "tcp"))))
173 -- (> (socket-file-descriptor s) 1))
174 -- ((or address-family-not-supported protocol-not-supported-error) () t))
175 -- t)
176 --
177 --#-win32
178 --(deftest make-inet6-socket.keyword
179 -- (handler-case
180 -- (let ((s (make-instance 'inet6-socket :type :stream :protocol :tcp)))
181 -- (> (socket-file-descriptor s) 1))
182 -- ((or address-family-not-supported protocol-not-supported-error) () t))
183 -- t)
184 -+;#-win32
185 -+;(deftest make-inet6-socket.smoke
186 -+; (handler-case
187 -+; (let ((s (make-instance 'inet6-socket :type :stream :protocol (get-protocol-by-name "tcp"))))
188 -+; (> (socket-file-descriptor s) 1))
189 -+; ((or address-family-not-supported protocol-not-supported-error) () t))
190 -+; t)
191 -+
192 -+;#-win32
193 -+;(deftest make-inet6-socket.keyword
194 -+; (handler-case
195 -+; (let ((s (make-instance 'inet6-socket :type :stream :protocol :tcp)))
196 -+; (> (socket-file-descriptor s) 1))
197 -+; ((or address-family-not-supported protocol-not-supported-error) () t))
198 -+; t)
199 -
200 - #+ipv4-support
201 - (deftest* (non-block-socket)
202 -@@ -125,55 +125,55 @@
203 - (non-blocking-mode s))
204 - t)
205 -
206 --#+ipv4-support
207 --(deftest inet-socket-bind
208 -- (let* ((tcp (get-protocol-by-name "tcp"))
209 -- (address (make-inet-address "127.0.0.1"))
210 -- (s1 (make-instance 'inet-socket :type :stream :protocol tcp))
211 -- (s2 (make-instance 'inet-socket :type :stream :protocol tcp)))
212 -- (unwind-protect
213 -- ;; Given the functions we've got so far, if you can think of a
214 -- ;; better way to make sure the bind succeeded than trying it
215 -- ;; twice, let me know
216 -- (progn
217 -- (socket-bind s1 address 0)
218 -- (handler-case
219 -- (let ((port (nth-value 1 (socket-name s1))))
220 -- (socket-bind s2 address port)
221 -- nil)
222 -- (address-in-use-error () t)))
223 -- (socket-close s1)
224 -- (socket-close s2)))
225 -- t)
226 --
227 --#-win32
228 --(deftest inet6-socket-bind
229 -- (handler-case
230 -- (let* ((tcp (get-protocol-by-name "tcp"))
231 -- (address (make-inet6-address "::1"))
232 -- (s1 (make-instance 'inet6-socket :type :stream :protocol tcp))
233 -- (s2 (make-instance 'inet6-socket :type :stream :protocol tcp)))
234 -- (unwind-protect
235 -- ;; Given the functions we've got so far, if you can think of a
236 -- ;; better way to make sure the bind succeeded than trying it
237 -- ;; twice, let me know
238 -- (handler-case
239 -- (socket-bind s1 address 0)
240 -- (socket-error ()
241 -- ;; This may mean no IPv6 support, can't fail a test
242 -- ;; because of that (address-family-not-supported doesn't catch that)
243 -- t)
244 -- (:no-error (x)
245 -- (declare (ignore x))
246 -- (handler-case
247 -- (let ((port (nth-value 1 (socket-name s1))))
248 -- (socket-bind s2 address port)
249 -- nil)
250 -- (address-in-use-error () t))))
251 -- (socket-close s1)
252 -- (socket-close s2)))
253 -- ((or address-family-not-supported protocol-not-supported-error) () t))
254 -- t)
255 -+;#+ipv4-support
256 -+;(deftest inet-socket-bind
257 -+; (let* ((tcp (get-protocol-by-name "tcp"))
258 -+; (address (make-inet-address "127.0.0.1"))
259 -+; (s1 (make-instance 'inet-socket :type :stream :protocol tcp))
260 -+; (s2 (make-instance 'inet-socket :type :stream :protocol tcp)))
261 -+; (unwind-protect
262 -+; ;; Given the functions we've got so far, if you can think of a
263 -+; ;; better way to make sure the bind succeeded than trying it
264 -+; ;; twice, let me know
265 -+; (progn
266 -+; (socket-bind s1 address 0)
267 -+; (handler-case
268 -+; (let ((port (nth-value 1 (socket-name s1))))
269 -+; (socket-bind s2 address port)
270 -+; nil)
271 -+; (address-in-use-error () t)))
272 -+; (socket-close s1)
273 -+; (socket-close s2)))
274 -+; t)
275 -+
276 -+;#-win32
277 -+;(deftest inet6-socket-bind
278 -+; (handler-case
279 -+; (let* ((tcp (get-protocol-by-name "tcp"))
280 -+; (address (make-inet6-address "::1"))
281 -+; (s1 (make-instance 'inet6-socket :type :stream :protocol tcp))
282 -+; (s2 (make-instance 'inet6-socket :type :stream :protocol tcp)))
283 -+; (unwind-protect
284 -+; ;; Given the functions we've got so far, if you can think of a
285 -+; ;; better way to make sure the bind succeeded than trying it
286 -+; ;; twice, let me know
287 -+; (handler-case
288 -+; (socket-bind s1 address 0)
289 -+; (socket-error ()
290 -+; ;; This may mean no IPv6 support, can't fail a test
291 -+; ;; because of that (address-family-not-supported doesn't catch that)
292 -+; t)
293 -+; (:no-error (x)
294 -+; (declare (ignore x))
295 -+; (handler-case
296 -+; (let ((port (nth-value 1 (socket-name s1))))
297 -+; (socket-bind s2 address port)
298 -+; nil)
299 -+; (address-in-use-error () t))))
300 -+; (socket-close s1)
301 -+; (socket-close s2)))
302 -+; ((or address-family-not-supported protocol-not-supported-error) () t))
303 -+; t)
304 -
305 - #+ipv4-support
306 - (deftest* (simple-sockopt-test)
307 -@@ -241,37 +241,37 @@
308 - ;;; to look at /etc/syslog.conf or local equivalent to find out where
309 - ;;; the message ended up
310 -
311 --#-win32
312 --(deftest simple-local-client
313 -- (progn
314 -- ;; SunOS (Solaris) and Darwin systems don't have a socket at
315 -- ;; /dev/log. We might also be building in a chroot or
316 -- ;; something, so don't fail this test just because the file is
317 -- ;; unavailable, or if it's a symlink to some weird character
318 -- ;; device.
319 -- (when (block nil
320 -- (handler-bind ((sb-posix:syscall-error
321 -- (lambda (e)
322 -- (declare (ignore e))
323 -- (return nil))))
324 -- (sb-posix:s-issock
325 -- (sb-posix::stat-mode (sb-posix:stat "/dev/log")))))
326 -- (let ((s (make-instance 'local-socket :type :datagram)))
327 -- (format t "Connecting ~A... " s)
328 -- (finish-output)
329 -- (handler-case
330 -- (socket-connect s "/dev/log")
331 -- (sb-bsd-sockets::socket-error ()
332 -- (setq s (make-instance 'local-socket :type :stream))
333 -- (format t "failed~%Retrying with ~A... " s)
334 -- (finish-output)
335 -- (socket-connect s "/dev/log")))
336 -- (format t "ok.~%")
337 -- (let ((stream (socket-make-stream s :input t :output t :buffering :none)))
338 -- (format stream
339 -- "<7>bsd-sockets: Don't panic. We're testing local-domain client code; this message can safely be ignored"))))
340 -- t)
341 -- t)
342 -+;#-win32
343 -+;(deftest simple-local-client
344 -+; (progn
345 -+; ;; SunOS (Solaris) and Darwin systems don't have a socket at
346 -+; ;; /dev/log. We might also be building in a chroot or
347 -+; ;; something, so don't fail this test just because the file is
348 -+; ;; unavailable, or if it's a symlink to some weird character
349 -+; ;; device.
350 -+; (when (block nil
351 -+; (handler-bind ((sb-posix:syscall-error
352 -+; (lambda (e)
353 -+; (declare (ignore e))
354 -+; (return nil))))
355 -+; (sb-posix:s-issock
356 -+; (sb-posix::stat-mode (sb-posix:stat "/dev/log")))))
357 -+; (let ((s (make-instance 'local-socket :type :datagram)))
358 -+; (format t "Connecting ~A... " s)
359 -+; (finish-output)
360 -+; (handler-case
361 -+; (socket-connect s "/dev/log")
362 -+; (sb-bsd-sockets::socket-error ()
363 -+; (setq s (make-instance 'local-socket :type :stream))
364 -+; (format t "failed~%Retrying with ~A... " s)
365 -+; (finish-output)
366 -+; (socket-connect s "/dev/log")))
367 -+; (format t "ok.~%")
368 -+; (let ((stream (socket-make-stream s :input t :output t :buffering :none)))
369 -+; (format stream
370 -+; "<7>bsd-sockets: Don't panic. We're testing local-domain client code; this message can safely be ignored"))))
371 -+; t)
372 -+; t)
373 -
374 - ;;; these require that the internet (or bits of it, at least) is available
375 -
376 -@@ -387,60 +387,60 @@
377 - (format t "Received ~A bytes from ~A:~A - ~A ~%"
378 - len address port (subseq buf 0 (min 10 len)))))))
379 -
380 --#+(and ipv4-support sb-thread)
381 --(deftest interrupt-io
382 -- (let (result)
383 -- (labels
384 -- ((client (port)
385 -- (setf result
386 -- (let ((s (make-instance 'inet-socket
387 -- :type :stream
388 -- :protocol :tcp)))
389 -- (socket-connect s #(127 0 0 1) port)
390 -- (let ((stream (socket-make-stream s
391 -- :input t
392 -- :output t
393 -- :buffering :none)))
394 -- (handler-case
395 -- (prog1
396 -- (catch 'stop
397 -- (progn
398 -- (read-char stream)
399 -- (sleep 0.1)
400 -- (sleep 0.1)
401 -- (sleep 0.1)))
402 -- (close stream))
403 -- (error (c)
404 -- c))))))
405 -- (server ()
406 -- (let ((s (make-instance 'inet-socket
407 -- :type :stream
408 -- :protocol :tcp)))
409 -- (setf (sockopt-reuse-address s) t)
410 -- (socket-bind s (make-inet-address "127.0.0.1") 0)
411 -- (socket-listen s 5)
412 -- (multiple-value-bind (* port)
413 -- (socket-name s)
414 -- (let* ((client (sb-thread:make-thread
415 -- (lambda () (client port))))
416 -- (r (socket-accept s))
417 -- (stream (socket-make-stream r
418 -- :input t
419 -- :output t
420 -- :buffering :none))
421 -- (ok :ok))
422 -- (socket-close s)
423 -- (sleep 5)
424 -- (sb-thread:interrupt-thread client
425 -- (lambda () (throw 'stop ok)))
426 -- (sleep 5)
427 -- (setf ok :not-ok)
428 -- (write-char #\x stream)
429 -- (close stream)
430 -- (socket-close r))))))
431 -- (server))
432 -- result)
433 -- :ok)
434 -+;#+(and ipv4-support sb-thread)
435 -+;(deftest interrupt-io
436 -+; (let (result)
437 -+; (labels
438 -+; ((client (port)
439 -+; (setf result
440 -+; (let ((s (make-instance 'inet-socket
441 -+; :type :stream
442 -+; :protocol :tcp)))
443 -+; (socket-connect s #(127 0 0 1) port)
444 -+; (let ((stream (socket-make-stream s
445 -+; :input t
446 -+; :output t
447 -+; :buffering :none)))
448 -+; (handler-case
449 -+; (prog1
450 -+; (catch 'stop
451 -+; (progn
452 -+; (read-char stream)
453 -+; (sleep 0.1)
454 -+; (sleep 0.1)
455 -+; (sleep 0.1)))
456 -+; (close stream))
457 -+; (error (c)
458 -+; c))))))
459 -+; (server ()
460 -+; (let ((s (make-instance 'inet-socket
461 -+; :type :stream
462 -+; :protocol :tcp)))
463 -+; (setf (sockopt-reuse-address s) t)
464 -+; (socket-bind s (make-inet-address "127.0.0.1") 0)
465 -+; (socket-listen s 5)
466 -+; (multiple-value-bind (* port)
467 -+; (socket-name s)
468 -+; (let* ((client (sb-thread:make-thread
469 -+; (lambda () (client port))))
470 -+; (r (socket-accept s))
471 -+; (stream (socket-make-stream r
472 -+; :input t
473 -+; :output t
474 -+; :buffering :none))
475 -+; (ok :ok))
476 -+; (socket-close s)
477 -+; (sleep 5)
478 -+; (sb-thread:interrupt-thread client
479 -+; (lambda () (throw 'stop ok)))
480 -+; (sleep 5)
481 -+; (setf ok :not-ok)
482 -+; (write-char #\x stream)
483 -+; (close stream)
484 -+; (socket-close r))))))
485 -+; (server))
486 -+; result)
487 -+; :ok)
488 -
489 - (defmacro with-client-and-server (((socket-class &rest common-initargs)
490 - (listen-socket-var &rest listen-address)
491 -@@ -503,8 +503,9 @@
492 - (define-shutdown-test ,(make-name 'shutdown.client.ub8)
493 - client server (unsigned-byte 8) ,direction)))))
494 -
495 -- (define-shutdown-tests :output)
496 -- (define-shutdown-tests :io))
497 -+; (define-shutdown-tests :output)
498 -+; (define-shutdown-tests :io)
499 -+)
500 -
501 - #+linux
502 - (deftest abstract.smoke
503
504 diff --git a/dev-lisp/sbcl/files/sbcl-1.4.0-verbose-build.patch b/dev-lisp/sbcl/files/sbcl-1.4.0-verbose-build.patch
505 deleted file mode 100644
506 index 27ad3b07..00000000
507 --- a/dev-lisp/sbcl/files/sbcl-1.4.0-verbose-build.patch
508 +++ /dev/null
509 @@ -1,29 +0,0 @@
510 -diff -Nuar a/make.sh b/make.sh
511 ---- a/make.sh 2017-09-30 18:30:58.000000000 +0200
512 -+++ b/make.sh 2017-10-01 18:08:26.742909789 +0200
513 -@@ -24,7 +24,7 @@
514 - # thing" when run on the target machine, with the minor caveat that
515 - # any --xc-host parameter should be suitable for the host machine
516 - # instead of the target.
517 --sh make-config.sh "$@" || exit $?
518 -+sh -x make-config.sh "$@" || exit $?
519 -
520 - . output/prefix.def
521 - . output/build-config
522 -@@ -76,11 +76,11 @@
523 - $@
524 - fi
525 - }
526 --maybetime sh make-host-1.sh
527 --maybetime sh make-target-1.sh
528 --maybetime sh make-host-2.sh
529 --maybetime sh make-target-2.sh
530 --maybetime sh make-target-contrib.sh
531 -+maybetime sh -x make-host-1.sh
532 -+maybetime sh -x make-target-1.sh
533 -+maybetime sh -x make-host-2.sh
534 -+maybetime sh -x make-target-2.sh
535 -+maybetime sh -x make-target-contrib.sh
536 -
537 - NCONTRIBS=`find contrib -name Makefile -print | wc -l`
538 - NPASSED=`find obj/asdf-cache -name test-passed.test-report -print | wc -l`
539
540 diff --git a/dev-lisp/sbcl/metadata.xml b/dev-lisp/sbcl/metadata.xml
541 deleted file mode 100644
542 index 377efac5..00000000
543 --- a/dev-lisp/sbcl/metadata.xml
544 +++ /dev/null
545 @@ -1,28 +0,0 @@
546 -<?xml version="1.0" encoding="UTF-8"?>
547 -<!DOCTYPE pkgmetadata SYSTEM "https://www.gentoo.org/dtd/metadata.dtd">
548 -<pkgmetadata>
549 - <maintainer type="project">
550 - <email>common-lisp@g.o</email>
551 - <name>Gentoo Common Lisp Project</name>
552 - </maintainer>
553 - <longdescription>
554 - Steel Bank Common Lisp is an open source Common Lisp implementation. It
555 - provides an integrated native compiler, interpreter, and debugger.
556 -
557 - SBCL is a fork off of the main branch of CMUCL. SBCL is distinguished from
558 - CMUCL by a greater emphasis on maintainability. In particular, the SBCL system
559 - can be built directly from its source code, so that the output corresponds to
560 - the source code in a controlled, verifiable way, and arbitrary changes can be
561 - made to the system without causing bootstrapping problems. SBCL also places
562 - less emphasis than CMU CL does on new non-ANSI extensions, or on backward
563 - compatibility with old non-ANSI features.
564 -
565 - Support for native threading on GNU/Linux is available for the x86 and amd64
566 - platforms using an NPTL enabled GLIBC.
567 -
568 - SBCL 0.8.17 and later support Unicode.
569 - </longdescription>
570 - <use>
571 - <flag name='pax_kernel'>Enable if the user plans to run the package under a pax enabled hardened kernel</flag>
572 - </use>
573 -</pkgmetadata>
574
575 diff --git a/dev-lisp/sbcl/sbcl-1.4.10.ebuild b/dev-lisp/sbcl/sbcl-1.4.10.ebuild
576 deleted file mode 100644
577 index f07d8939..00000000
578 --- a/dev-lisp/sbcl/sbcl-1.4.10.ebuild
579 +++ /dev/null
580 @@ -1,246 +0,0 @@
581 -# Copyright 1999-2018 Gentoo Foundation
582 -# Distributed under the terms of the GNU General Public License v2
583 -
584 -EAPI=6
585 -
586 -inherit multilib eutils flag-o-matic pax-utils
587 -
588 -#same order as http://www.sbcl.org/platform-table.html
589 -BV_X86=1.4.3
590 -BV_AMD64=1.4.8
591 -BV_PPC=1.2.7
592 -BV_SPARC=1.0.28
593 -BV_ALPHA=1.0.28
594 -BV_ARM=1.3.12
595 -BV_ARM64=1.4.2
596 -BV_X86_MACOS=1.1.6
597 -BV_X64_MACOS=1.2.11
598 -BV_PPC_MACOS=1.0.47
599 -BV_X86_SOLARIS=1.2.7
600 -BV_X64_SOLARIS=1.2.7
601 -BV_SPARC_SOLARIS=1.0.23
602 -
603 -DESCRIPTION="Steel Bank Common Lisp (SBCL) is an implementation of ANSI Common Lisp"
604 -HOMEPAGE="http://sbcl.sourceforge.net/"
605 -SRC_URI="mirror://sourceforge/sbcl/${P}-source.tar.bz2
606 - x86? ( mirror://sourceforge/sbcl/${PN}-${BV_X86}-x86-linux-binary.tar.bz2 )
607 - amd64? ( mirror://sourceforge/sbcl/${PN}-${BV_AMD64}-x86-64-linux-binary.tar.bz2 )
608 - ppc? ( mirror://sourceforge/sbcl/${PN}-${BV_PPC}-powerpc-linux-binary.tar.bz2 )
609 - sparc? ( mirror://sourceforge/sbcl/${PN}-${BV_SPARC}-sparc-linux-binary.tar.bz2 )
610 - alpha? ( mirror://sourceforge/sbcl/${PN}-${BV_ALPHA}-alpha-linux-binary.tar.bz2 )
611 - arm? ( mirror://sourceforge/sbcl/${PN}-${BV_ARM}-armhf-linux-binary.tar.bz2 )
612 - arm64? ( mirror://sourceforge/sbcl/${PN}-${BV_ARM64}-arm64-linux-binary.tar.bz2 )
613 - x86-macos? ( mirror://sourceforge/sbcl/${PN}-${BV_X86_MACOS}-x86-darwin-binary.tar.bz2 )
614 - x64-macos? ( mirror://sourceforge/sbcl/${PN}-${BV_X64_MACOS}-x86-64-darwin-binary.tar.bz2 )
615 - ppc-macos? ( mirror://sourceforge/sbcl/${PN}-${BV_PPC_MACOS}-powerpc-darwin-binary.tar.bz2 )
616 - x86-solaris? ( mirror://sourceforge/sbcl/${PN}-${BV_X86_SOLARIS}-x86-solaris-binary.tar.bz2 )
617 - x64-solaris? ( mirror://sourceforge/sbcl/${PN}-${BV_X64_SOLARIS}-x86-64-solaris-binary.tar.bz2 )
618 - sparc-solaris? ( mirror://sourceforge/sbcl/${PN}-${BV_SPARC_SOLARIS}-sparc-solaris-binary.tar.bz2 )"
619 -
620 -LICENSE="MIT"
621 -SLOT="0/${PV}"
622 -KEYWORDS="~amd64 ~ppc ~sparc ~x86 ~amd64-linux ~x86-linux ~x64-macos ~x86-macos ~x86-solaris"
623 -IUSE="debug doc source +threads +unicode pax_kernel zlib"
624 -
625 -CDEPEND=">=dev-lisp/asdf-3.1:="
626 -DEPEND="${CDEPEND}
627 - doc? ( sys-apps/texinfo >=media-gfx/graphviz-2.26.0 )
628 - pax_kernel? ( sys-apps/elfix )"
629 -RDEPEND="${CDEPEND}
630 - !prefix? ( elibc_glibc? ( >=sys-libs/glibc-2.6 ) )"
631 -
632 -# Disable warnings about executable stacks, as this won't be fixed soon by upstream
633 -QA_EXECSTACK="usr/bin/sbcl"
634 -
635 -CONFIG="${S}/customize-target-features.lisp"
636 -ENVD="${T}/50sbcl"
637 -
638 -# Prevent ASDF from using the system libraries
639 -CL_SOURCE_REGISTRY="(:source-registry :ignore-inherited-configuration)"
640 -ASDF_OUTPUT_TRANSLATIONS="(:output-translations :ignore-inherited-configuration)"
641 -
642 -usep() {
643 - use ${1} && echo "true" || echo "false"
644 -}
645 -
646 -sbcl_feature() {
647 - echo "$( [[ ${1} == "true" ]] && echo "(enable ${2})" || echo "(disable ${2})")" >> "${CONFIG}"
648 -}
649 -
650 -sbcl_apply_features() {
651 - sed 's/^X//' > "${CONFIG}" <<-'EOF'
652 - (lambda (list)
653 - X (flet ((enable (x) (pushnew x list))
654 - X (disable (x) (setf list (remove x list))))
655 - EOF
656 - if use x86 || use amd64; then
657 - sbcl_feature "$(usep threads)" ":sb-thread"
658 - fi
659 - sbcl_feature "true" ":sb-ldb"
660 - sbcl_feature "false" ":sb-test"
661 - sbcl_feature "$(usep unicode)" ":sb-unicode"
662 - sbcl_feature "$(usep zlib)" ":sb-core-compression"
663 - sbcl_feature "$(usep debug)" ":sb-xref-for-internals"
664 - sed 's/^X//' >> "${CONFIG}" <<-'EOF'
665 - X )
666 - X list)
667 - EOF
668 - cat "${CONFIG}"
669 -}
670 -
671 -src_unpack() {
672 - unpack ${A}
673 - mv sbcl-*-* sbcl-binary || die
674 - cd "${S}"
675 -}
676 -
677 -src_prepare() {
678 - # bug #468482
679 - eapply "${FILESDIR}"/concurrency-test-1.3.15.patch
680 - # bugs #486552, #527666, #517004
681 - eapply "${FILESDIR}"/${PN}-1.4.0-bsd-sockets-test.patch
682 - # bugs #560276, #561018
683 - eapply "${FILESDIR}"/sb-posix-test-1.2.15.patch
684 -
685 - eapply "${FILESDIR}"/${PN}-1.2.11-solaris.patch
686 - eapply "${FILESDIR}"/${PN}-1.4.0-verbose-build.patch
687 -
688 - eapply_user
689 -
690 - # Make sure the *FLAGS variables are sane.
691 - # sbcl needs symbols in resulting binaries, so building with the -s linker flag will fail.
692 - strip-unsupported-flags
693 - filter-flags -fomit-frame-pointer -Wl,-s
694 - filter-ldflags -s
695 -
696 - # original bugs #526194, #620532
697 - # this broke no-pie default builds, c.f. bug #632670
698 - # Pass CFLAGS down by appending our value, to let users override
699 - # the default values.
700 - # Keep passing LDFLAGS down via the LINKFLAGS variable.
701 - sed -e "s@\(CFLAGS += -g .*\)\$@\1 ${CFLAGS}@" \
702 - -e "s@LINKFLAGS += -g\$@LINKFLAGS += ${LDFLAGS}@" \
703 - -i src/runtime/GNUmakefile || die
704 -
705 - sed -e "s@SBCL_PREFIX=\"/usr/local\"@SBCL_PREFIX=\"${EPREFIX}/usr\"@" \
706 - -i make-config.sh || die
707 -
708 - # Use installed ASDF version
709 - cp "${EPREFIX}"/usr/share/common-lisp/source/asdf/build/asdf.lisp contrib/asdf/ || die
710 - # Avoid installation of ASDF info page. See bug #605752
711 - sed '/INFOFILES/s/asdf.info//' -i doc/manual/Makefile || die
712 -
713 - use source && sed 's%"$(BUILD_ROOT)%$(MODULE).lisp "$(BUILD_ROOT)%' -i contrib/vanilla-module.mk
714 -
715 - # Some shells(such as dash) don't have "time" as builtin
716 - # and we don't want to DEPEND on sys-process/time
717 - sed "s,^time ,," -i make.sh || die
718 - sed "s,/lib,/$(get_libdir),g" -i install.sh || die
719 - # #define SBCL_HOME ...
720 - sed "s,/usr/local/lib,${EPREFIX}/usr/$(get_libdir),g" -i src/runtime/runtime.c || die
721 - # change location of /etc/sbclrc ...
722 - sed "s,/etc/sbclrc,${EPREFIX}/etc/sbclrc,g" -i src/code/toplevel.lisp || die
723 -
724 - find . -type f -name .cvsignore -delete
725 -}
726 -
727 -src_configure() {
728 - # customizing SBCL version as per
729 - # http://sbcl.cvs.sourceforge.net/sbcl/sbcl/doc/PACKAGING-SBCL.txt?view=markup
730 - echo -e ";;; Auto-generated by Gentoo\n\"gentoo-${PR}\"" > branch-version.lisp-expr
731 -
732 - # applying customizations
733 - sbcl_apply_features
734 -}
735 -
736 -src_compile() {
737 - local bindir="${WORKDIR}"/sbcl-binary
738 -
739 - if use pax_kernel ; then
740 - # To disable PaX on hardened systems
741 - pax-mark -mr "${bindir}"/src/runtime/sbcl
742 -
743 - # Hack to disable PaX on second GENESIS stage
744 - sed -i -e '/^[ \t]*echo \/\/doing warm init - compilation phase$/a\ paxmark.sh -mr \.\/src\/runtime\/sbcl' \
745 - "${S}"/make-target-2.sh || die "Cannot disable PaX on second GENESIS runtime"
746 - fi
747 -
748 - # clear the environment to get rid of non-ASCII strings, see bug #174702
749 - # set HOME for paludis
750 - env - HOME="${T}" PATH="${PATH}" \
751 - CC="$(tc-getCC)" AS="$(tc-getAS)" LD="$(tc-getLD)" \
752 - CPPFLAGS="${CPPFLAGS}" CFLAGS="${CFLAGS}" ASFLAGS="${ASFLAGS}" LDFLAGS="${LDFLAGS}" \
753 - GNUMAKE=make ./make.sh \
754 - "sh ${bindir}/run-sbcl.sh --no-sysinit --no-userinit --disable-debugger" \
755 - || die "make failed"
756 -
757 - # need to set HOME because libpango(used by graphviz) complains about it
758 - if use doc; then
759 - env - HOME="${T}" PATH="${PATH}" \
760 - CL_SOURCE_REGISTRY="(:source-registry :ignore-inherited-configuration)" \
761 - ASDF_OUTPUT_TRANSLATIONS="(:output-translations :ignore-inherited-configuration)" \
762 - make -C doc/manual info html || die "Cannot build manual"
763 - env - HOME="${T}" PATH="${PATH}" \
764 - CL_SOURCE_REGISTRY="(:source-registry :ignore-inherited-configuration)" \
765 - ASDF_OUTPUT_TRANSLATIONS="(:output-translations :ignore-inherited-configuration)" \
766 - make -C doc/internals info html || die "Cannot build internal docs"
767 - fi
768 -}
769 -
770 -src_test() {
771 - ewarn "Unfortunately, it is known that some tests fail eg."
772 - ewarn "run-program.impure.lisp. This is an issue of the upstream's"
773 - ewarn "development and not of Gentoo's side. Please, before filing"
774 - ewarn "any bug(s) search for older submissions. Thank you."
775 - time ( cd tests && sh run-tests.sh )
776 -}
777 -
778 -src_install() {
779 - # install system-wide initfile
780 - dodir /etc/
781 - sed 's/^X//' > "${ED}"/etc/sbclrc <<-EOF
782 - ;;; The following is required if you want source location functions to
783 - ;;; work in SLIME, for example.
784 - X
785 - (setf (logical-pathname-translations "SYS")
786 - X '(("SYS:SRC;**;*.*.*" #p"${EPREFIX}/usr/$(get_libdir)/sbcl/src/**/*.*")
787 - X ("SYS:CONTRIB;**;*.*.*" #p"${EPREFIX}/usr/$(get_libdir)/sbcl/**/*.*")))
788 - X
789 - ;;; Setup ASDF2
790 - (load "${EPREFIX}/etc/common-lisp/gentoo-init.lisp")
791 - EOF
792 -
793 - # Install documentation
794 - unset SBCL_HOME
795 - INSTALL_ROOT="${ED}/usr" LIB_DIR="${EPREFIX}/usr/$(get_libdir)" DOC_DIR="${ED}/usr/share/doc/${PF}" \
796 - sh install.sh || die "install.sh failed"
797 -
798 - # bug #517008
799 - pax-mark -mr "${D}"/usr/bin/sbcl
800 -
801 - # rm empty directories lest paludis complain about this
802 - find "${ED}" -empty -type d -exec rmdir -v {} +
803 -
804 - if use doc; then
805 - dodoc -r doc/internals/sbcl-internals
806 -
807 - doinfo doc/manual/*.info*
808 - doinfo doc/internals/sbcl-internals.info
809 -
810 - docinto internals-notes
811 - dodoc doc/internals-notes/*
812 - else
813 - rm -Rv "${ED}/usr/share/doc/${PF}" || die
814 - fi
815 -
816 - # install the SBCL source
817 - if use source; then
818 - ./clean.sh
819 - cp -av src "${ED}/usr/$(get_libdir)/sbcl/" || die
820 - fi
821 -
822 - # necessary for running newly-saved images
823 - echo "SBCL_HOME=${EPREFIX}/usr/$(get_libdir)/${PN}" > "${ENVD}"
824 - echo "SBCL_SOURCE_ROOT=${EPREFIX}/usr/$(get_libdir)/${PN}/src" >> "${ENVD}"
825 - doenvd "${ENVD}"
826 -}
827
828 diff --git a/dev-lisp/sbcl/sbcl-1.4.9.ebuild b/dev-lisp/sbcl/sbcl-1.4.9.ebuild
829 deleted file mode 100644
830 index f07d8939..00000000
831 --- a/dev-lisp/sbcl/sbcl-1.4.9.ebuild
832 +++ /dev/null
833 @@ -1,246 +0,0 @@
834 -# Copyright 1999-2018 Gentoo Foundation
835 -# Distributed under the terms of the GNU General Public License v2
836 -
837 -EAPI=6
838 -
839 -inherit multilib eutils flag-o-matic pax-utils
840 -
841 -#same order as http://www.sbcl.org/platform-table.html
842 -BV_X86=1.4.3
843 -BV_AMD64=1.4.8
844 -BV_PPC=1.2.7
845 -BV_SPARC=1.0.28
846 -BV_ALPHA=1.0.28
847 -BV_ARM=1.3.12
848 -BV_ARM64=1.4.2
849 -BV_X86_MACOS=1.1.6
850 -BV_X64_MACOS=1.2.11
851 -BV_PPC_MACOS=1.0.47
852 -BV_X86_SOLARIS=1.2.7
853 -BV_X64_SOLARIS=1.2.7
854 -BV_SPARC_SOLARIS=1.0.23
855 -
856 -DESCRIPTION="Steel Bank Common Lisp (SBCL) is an implementation of ANSI Common Lisp"
857 -HOMEPAGE="http://sbcl.sourceforge.net/"
858 -SRC_URI="mirror://sourceforge/sbcl/${P}-source.tar.bz2
859 - x86? ( mirror://sourceforge/sbcl/${PN}-${BV_X86}-x86-linux-binary.tar.bz2 )
860 - amd64? ( mirror://sourceforge/sbcl/${PN}-${BV_AMD64}-x86-64-linux-binary.tar.bz2 )
861 - ppc? ( mirror://sourceforge/sbcl/${PN}-${BV_PPC}-powerpc-linux-binary.tar.bz2 )
862 - sparc? ( mirror://sourceforge/sbcl/${PN}-${BV_SPARC}-sparc-linux-binary.tar.bz2 )
863 - alpha? ( mirror://sourceforge/sbcl/${PN}-${BV_ALPHA}-alpha-linux-binary.tar.bz2 )
864 - arm? ( mirror://sourceforge/sbcl/${PN}-${BV_ARM}-armhf-linux-binary.tar.bz2 )
865 - arm64? ( mirror://sourceforge/sbcl/${PN}-${BV_ARM64}-arm64-linux-binary.tar.bz2 )
866 - x86-macos? ( mirror://sourceforge/sbcl/${PN}-${BV_X86_MACOS}-x86-darwin-binary.tar.bz2 )
867 - x64-macos? ( mirror://sourceforge/sbcl/${PN}-${BV_X64_MACOS}-x86-64-darwin-binary.tar.bz2 )
868 - ppc-macos? ( mirror://sourceforge/sbcl/${PN}-${BV_PPC_MACOS}-powerpc-darwin-binary.tar.bz2 )
869 - x86-solaris? ( mirror://sourceforge/sbcl/${PN}-${BV_X86_SOLARIS}-x86-solaris-binary.tar.bz2 )
870 - x64-solaris? ( mirror://sourceforge/sbcl/${PN}-${BV_X64_SOLARIS}-x86-64-solaris-binary.tar.bz2 )
871 - sparc-solaris? ( mirror://sourceforge/sbcl/${PN}-${BV_SPARC_SOLARIS}-sparc-solaris-binary.tar.bz2 )"
872 -
873 -LICENSE="MIT"
874 -SLOT="0/${PV}"
875 -KEYWORDS="~amd64 ~ppc ~sparc ~x86 ~amd64-linux ~x86-linux ~x64-macos ~x86-macos ~x86-solaris"
876 -IUSE="debug doc source +threads +unicode pax_kernel zlib"
877 -
878 -CDEPEND=">=dev-lisp/asdf-3.1:="
879 -DEPEND="${CDEPEND}
880 - doc? ( sys-apps/texinfo >=media-gfx/graphviz-2.26.0 )
881 - pax_kernel? ( sys-apps/elfix )"
882 -RDEPEND="${CDEPEND}
883 - !prefix? ( elibc_glibc? ( >=sys-libs/glibc-2.6 ) )"
884 -
885 -# Disable warnings about executable stacks, as this won't be fixed soon by upstream
886 -QA_EXECSTACK="usr/bin/sbcl"
887 -
888 -CONFIG="${S}/customize-target-features.lisp"
889 -ENVD="${T}/50sbcl"
890 -
891 -# Prevent ASDF from using the system libraries
892 -CL_SOURCE_REGISTRY="(:source-registry :ignore-inherited-configuration)"
893 -ASDF_OUTPUT_TRANSLATIONS="(:output-translations :ignore-inherited-configuration)"
894 -
895 -usep() {
896 - use ${1} && echo "true" || echo "false"
897 -}
898 -
899 -sbcl_feature() {
900 - echo "$( [[ ${1} == "true" ]] && echo "(enable ${2})" || echo "(disable ${2})")" >> "${CONFIG}"
901 -}
902 -
903 -sbcl_apply_features() {
904 - sed 's/^X//' > "${CONFIG}" <<-'EOF'
905 - (lambda (list)
906 - X (flet ((enable (x) (pushnew x list))
907 - X (disable (x) (setf list (remove x list))))
908 - EOF
909 - if use x86 || use amd64; then
910 - sbcl_feature "$(usep threads)" ":sb-thread"
911 - fi
912 - sbcl_feature "true" ":sb-ldb"
913 - sbcl_feature "false" ":sb-test"
914 - sbcl_feature "$(usep unicode)" ":sb-unicode"
915 - sbcl_feature "$(usep zlib)" ":sb-core-compression"
916 - sbcl_feature "$(usep debug)" ":sb-xref-for-internals"
917 - sed 's/^X//' >> "${CONFIG}" <<-'EOF'
918 - X )
919 - X list)
920 - EOF
921 - cat "${CONFIG}"
922 -}
923 -
924 -src_unpack() {
925 - unpack ${A}
926 - mv sbcl-*-* sbcl-binary || die
927 - cd "${S}"
928 -}
929 -
930 -src_prepare() {
931 - # bug #468482
932 - eapply "${FILESDIR}"/concurrency-test-1.3.15.patch
933 - # bugs #486552, #527666, #517004
934 - eapply "${FILESDIR}"/${PN}-1.4.0-bsd-sockets-test.patch
935 - # bugs #560276, #561018
936 - eapply "${FILESDIR}"/sb-posix-test-1.2.15.patch
937 -
938 - eapply "${FILESDIR}"/${PN}-1.2.11-solaris.patch
939 - eapply "${FILESDIR}"/${PN}-1.4.0-verbose-build.patch
940 -
941 - eapply_user
942 -
943 - # Make sure the *FLAGS variables are sane.
944 - # sbcl needs symbols in resulting binaries, so building with the -s linker flag will fail.
945 - strip-unsupported-flags
946 - filter-flags -fomit-frame-pointer -Wl,-s
947 - filter-ldflags -s
948 -
949 - # original bugs #526194, #620532
950 - # this broke no-pie default builds, c.f. bug #632670
951 - # Pass CFLAGS down by appending our value, to let users override
952 - # the default values.
953 - # Keep passing LDFLAGS down via the LINKFLAGS variable.
954 - sed -e "s@\(CFLAGS += -g .*\)\$@\1 ${CFLAGS}@" \
955 - -e "s@LINKFLAGS += -g\$@LINKFLAGS += ${LDFLAGS}@" \
956 - -i src/runtime/GNUmakefile || die
957 -
958 - sed -e "s@SBCL_PREFIX=\"/usr/local\"@SBCL_PREFIX=\"${EPREFIX}/usr\"@" \
959 - -i make-config.sh || die
960 -
961 - # Use installed ASDF version
962 - cp "${EPREFIX}"/usr/share/common-lisp/source/asdf/build/asdf.lisp contrib/asdf/ || die
963 - # Avoid installation of ASDF info page. See bug #605752
964 - sed '/INFOFILES/s/asdf.info//' -i doc/manual/Makefile || die
965 -
966 - use source && sed 's%"$(BUILD_ROOT)%$(MODULE).lisp "$(BUILD_ROOT)%' -i contrib/vanilla-module.mk
967 -
968 - # Some shells(such as dash) don't have "time" as builtin
969 - # and we don't want to DEPEND on sys-process/time
970 - sed "s,^time ,," -i make.sh || die
971 - sed "s,/lib,/$(get_libdir),g" -i install.sh || die
972 - # #define SBCL_HOME ...
973 - sed "s,/usr/local/lib,${EPREFIX}/usr/$(get_libdir),g" -i src/runtime/runtime.c || die
974 - # change location of /etc/sbclrc ...
975 - sed "s,/etc/sbclrc,${EPREFIX}/etc/sbclrc,g" -i src/code/toplevel.lisp || die
976 -
977 - find . -type f -name .cvsignore -delete
978 -}
979 -
980 -src_configure() {
981 - # customizing SBCL version as per
982 - # http://sbcl.cvs.sourceforge.net/sbcl/sbcl/doc/PACKAGING-SBCL.txt?view=markup
983 - echo -e ";;; Auto-generated by Gentoo\n\"gentoo-${PR}\"" > branch-version.lisp-expr
984 -
985 - # applying customizations
986 - sbcl_apply_features
987 -}
988 -
989 -src_compile() {
990 - local bindir="${WORKDIR}"/sbcl-binary
991 -
992 - if use pax_kernel ; then
993 - # To disable PaX on hardened systems
994 - pax-mark -mr "${bindir}"/src/runtime/sbcl
995 -
996 - # Hack to disable PaX on second GENESIS stage
997 - sed -i -e '/^[ \t]*echo \/\/doing warm init - compilation phase$/a\ paxmark.sh -mr \.\/src\/runtime\/sbcl' \
998 - "${S}"/make-target-2.sh || die "Cannot disable PaX on second GENESIS runtime"
999 - fi
1000 -
1001 - # clear the environment to get rid of non-ASCII strings, see bug #174702
1002 - # set HOME for paludis
1003 - env - HOME="${T}" PATH="${PATH}" \
1004 - CC="$(tc-getCC)" AS="$(tc-getAS)" LD="$(tc-getLD)" \
1005 - CPPFLAGS="${CPPFLAGS}" CFLAGS="${CFLAGS}" ASFLAGS="${ASFLAGS}" LDFLAGS="${LDFLAGS}" \
1006 - GNUMAKE=make ./make.sh \
1007 - "sh ${bindir}/run-sbcl.sh --no-sysinit --no-userinit --disable-debugger" \
1008 - || die "make failed"
1009 -
1010 - # need to set HOME because libpango(used by graphviz) complains about it
1011 - if use doc; then
1012 - env - HOME="${T}" PATH="${PATH}" \
1013 - CL_SOURCE_REGISTRY="(:source-registry :ignore-inherited-configuration)" \
1014 - ASDF_OUTPUT_TRANSLATIONS="(:output-translations :ignore-inherited-configuration)" \
1015 - make -C doc/manual info html || die "Cannot build manual"
1016 - env - HOME="${T}" PATH="${PATH}" \
1017 - CL_SOURCE_REGISTRY="(:source-registry :ignore-inherited-configuration)" \
1018 - ASDF_OUTPUT_TRANSLATIONS="(:output-translations :ignore-inherited-configuration)" \
1019 - make -C doc/internals info html || die "Cannot build internal docs"
1020 - fi
1021 -}
1022 -
1023 -src_test() {
1024 - ewarn "Unfortunately, it is known that some tests fail eg."
1025 - ewarn "run-program.impure.lisp. This is an issue of the upstream's"
1026 - ewarn "development and not of Gentoo's side. Please, before filing"
1027 - ewarn "any bug(s) search for older submissions. Thank you."
1028 - time ( cd tests && sh run-tests.sh )
1029 -}
1030 -
1031 -src_install() {
1032 - # install system-wide initfile
1033 - dodir /etc/
1034 - sed 's/^X//' > "${ED}"/etc/sbclrc <<-EOF
1035 - ;;; The following is required if you want source location functions to
1036 - ;;; work in SLIME, for example.
1037 - X
1038 - (setf (logical-pathname-translations "SYS")
1039 - X '(("SYS:SRC;**;*.*.*" #p"${EPREFIX}/usr/$(get_libdir)/sbcl/src/**/*.*")
1040 - X ("SYS:CONTRIB;**;*.*.*" #p"${EPREFIX}/usr/$(get_libdir)/sbcl/**/*.*")))
1041 - X
1042 - ;;; Setup ASDF2
1043 - (load "${EPREFIX}/etc/common-lisp/gentoo-init.lisp")
1044 - EOF
1045 -
1046 - # Install documentation
1047 - unset SBCL_HOME
1048 - INSTALL_ROOT="${ED}/usr" LIB_DIR="${EPREFIX}/usr/$(get_libdir)" DOC_DIR="${ED}/usr/share/doc/${PF}" \
1049 - sh install.sh || die "install.sh failed"
1050 -
1051 - # bug #517008
1052 - pax-mark -mr "${D}"/usr/bin/sbcl
1053 -
1054 - # rm empty directories lest paludis complain about this
1055 - find "${ED}" -empty -type d -exec rmdir -v {} +
1056 -
1057 - if use doc; then
1058 - dodoc -r doc/internals/sbcl-internals
1059 -
1060 - doinfo doc/manual/*.info*
1061 - doinfo doc/internals/sbcl-internals.info
1062 -
1063 - docinto internals-notes
1064 - dodoc doc/internals-notes/*
1065 - else
1066 - rm -Rv "${ED}/usr/share/doc/${PF}" || die
1067 - fi
1068 -
1069 - # install the SBCL source
1070 - if use source; then
1071 - ./clean.sh
1072 - cp -av src "${ED}/usr/$(get_libdir)/sbcl/" || die
1073 - fi
1074 -
1075 - # necessary for running newly-saved images
1076 - echo "SBCL_HOME=${EPREFIX}/usr/$(get_libdir)/${PN}" > "${ENVD}"
1077 - echo "SBCL_SOURCE_ROOT=${EPREFIX}/usr/$(get_libdir)/${PN}/src" >> "${ENVD}"
1078 - doenvd "${ENVD}"
1079 -}