~ubuntu-branches/ubuntu/jaunty/speech-tools/jaunty

« back to all changes in this revision

Viewing changes to lib/siod/siod.scm

  • Committer: Bazaar Package Importer
  • Author(s): Matthias Urlichs
  • Date: 2004-07-16 09:25:39 UTC
  • mfrom: (2.1.1 warty)
  • Revision ID: james.westby@ubuntu.com-20040716092539-5p1tzif55b8j924e
Tags: 1:1.2.3-8
Added alaw processing code.

Show diffs side-by-side

added added

removed removed

Lines of Context:
420
420
;; will be set automatically on start-up
421
421
(defvar libdir '<automatically_set>
422
422
  "libdir
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.")
428
 
 
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.")
 
428
 
 
429
(defvar datadir '<automatically_set>
 
430
  "datadir
 
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.")
 
436
 
 
437
(defvar load-path (list datadir)
430
438
  "load-path
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]")
436
445
 
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.")
443
452
 
444
 
(defvar etc-path (path-append libdir "etc/" *ostype*)
445
 
  "etc-path
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.")
449
 
 
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.