blob: 49fa9503fb7cd11ad90df0d6ab04ed33557f11d8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
# Copyright 1999-2012 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Id$
#
# Author Matthew Kennedy <mkennedy@gentoo.org>
#
# Sundry code common to many Common Lisp related ebuilds.
# Some handy constants
inherit eutils multilib
CLSOURCEROOT=/usr/share/common-lisp/source/
CLSYSTEMROOT=/usr/share/common-lisp/systems/
# Many of our Common Lisp ebuilds are either inspired by, or actually
# use packages and files from the Debian project's archives.
do-debian-credits() {
docinto debian
for i in copyright README.Debian changelog; do
test -f $i && dodoc "${S}"/debian/${i}
done
docinto .
}
# BIG FAT HACK: Since the Portage emerge step kills file timestamp
# information, we need to compensate by ensuring all FASL files are
# more recent than their source files.
# The following `impl-*-timestamp-hack' functions SHOULD NOT be used
# outside of this eclass.
impl-save-timestamp-hack() {
local impl=$1
dodir /usr/share/${impl}
tar cpjf "${D}"/usr/share/${impl}/portage-timestamp-compensate -C "${D}"/usr/$(get_libdir)/${impl} .
}
impl-restore-timestamp-hack() {
local impl=$1
tar xjpfo /usr/share/${impl}/portage-timestamp-compensate -C /usr/$(get_libdir)/${impl}
}
impl-remove-timestamp-hack() {
local impl=$1
rm -rf /usr/$(get_libdir)/${impl} &>/dev/null || true
}
standard-impl-postinst() {
local impl=$1
unregister-common-lisp-implementation cmucl
case ${impl} in
cmucl|sbcl)
impl-restore-timestamp-hack ${impl}
;;
*)
;;
esac
register-common-lisp-implementation ${impl}
}
standard-impl-postrm() {
local impl=$1 impl_binary=$2
if [ ! -x ${impl_binary} ]; then
case ${impl} in
cmucl|sbcl)
impl-remove-timestamp-hack ${impl}
;;
*)
;;
esac
rm -rf /var/cache/common-lisp-controller/*/${impl}
fi
}
# Local Variables: ***
# mode: shell-script ***
# tab-width: 4 ***
# End: ***
|
GitWeb