1. Forum
  2. Usenet
  3. COMP.LANG.ADA

  • What I do wrong here?

    From reinert@21:1/5 to All on Thu Sep 21 23:25:39 2023
    -- Assume the following ordered_map:

    package n_cells1_p is new ada.containers.ordered_maps
    (key_type => celltype1_t, element_type => Natural);
    use n_cells1_p;
    n_cells1 : n_cells1_p.map;

    -- This statemanet is OK according to latest gnat (latest alire release):
    n_cells1(cells1(e.id).type1) := n_cells1(cells1(e.id).type1) + 1;

    -- But the compiler does not like this:
    n_cells1(cells1(e.id).type1) := @ + 1;

    (giving messages:
    error: expected type universal integer
    error: found private type "Ada.Containers.Ordered_Maps.Reference_Type" ...

    OK, I can live with the first alternative, but I would like to know...

    reinert

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From AdaMagica@21:1/5 to All on Fri Sep 22 09:26:36 2023
    Look like a compiler error. Note that @ is brand new, and your left-hand side is quite complicated..

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)