Re: A question about v'range...?

[fd@piau ()]

eranshap@netvision.net.il wrote:

: Hi All,

: I have the following program:

: --BEGINNING OF PROGRAM

: with Ada.Text_IO;
: procedure taskmain is
:   NUM_OF_ELEMENTS : constant Integer := 100;
:   NUM_OF_TASKS : constant Integer := 10;
:   
:   type array_type is array (Integer range <>) of Positive;
:   
:   procedure Find_primes (vector : in array_type; num : in Positive) is
:     
:   ......

: --END OF PROGRAM

: And I get this output:

:  1
:  1
:  100
:  2
:  1
:  100
:  3
:  1
:  100
:  4
:  1
: ............

: This means that vector'range inside the task Manage is 1..9, while
: vector'first is 1, and vector'last is 100, as printed.

: I can also add, that when I did the same printing with the taskmain
: procedure, it computed it correctly, i.e. vect'range is 1..100.

: Why does this happen?

: What can I do to correct it?

I think you've got a problem with your Ada developpment system, the code that has been generated looks false, this is not normal. There is no Ada Standard explanation.

--
     \\\|||///     DULUC Franck
   .  =======   
  / \| O   O |     Aerospatiale / IRIT
  \ / \`___'/   
   #   _| |_       franck.duluc@avions.aerospatiale.fr
  (#) (     )
   #\//|* *|\\     Tel: 33 - 05 61 18 19 16 
   #\/(  *  )/
   #   =====       Fax: 33 - 05 61 93 86 04
   #   ( _ )
   #   || ||       316, route de Bayonne. 31060 TOULOUSE Cedex 03
  .#---'| |`----.
  `#----' `-----'  FRANCE