[Voiceglue] More on UTF-8

emiliano esposito emiespo at tiscali.it
Mon Jan 26 07:32:59 EST 2009


Carlos Alarcón ha scritto:
> I forgot to tell you in previous mail. If I remove the (require 
> 'speech-dispatcher) from festival.scm festival works and starts either 
> as server or in interactive mode.
> When I have (require 'speech-dispatcher) in festival.scm festival 
> stops working and complains about: "SIOD ERROR: unbound variable : 
> token_to_words"
> everytime I call it

 From what I've learnt so far, I suppose it might be due to the active 
voice.

Anyhow, I'm actually working on a SSML -> SABLE wrapper, but I'm waiting 
the new release of Voiceglue for this. Meanwhile, I'll do some 
investigation on original sable-mode.scm in order to convert it to some 
sort of ssml-mode.scm (since the latter one provided by freebsoft has 
prosody and pitch not working).


Back to your issue, the function token_to_words is defined here (file 
cap-signalization.scm):


(define-wrapper (token_to_words token name) cap-signalization
(if cap-signalization-mode
(let ((ttw* (lambda (token name)
(append (if (string-matches name "^[A-Z��������ة���ݮ].*")
;; token_to_words allows only strings and
;; symbols as feature values, so we have to use
;; capital-event, to be transformed later
(list '((name "") (capital-event "")
(event-stick-to next))))
((next-func) token name)))))
(if (string-matches name "^..*[A-Z��������ة���ݮ].*")
(let ((i 1))
(while (not (string-matches (substring name i 1)
"^[A-Z��������ة���ݮ].*"))
(set! i (+ i 1)))
(append (ttw* token (substring name 0 i))
(token_to_words
token
(substring name i (- (length name) i))
(next-func))))
(ttw* token name)))
((next-func) token name)))


At the beginning, it is requiring two other files:

(require 'util)
(require 'oo)

So you could enter Festival in interactive mode, activate backtrace (see 
festival manual), issue "(require 'cap-signalizatio)" and investigate on 
why it's not working.


More information about the Voiceglue mailing list