195     char   *symbol;  in create_symbol_string()  local
205     symbol = StrDup(symbol_format);  in create_symbol_string()
206     for (i = 0; symbol[i] != '\0'; i++)  in create_symbol_string()
208         if (symbol[i] == '%')  in create_symbol_string()
210             switch (symbol[i + 1])  in create_symbol_string()
213                 i = replace_word(&symbol, i, 2, file_base);  in create_symbol_string()
217                 i = replace_word(&symbol, i, 2, file_ext);  in create_symbol_string()
222                 i = replace_word(&symbol, i, 2, file_base);  in create_symbol_string()
223                 i = replace_word(&symbol, i, 0, ".");  in create_symbol_string()
224                 i = replace_word(&symbol, i, 0, file_ext);  in create_symbol_string()
231     for (i = 0; symbol[i] != '\0'; i++)  in create_symbol_string()
233         if (!isalnum(symbol[i]) && symbol[i] != '_')  in create_symbol_string()
235             symbol[i] = '_';  in create_symbol_string()
238     if (isdigit(symbol[i]))  in create_symbol_string()
240         symbol[i] = '_';               // First character cannot be a numeral, either  in create_symbol_string()
246     return symbol;  in create_symbol_string()