baa7f65af0f56db1266f434714d83239c63e863c
[sbcl.git] / doc / manual / make-tempfiles.sh
1 #!/bin/sh
2
3 # Create Texinfo snippets from the documentation of exported symbols.
4 # Also create contrib-docs.texi-temp to include documentation in contrib/.
5
6 # This software is part of the SBCL system. See the README file for
7 # more information.
8 #
9 # This software is in the public domain and is provided with
10 # absolutely no warranty. See the COPYING and CREDITS files for
11 # more information.
12
13 # how we invoke SBCL
14
15 # We create the documentation from the in-tree sbcl if it is found,
16 # else an installed sbcl is used.
17 sbclsystem=`pwd`/../../src/runtime/sbcl
18 sbclcore=`pwd`/../../output/sbcl.core
19 if [ -e $sbclsystem ] && [ -e $sbclcore ] 
20 then
21     SBCLRUNTIME="${1:-$sbclsystem --core $sbclcore}"
22     export SBCL_HOME=`pwd`/../../contrib
23 else
24     SBCLRUNTIME="${1:-`which sbcl`}"
25 fi
26
27 SBCL="$SBCLRUNTIME --noinform --sysinit /dev/null --userinit /dev/null --noprint --disable-debugger"
28
29 # Output directory.  This has to end with a slash (it's interpreted by
30 # Lisp's `pathname' function) or you lose.  This is normally set from
31 # Makefile.
32 DOCSTRINGDIR="${DOCSTRINGDIR:-docstrings/}"
33
34 # List of contrib modules that docstring docs will be created for.
35 # This is normally set from Makefile.
36 #MODULES="${MODULES:-sb-md5 :sb-rotate-byte}"
37
38 # List of package names that documentation will be created for.  This
39 # is normally set from Makefile.
40 #PACKAGES="${PACKAGES:-:COMMON-LISP :SB-ALIEN :SB-DEBUG :SB-EXT :SB-GRAY :SB-MOP :SB-PROFILE :SB-THREAD}"
41
42 echo /creating docstring snippets from SBCL=\'$SBCLRUNTIME\' for packages \'$PACKAGES\'
43 echo "(progn (load \"docstrings.lisp\") (dolist (module (quote ($MODULES))) (require module)) (docstrings-to-texinfo \"$DOCSTRINGDIR\" $PACKAGES) (sb-ext:quit))" | $SBCL
44
45 echo /creating contrib-docs.texi-temp
46 echo "(load \"create-contrib-doc-list.lisp\")" | $SBCL
47
48 echo /creating package-locks.texi-temp
49 if $SBCL --eval "(let ((plp (find-symbol \"PACKAGE-LOCKED-P\" :sb-ext))) (quit :unix-status (if (and plp (fboundp plp)) 0 1)))";
50 then
51     cp package-locks-extended.texinfo package-locks.texi-temp
52 else
53     cp package-locks-basic.texinfo package-locks.texi-temp
54 fi