/[guile]/guile/guile-scripts/update-guile-api.alist
ViewVC logotype

Diff of /guile/guile-scripts/update-guile-api.alist

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by ttn, Wed May 8 13:14:45 2002 UTC revision 1.6 by ttn, Wed May 8 21:05:05 2002 UTC
# Line 1  Line 1 
1  #!/bin/sh  #!/bin/sh
2  # Usage: update-guile-api.alist  # Usage: update-guile-api.alist [-n]
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    # Flag "-n" (no-commit) means print the guile-api.alist to stdout
8    # and skip the cvs edit and cvs commit steps.
9    #
10  # Env var: GUILE_MAINTAINER_SCRIPTS  # Env var: GUILE_MAINTAINER_SCRIPTS
11    
12  mscripts=${GUILE_MAINTAINER_SCRIPTS-../scripts}  mscripts=${GUILE_MAINTAINER_SCRIPTS-../scripts}
# Line 30  fi Line 33  fi
33  alistdir=${srcdir}/doc  alistdir=${srcdir}/doc
34  alist=guile-api.alist  alist=guile-api.alist
35    
36    do_the_scan ()
37    {
38    $scan pre-inst-guile \
39        libguile/.libs/libguile.so.[0-9]*.* \
40        $srcdir/doc/groupings.alist
41    }
42    
43    if [ x"$1" = x-n ] ; then
44        do_the_scan
45        exit $?
46    fi
47    
48  set -ex  set -ex
49  :  :
50  : checkout  : checkout
# Line 38  set -ex Line 53  set -ex
53  :  :
54  : munge  : munge
55  :  :
56    $scan pre-inst-guile \    do_the_scan > $alistdir/$alist
         libguile/.libs/libguile.so.[0-9]*.* \  
         $srcdir/doc/groupings.alist \  
       > $alistdir/$alist  
57  :  :
58  : commit  : commit
59  :  :

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26