Message-ID:

AUTHOR FvwmAuto just appeared one day, nobody knows how. -- FvwmAuto(1x)

devel / comp.lang.ada / Re: What I do wrong here?

What I do wrong here?

<837cb29b-77c2-4410-bbbb-05c38051aa6fn@googlegroups.com>

https://www.rocksolidbbs.com/devel/article-flat.php?id=10091&group=comp.lang.ada#10091

X-Received: by 2002:a05:620a:601b:b0:773:a12d:a511 with SMTP id dw27-20020a05620a601b00b00773a12da511mr86526qkb.1.1695363939677;
Thu, 21 Sep 2023 23:25:39 -0700 (PDT)
X-Received: by 2002:a05:6870:7696:b0:1d6:b110:2f1f with SMTP id
dx22-20020a056870769600b001d6b1102f1fmr3024745oab.8.1695363939373; Thu, 21
Sep 2023 23:25:39 -0700 (PDT)
Path: i2pn2.org!i2pn.org!weretis.net!feeder6.news.weretis.net!border-2.nntp.ord.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Thu, 21 Sep 2023 23:25:39 -0700 (PDT)
Injection-Info: google-groups.googlegroups.com; posting-host=84.209.88.37; posting-account=bPTmZAoAAAC_6HP9XLKB9aAAxBa6BuOR
NNTP-Posting-Host: 84.209.88.37
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <837cb29b-77c2-4410-bbbb-05c38051aa6fn@googlegroups.com>
Subject: What I do wrong here?
From: reinkor@gmail.com (reinert)
Injection-Date: Fri, 22 Sep 2023 06:25:39 +0000
Content-Type: text/plain; charset="UTF-8"
Lines: 20

by: reinert - Fri, 22 Sep 2023 06:25 UTC

-- 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

Re: What I do wrong here?

<ef6e9dce-f238-4f41-b5e3-b4048635f5d0n@googlegroups.com>

copy mid

https://www.rocksolidbbs.com/devel/article-flat.php?id=10093&group=comp.lang.ada#10093

copy link Newsgroups: comp.lang.ada

X-Received: by 2002:ac8:73d3:0:b0:417:a501:49e with SMTP id v19-20020ac873d3000000b00417a501049emr42360qtp.4.1695399997236;
Fri, 22 Sep 2023 09:26:37 -0700 (PDT)
X-Received: by 2002:a05:6808:14d4:b0:3ad:f525:52bf with SMTP id
f20-20020a05680814d400b003adf52552bfmr88630oiw.1.1695399997059; Fri, 22 Sep
2023 09:26:37 -0700 (PDT)
Path: i2pn2.org!i2pn.org!paganini.bofh.team!2.eu.feeder.erje.net!feeder.erje.net!newsreader4.netcologne.de!news.netcologne.de!peer01.ams1!peer.ams1.xlned.com!news.xlned.com!peer03.iad!feed-me.highwinds-media.com!news.highwinds-media.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Fri, 22 Sep 2023 09:26:36 -0700 (PDT)
In-Reply-To: <837cb29b-77c2-4410-bbbb-05c38051aa6fn@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=2a00:6020:462f:c400:4da7:6f6:21cb:8147;
posting-account=rmHyLAoAAADSQmMWJF0a_815Fdd96RDf
NNTP-Posting-Host: 2a00:6020:462f:c400:4da7:6f6:21cb:8147
References: <837cb29b-77c2-4410-bbbb-05c38051aa6fn@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <ef6e9dce-f238-4f41-b5e3-b4048635f5d0n@googlegroups.com>
Subject: Re: What I do wrong here?
From: christ-usch.grein@t-online.de (AdaMagica)
Injection-Date: Fri, 22 Sep 2023 16:26:37 +0000
Content-Type: text/plain; charset="UTF-8"
X-Received-Bytes: 1356

by: AdaMagica - Fri, 22 Sep 2023 16:26 UTC

Subject	Author
What I do wrong here?	reinert
Re: What I do wrong here?	AdaMagica