10 lines
238 B
Factor
10 lines
238 B
Factor
|
! Copyright (C) 2013 John Benediktsson
|
||
|
|
! See http://factorcode.org/license.txt for BSD license
|
||
|
|
|
||
|
|
USING: formatting io.launcher system text-to-speech ;
|
||
|
|
|
||
|
|
IN: text-to-speech.macosx
|
||
|
|
|
||
|
|
M: macosx speak-text
|
||
|
|
"say \"%s\"" sprintf try-process ;
|