diff -ru festival.orig/lib/languages.scm festival/lib/languages.scm --- festival.orig/lib/languages.scm 2006-12-19 23:20:40 +0200 +++ festival/lib/languages.scm 2006-12-19 23:26:01 +0200 @@ -56,6 +56,18 @@ (Parameter.set 'Language 'britishenglish) ) +(define (language_russian) +"(language_russian) +Set up language parameters for Russian." + + (if (symbol-bound? 'voice_msu_ru_nsh_cg) (set! female1 voice_msu_ru_nsh_cg)) + (if (symbol-bound? 'voice_msu_ru_nsh_cg) (set! male1 voice_msu_ru_nsh_cg)) + (if (symbol-bound? 'voice_msu_ru_nsh_clunits) (set! female1 voice_msu_ru_nsh_clunits)) + (if (symbol-bound? 'voice_msu_ru_nsh_clunits) (set! male1 voice_msu_ru_nsh_clunits)) + (male1) + (Parameter.set 'Language 'russian) +) + (define (language_italian) "(language_italian) @@ -126,6 +138,8 @@ ((or (equal? language 'britishenglish) (equal? language 'english)) ;; we all know its the *real* English (language_british_english)) + ((equal? language 'russian) + (language_russian)) ((equal? language 'americanenglish) (language_american_english)) ((equal? language 'scotsgaelic)