### Godot version

4.0.3

### System information

Windows10

### Issue description

sky shader accepts uniform vec3, vec4, vec3 array, but not vec4 array

### Steps to reproduce

simply pass Vector4 to uniform vec4[] from gdscript

### Minimal reproduction project

gdscript

sky_material.set_shader_parameter("v3",Vector3(1,0.8,0.5)) - v
sky_material.set_shader_parameter("v4",Vector4(1,0.8,0.5,0.2)) - v
sky_material.set_shader_parameter("v3a",[Vector3(1,0.8,0.5)]) - v
sky_material.set_shader_parameter("v4a",[Vector4(1,0.8,0.5,0.2)]) - x

sky gdshader

uniform vec3 v3;
uniform vec4 v4;
uniform vec3 v3a[1];
uniform vec4 v4a[1];

void sky(){
    COLOR.r = v4a[0].w
}
expr->array_size = constant.array_size;
								expr->array_declarations.push_back(decl);
								constant.initializer = static_cast<ConstantNode *>(expr);
							} else {
#ifdef DEBUG_ENABLED
								if (constant.type == DataType::TYPE_BOOL) {
									keyword_completion_context = CF_BOOLEAN;
								}
#endif 
								
								Node *expr = _parse_and_reduce_expression(nullptr, constants);
								if (!expr) {
									return ERR_PARSE_ERROR;
								}
#ifdef DEBUG_ENABLED
								if (constant.type == DataType::TYPE_BOOL) {
									keyword_completion_context = CF_GLOBAL_SPACE;
								}
#endif 
								if (expr->type == Node::NODE_TYPE_OPERATOR && static_cast<OperatorNode *>(expr)->op == OP_CALL) {
									OperatorNode *op = static_cast<OperatorNode *>(expr);
									for (int i = 1; i < op->arguments.size(); i++) {
										if (!_check_node_constness(op->arguments[i])) {
											_set_error(vformat(RTR("Expected constant expression for argument %d of function call after '='."), i - 1));
											return ERR_PARSE_ERROR;
										}
									}
								}
								constant.initializer = static_cast<ConstantNode *>(expr);
								if (!_compare_datatypes(type, struct_name, 0, expr->get_datatype(), expr->get_datatype_name(), expr->get_array_size())) {