Assign values to array

Hello

I have made this simple test function:

declare
t integer[3];
u integer;
begin
u:=t[1];
t[1]:=4;
return 0;
end;

This is the results when i execute it:

apollo3-stat=# select test();
NOTICE: plpgsql: ERROR during compile of test near line 6
ERROR: parse error at or near "["
apollo3-stat=#

This tells me that the assignment to u is ok.
How can i assign something to the t array?

I'm running versjon 7.2.1

afa

-------------------------------------------------------------------
-->> Add WEB ACCESS to your POP email accounts with
-->> FREE Perl CGI scripts! Download today! http://www.adjeweb.com
-------------------------------------------------------------------