create_string_type (result_type, range_type) struct type *result_type; struct type *range_type;
create_string_type (struct type *result_type, struct type *range_type)
create_string_type (result_type, range_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);}