Ada.Numerics.Long_Real_Arrays

[hnptz@yahoo.de]

Hi,

these are my definitions:

with Ada.Numerics.Long_Real_Arrays; use Ada.Numerics.Long_Real_Arrays;
package nm is

Np : Positive;
Type R_Vector is new Real_Vector (1..Np);
Type R_Matrix is array (Positive range <>) of R_Vector;

procedure nm1 (P : in out R_Matrix);

end nm;

-- definition of procedure nm1 in package body nm done.

now in procedure test_nm.adb (only definitions):

Np : Positive := 2;
Mp : Positive := Np+1;

24  P : R_Matrix(1..Mp) := ((x,x),(y,y),(z,z));

no "build all" error or warning

result when running:

raised CONSTRAINT_ERROR : test_nm.adb: 24 length check failed.

Can you help?