91
91
for (i=0; i<n; tm_char_forwards (s, i))
92
92
if ((!is_iso_alpha (s[i])) && (s[i]!=' ')) break;
93
93
if (i<n) return translate (s (0, i)) * translate (s (i, n));
96
96
if (i>0) return s (0, i) * translate (s (i, n));
98
98
if (i<n) return translate (s (0, i)) * s (i, n);
100
100
bool flag= is_upcase (s[0]);