beginners question about freebasic

[beee]

When i try to compile the following freebasic code to compile i get an error message : 'expected end function, found ('.
I have no clue what i'm doing wrong. Can someone please help me? thanks in advance

--------------------------

dim tmp%(1 to 100)

Function test(p1 AS INTEGER) AS INTEGER

test = tmp%(p1)

END FUNCTION

------------------------

[red_Marvin]

Top of the head: does it make any difference if you change
dim to dim shared?

[beee]

That did it !

Thanks

[thegrogen]

I've never seen dim ... (1 to n) before. Dynamic arrays?

[Z!re]

Code:

Dim array(x TO y) as some_type

Where x is any number, and y is any number greater than x.

It defines the starting point of the array.
So, the first element in the array would be x, the last would be y

Normaly, you ignore the x argument, and only pass y.
And thus get an array dimensioned 0 to y, which is the fastest and most efficient way to do it.