! 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 ;