ALT Linux repos
S: | 2.5-alt0.4 |
5.0: | 1.96-alt6 |
4.1: | 1.96-alt5.M41.1 |
4.0: | 1.96-alt2.6 |
3.0: | |
+backports: | 1.96-alt0.M30.1 |
Other repositories
Upstream: | 1.96-beta |
Group :: Sound
RPM: festival
Main Changelog Spec Patches Sources Download Gear Bugs and FR Repocop
Patch: festival_1.4.3-languages-it-fi.diff
Download
Download
--- festival-1.4.3.orig/lib/languages.scm
+++ festival-1.4.3/lib/languages.scm
@@ -56,6 +56,20 @@
(Parameter.set 'Language 'britishenglish)
)
+
+(define (language_italian)
+"(language_italian)
+Set up language parameters for Italian."
+
+ (if (symbol-bound? 'voice_lp_diphone)
+ (set! female1 voice_lp_diphone))
+ (set! male1 voice_pc_diphone)
+
+ (male1)
+ (Parameter.set 'Language 'italian)
+)
+
+
(define (language_american_english)
"(language_american_english)
Set up language parameters for Aemerican English."
@@ -68,6 +82,17 @@
(Parameter.set 'Language 'americanenglish)
)
+(define (language_finnish)
+"(language_finnish)
+Set up language parameters for Finnish."
+ (if (symbol-bound? 'voice_suo_lj_diphone)
+ (set! female1 voice_suo_lj_diphone))
+ (set! male1 voice_hy_fi_mv_diphone)
+
+ (male1)
+ (Parameter.set 'Language 'finnish)
+)
+
(define (language_scots_gaelic)
"(language_scots_gaelic)
Set up language parameters for Scots Gaelic."
@@ -107,8 +132,12 @@
(language_scots_gaelic))
((equal? language 'welsh)
(language_welsh))
+ ((equal? language 'italian)
+ (language_italian))
((equal? language 'spanish)
(language_castillian_spanish))
+ ((equal? language 'finnish)
+ (language_finnish))
((equal? language 'klingon)
(language_klingon))
(t
--- festival/src/main/festival_main.cc 2006-10-11 22:54:22 +0300
+++ festival/src/main/festival_main.cc 2006-10-11 22:56:25 +0300
@@ -89,7 +89,7 @@
" are printed (default if stdin not a tty)\n"+
"--language <string>\n"+
" Run in named language, default is\n"+
- " english, spanish and welsh are available\n"+
+ " english; russian, spanish, welsh, italian and finnish are available\n"+
"--server Run in server mode waiting for clients\n"+
" of server_port (1314)\n"+
"--script <ifile>\n"+