### Godot version

v4.0.2.stable.official [7a0977ce2]

### System information

GNU/Linux, GLES3 & Vulkan, Intel UHD 770

### Issue description

When passing arrays of color objects to the shader, the shader program cannot get the values, even when converted to vector arrays.

And source_color hint does not convert colors correctly when passed through an array.

```
var colors := [
	Color.hex(0x0088ffff),
	Color.hex(0xff000088),
	Color.hex(0x00ff0000),
	Color.hex(0x0000ffff),
]
func _ready() -> void:
	var shader: ShaderMaterial = mesh.material
	shader.set_shader_parameter("vec4_no_hint", colors)
	shader.set_shader_parameter("vec4_hint", colors)
	shader.set_shader_parameter("vec3_no_hint", colors)
	shader.set_shader_parameter("vec3_hint", colors)
	var cvt_colors = colors.map(func (c): return Vector4(c.r, c.g, c.b, c.a))
	shader.set_shader_parameter("cvt_vec4_no_hint", cvt_colors)
	shader.set_shader_parameter("cvt_vec4_hint", cvt_colors)
	shader.set_shader_parameter("cvt_vec3_no_hint", cvt_colors)
	shader.set_shader_parameter("cvt_vec3_hint", cvt_colors)
```

Result With GLES3:
![图片](https://user-images.githubusercontent.com/20413045/232321140-3118a776-e76e-4e73-954f-c7b4f155d1ec.png)

Result With Vulkan:
![图片](https://user-images.githubusercontent.com/20413045/232321207-d52cb2e5-c644-40a8-89ee-71da8b58e408.png)


### Steps to reproduce

Open the sample project attached, open the test scene, switch to the 3D tab, you will see it.

### Minimal reproduction project

[test-color-uniform-array.tar.gz](https://github.com/godotengine/godot/files/11242561/test-color-uniform-array.tar.gz)

if (include_positions.size() == 1) {
						return _make_token(TK_ERROR, "Invalid include exit hint @@< without matching enter hint.");
					}
					char_idx += 2;
					include_positions.resize(include_positions.size() - 1); 
					tk_line = include_positions[include_positions.size() - 1].line - 1; 
				} else {
					return _make_token(TK_ERROR, "Invalid include enter/exit hint token (@@> and @@<)");
				}
			} break;
			default: {
				char_idx--; 
				if (is_digit(GETCHAR(0)) || (GETCHAR(0) == '.' && is_digit(GETCHAR(1)))) {
					
					bool hexa_found = false;
					bool period_found = false;
					bool exponent_found = false;
					bool float_suffix_found = false;
					bool uint_suffix_found = false;
					bool end_suffix_found = false;
					enum {
						CASE_ALL,
						CASE_HEXA_PERIOD,
						CASE_EXPONENT,
						CASE_SIGN_AFTER_EXPONENT,
						CASE_NONE,
						CASE_MAX,
					} lut_case = CASE_ALL;
					static bool suffix_lut[CASE_MAX][127];
					if (!is_const_suffix_lut_initialized) {