blob: 8b8c760b21c659da8aebb2ea177883fba7f46c67 (
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
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
|
# Copyright 1999-2008 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2
# $Header: $
inherit eutils
DESCRIPTION="Larceny is a Scheme Interpreter and a Scheme to IA32 and C Compiler"
LARCENY_SOURCE=larceny-${PV}-src
LARCENY_X86_PETIT_BINARY=larceny-${PV}-bin-petit-stdc-linux86
SRC_URI="!binary? ( http://www.ccs.neu.edu/home/will/Larceny/LarcenyReleases/${LARCENY_SOURCE}.tar.gz )
x86? ( binary? ( http://www.ccs.neu.edu/home/will/Larceny/LarcenyReleases/${LARCENY_X86_PETIT_BINARY}.tar.gz ) )"
HOMEPAGE="http://www.ccs.neu.edu/home/will/Larceny/"
LICENSE="Larceny"
SLOT="0"
KEYWORDS="~x86 ~amd64"
IUSE="binary doc examples"
RDEPEND="!dev-scheme/larceny"
DEPEND="${RDEPEND}
dev-lang/nasm
doc? ( app-text/asciidoc )"
if ! use binary; then
MY_P=${LARCENY_SOURCE}
else
MY_P=${LARCENY_X86_PETIT_BINARY}
fi
S="${WORKDIR}"/${MY_P}
# BIG FAT HACK TAKE 2:
# We need a customized version of the timestamp hack from
# common-lisp-common-3.eclass for larceny.
larceny-save-timestamp-hack() {
tar cpjf "${D}"/usr/share/larceny-petit/portage-timestamp-compensate -C "${D}"/usr/share/larceny-petit lib || \
die "Failed to create the timestamp hack"
}
larceny-restore-timestamp-hack() {
tar xjpfo "${ROOT}"/usr/share/larceny-petit/portage-timestamp-compensate -C "${ROOT}"/usr/share/larceny-petit || \
die "Failed to restore the timestamp hack"
}
larceny-remove-timestamp-hack() {
[[ -d "${ROOT}"/usr/share/larceny-petit/lib ]] || return 0
rm -rf "${ROOT}"/usr/share/larceny-petit/lib &>/dev/null || true
}
pkg_setup() {
if ! use binary; then
if [[ -n ${FORCE_IMPL} ]]; then
einfo "Forcing on bootstrap with ${FORCE_IMPL}"
LARCENY_BOOTSTRAP=${FORCE_IMPL}
#elif has_version '>=dev-scheme/larceny-0.95'; then
#einfo "Will bootstrap using installed larceny."
#LARCENY_BOOTSTRAP=larceny
elif has_version '>=dev-scheme/larceny-petit-0.95'; then
einfo "Will bootstrap using installed larceny-petit."
LARCENY_BOOTSTRAP=petite
elif has_version '>=dev-scheme/drscheme-370'; then
einfo "Will bootstrap using PLT mzscheme."
LARCENY_BOOTSTRAP=mzscheme
else
eerror "You need >=larceny-petit-0.95 or >=drscheme-370"
eerror "to compile larceny from source."
die "please install larceny-petit binary or drscheme"
fi
fi
}
src_unpack() {
unpack ${A}
cd "${S}"
if ! use binary; then
# fix PIC / STACK problems
epatch "${FILESDIR}"/${P}-textrelfix.patch
epatch "${FILESDIR}"/${P}-stackfix.patch
fi
}
src_compile() {
if ! use binary; then
# stays a little more readable like this, yea? :)
cat > setupscript <<EOF
(setup 'scheme: '${LARCENY_BOOTSTRAP}
'host: 'linux86)
(build-config-files)
(load-compiler)
(build-heap)
(build-runtime)
(build-executable)
(build-larceny-files)
(build-twobit)
(exit)
EOF
case ${LARCENY_BOOTSTRAP} in
larceny|petite)
cat setupscript | larceny -- setup.sch || \
die "Compilation with native host failed"
;;
mzscheme)
cat setupscript | mzscheme -f setup.sch || \
die "Compilation with mzscheme host failed"
;;
esac
echo "(exit)" | ./petit-larceny.bin -stopcopy -- src/Build/petit-larceny-heap.sch || \
die "Compilation of petit larceny heap failed"
echo "(exit)" | ./twobit.bin -stopcopy -- src/Build/petit-twobit-heap.sch || \
die "Compilation of petit twobit heap failed"
fi
# for petit, R6RS runtime has to be built even with the binary.
pushd lib/R6RS
echo "(require 'r6rsmode)
(larceny:compile-r6rs-runtime)
(exit)" | ../../larceny || die "Compilation of R6RS libraries failed"
popd
if use doc; then
pushd doc
emake user-manual.chunked/index.html || die "Making user manual failed"
emake larceny-notes.chunked/index.html || die "Making implementation notes failed"
popd
fi
}
src_install() {
dodoc README-FIRST.txt doc/HOWTO-* || die "Installing docs failed"
LARCENY_LOCATION="/usr/share/larceny-petit"
dodir ${LARCENY_LOCATION}
# use cp -a here to preserve the timestamps of the .fasl files in
# this step of the installation.
cp -af larceny \
scheme-script \
startup.sch \
compile-stale \
*.bin \
*.heap \
lib \
include \
"${D}"/${LARCENY_LOCATION} || \
die "Installing larceny base files failed"
# the binary sometimes has misterious mtime issues.
if use binary; then
find "${D}"/${LARCENY_LOCATION}/lib -name '*.so' -exec touch '{}' +
fi
# sed the scripts with the correct location so they can be symlinked
dosed "s:# LARCENY_ROOT=/usr/local/lib/larceny:LARCENY_ROOT=${ROOT}/${LARCENY_LOCATION}:" \
"${ROOT}"/${LARCENY_LOCATION}/larceny || die "dosed larceny failed"
dosed "s:# LARCENY_ROOT=/usr/local/lib/larceny:LARCENY_ROOT=${ROOT}/${LARCENY_LOCATION}:" \
"${ROOT}"/${LARCENY_LOCATION}/scheme-script || die "dosed scheme-script failed"
LARCENY_SYMLINKS="gdb-larceny larceny larceny-np petit twobit"
# now we can symlink them to /usr/bin
dodir /usr/bin
for link in ${LARCENY_SYMLINKS}; do
dosym "${ROOT}"/${LARCENY_LOCATION}/larceny "${ROOT}"/usr/bin/${link} || \
die "dosym larceny->${link} failed"
done
# this wil probably need to die when we get an eselect module for scheme-script
dosym "${ROOT}"/${LARCENY_LOCATION}/scheme-script "${ROOT}"/usr/bin/scheme-script || \
die "dosym for scheme-script->scheme-script failed"
if use examples; then
cp -af examples "${D}"/${LARCENY_LOCATION} || die "Installing examples failed."
fi
if use doc; then
cd "${S}"/doc
docinto LarcenyNotes
dodoc ./LarcenyNotes/* || die "Installing doc/LarcenyNotes failed"
docinto LarcenyNotes/html
dodoc ./larceny-notes.chunked/* || die "Installing doc/LarcenyNotes/html failed"
docinto UserManual
dodoc ./UserManual/* || die "Installing doc/UserManual failed"
docinto UserManual/html
dodoc ./user-manual.chunked/* || die "Installing doc/UserManual/html failed"
docinto DevManual
dodoc ./DevManual/* || die "Installing doc/Devmanual failed"
docinto OldDocs
dodoc ./OldDocs/* || die "Installing doc/OldDocs failed"
cd "${S}"
fi
larceny-save-timestamp-hack
}
pkg_postinst() {
larceny-restore-timestamp-hack
}
pkg_prerm() {
larceny-remove-timestamp-hack
}
|
GitWeb