Can't pass a fixed string array to a sub..

[Antoni Gual]

Can't compile this program
It gives an Illegal specification at parameter b in line 2

Code:

#define s7 as string*7
declare sub subru (b() as s7)
dim as s7 a(1)
a(1)="10000  "
subru a()
sleep

sub subru (b() as s7)
print b(1)
end sub

If I declare b() as ant, it gives me a Type mismatch in parameter 1 at the
line where the call is