BSTR CMUSHclientDoc::Metaphone(LPCTSTR Word, short Length)
{
// char buf [60];
// metaphone (Word, buf, Length);
MString m (Word, Length);
CString str1, str2;
m.DoubleMetaphone (str1, str2);
CString strResult (str1);
if (!str2.IsEmpty ())
strResult += "," + str2;
return strResult.AllocSysString();
} // end of CMUSHclientDoc::Metaphone
