acceess problem

["ldries46" <bertus.dries@planet.nl>]

I am converting a C/C++ program with openGL to Ada and found the following 
problem:

C/C++ code: float pAxis1Amb[] = { AxL, 0, 0, 1};
                     glMaterialfv(vSide, GL_AMBIENT, pAxis1Amb);
where         : GLAPI void APIENTRY glMaterialfv( GLenum face, GLenum pname, 
const GLfloat *params );

In the Ada bindings the routine is declared as:
                     procedure glMaterialfv (face   : GLenum; pname  : 
GLenum; params : GLfloatPtr);
where :         type GLfloatPtr is access all GLfloat;
and     :         subtype GLfloat is Float;
I have created the following declarations : Axis1Amb   : array(0..3) of 
GLfloat := ( AxL, 0.0, 0.0, 1.0);
                                                                             
              pAxis1Amb  : GLfloatPtr := Axis1Amb'Access;
Now I get the following error message : prefix of "Access" attribute must be 
aliased
I have to follow the C/C++ code as close as possible.
What do I do wrong?

L. Dries