420
420
;; will be set automatically on start-up
421
421
(defvar libdir '<automatically_set>
423
The pathname of the run-time libary directory. Note reseting is
424
almost definitely not what you want to do. This value is automatically
425
set at start up from the value specifed at compile-time or the value
426
specifed with --libdir on the command line. A number of other variables
427
depend on this value.")
429
(defvar load-path (list libdir)
423
The pathname of the architecture-dependent run-time libary directory.
424
Note reseting is almost definitely not what you want to do. This
425
value is automatically set at start up from the value specifed at
426
compile-time or the value specifed with --libdir on the command line.
427
A number of other variables depend on this value.")
429
(defvar datadir '<automatically_set>
431
The pathname of the architecture-independent run-time libary
432
directory. Note reseting is almost definitely not what you want to
433
do. This value is automatically set at start up from the value
434
specifed at compile-time or the value specifed with --datadir on the
435
command line. A number of other variables depend on this value.")
437
(defvar load-path (list datadir)
431
439
A list of directories containing .scm files. Used for various functions
432
440
such as load_library and require. Follows the same use as EMACS. By
433
default it is set up to the compile-time library directory but may be
434
changed by the user at run time, by adding a user's own library directory
435
or even replacing all of the standard library. [see Site initialization]")
441
default it is set up to the compile-time architecture-independent
442
library directory but may be changed by the user at run time, by
443
adding a user's own library directory or even replacing all of the
444
standard library. [see Site initialization]")
437
446
;; will be set automatically on start-up
438
447
(defvar *ostype* 'unknown
441
450
on, e.g. SunOS5, FreeBSD, linux etc. The value is taken from the Makefile
442
451
variable OSTYPE at compile time.")
444
(defvar etc-path (path-append libdir "etc/" *ostype*)
446
A list of directories where binaries specific to Festival may be located.
447
This variable is automatically set to LIBDIR/etc/OSTYPE/
448
and that path is added to the end of the UNIX PATH environment variable.")
450
453
(define (library_expand_filename fname)
451
454
"(library_expand_filename FILENAME)
452
455
Search for filename by appending FILENAME to each member of load-path.