3 |
# |
# |
4 |
# You need to be in top-level guile-core build dir. |
# You need to be in top-level guile-core build dir. |
5 |
# You need to build guile first! |
# You need to build guile first! |
6 |
|
# |
7 |
|
# Env var: GUILE_MAINTAINER_SCRIPTS |
8 |
|
|
9 |
|
mscripts=${GUILE_MAINTAINER_SCRIPTS-../scripts} |
10 |
|
|
11 |
me=`basename $0` |
me=`basename $0` |
12 |
|
|
20 |
eval $set_top_srcdir |
eval $set_top_srcdir |
21 |
srcdir=$top_srcdir |
srcdir=$top_srcdir |
22 |
|
|
23 |
scan=${srcdir}/../scripts/scan-api |
scan=$mscripts/scan-api |
24 |
|
|
25 |
if [ ! -x $scan ] ; then |
if [ ! -x $scan ] ; then |
26 |
echo ${me}: ERROR: could not find $scan |
echo ${me}: ERROR: could not find $scan |
31 |
alist=guile-api.alist |
alist=guile-api.alist |
32 |
|
|
33 |
set -ex |
set -ex |
34 |
( cd $alistdir ; cvs edit $alist ) |
: |
35 |
$scan pre-inst-guile libguile/.libs/libguile.so.[0-9]*.* > $alistdir/$alist |
: checkout |
36 |
( cd $alistdir ; cvs ci -m 'Update.' $alist ) |
: |
37 |
|
( cd $alistdir ; cvs edit $alist ) |
38 |
|
: |
39 |
|
: munge |
40 |
|
: |
41 |
|
$scan pre-inst-guile \ |
42 |
|
libguile/.libs/libguile.so.[0-9]*.* \ |
43 |
|
$srcdir/doc/groupings.alist \ |
44 |
|
> $alistdir/$alist |
45 |
|
: |
46 |
|
: commit |
47 |
|
: |
48 |
|
( cd $alistdir ; cvs ci -m 'Update.' $alist ) |
49 |
|
: |
50 |
|
: done |
51 |
|
: |
52 |
|
|
53 |
|
# projects come and projects go |
54 |
|
# crystal thoughts running like melted snow |
55 |
|
# entropy wins but heat death is distant |
56 |
|
# self-awareness now for futures reminiscent |
57 |
|
# my love lies whispering in the fresh spring fields |
58 |
|
|
59 |
# update-guile-api.alist ends here |
# update-guile-api.alist ends here |