*current_language->string_char_type,
string_char_type,
create_string_type (struct type *result_type, struct type *range_type){  result_type = create_array_type (result_type,				   *current_language->string_char_type,				   range_type);  TYPE_CODE (result_type) = TYPE_CODE_STRING;  return (result_type);}