comp.lang.ada
 help / color / mirror / Atom feed
From: Preben Randhol <randhol+valid_for_reply_from_news@pvv.org>
Subject: Re: array of strings in a function
Date: Wed, 15 Oct 2003 12:29:46 +0000 (UTC)
Date: 2003-10-15T12:29:46+00:00	[thread overview]
Message-ID: <slrnboqfdq.n6.randhol+valid_for_reply_from_news@kiuk0152.chembio.ntnu.no> (raw)
In-Reply-To: bmjc7h$per$1@mercurio.cica.es

On 2003-10-15, Antonio Mart�nez �lvarez <amartinez@atc.ugr.es> wrote:
> Hello again. I'm the original poster.
>
> What I want to do is a procedure (sorry, not a function) to do something 
> like this:
>
> my_AND("Entrada_1", "P2", "Output");
>
> and with this argument, this function have to write this:
>
> entity my_AND is port(
>    Entrada_1 	: in std_logic;
>    P2		: in std_logic;
>    Output	: out std:logic;
> );
>
> In general, I don't know the number of string arguments. An these
> strings can be any length. I have tried to do this with unbounded...

So what you are saying is that it could also be:

my_AND("Entrada_1", "P2", "P3", "Output");

which should give:

entity my_AND is port(
   Entrada_1 ���: in std_logic;
   P2�����: in std_logic;
   P3�����: in std_logic;
   Output�: out std:logic;
   );

or am I misundstanding you?

> but without any nice results ...  Maybe I must use access variables,
> like in C. I know how to do this in C, but I'm really interested in do
> this job into Ada95. 

You shouldn't need to use access variables, but I really don't
understand what you are trying to do.


> I'm writting a generator of VHDL (parsing, etc ...).

I don't know, but is this of interest:

   http://www.telepath.com/~dennison/Ted/OpenToken/OpenToken.html

Preben



  reply	other threads:[~2003-10-15 12:29 UTC|newest]

Thread overview: 22+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-10-14 20:54 array of strings in a function Antonio Martínez
2003-10-15  2:55 ` Robert I. Eachus
2003-10-15  3:29   ` Jeff C,
2003-10-15  3:08 ` Jeffrey Carter
2003-10-16  6:40   ` tmoran
2003-10-16  9:31     ` Craig Carey
2003-10-16 18:13       ` Craig Carey
2003-10-16 21:44         ` Marius Amado Alves
2003-10-17 19:48           ` Craig Carey
2003-10-18 10:05             ` Marius Amado Alves
2003-10-18 20:05               ` Craig Carey
2003-10-30  9:42                 ` Craig Carey
2003-10-16 17:58     ` Jeffrey Carter
2003-10-16 20:00       ` tmoran
2003-10-17  0:51         ` Jeffrey Carter
2003-10-15 11:49 ` Antonio Martínez Álvarez
2003-10-15 12:29   ` Preben Randhol [this message]
2003-10-15 14:19   ` Ole-Hjalmar Kristensen
2003-10-16 14:30   ` Robert I. Eachus
2003-10-16 17:53     ` Jeffrey Carter
2003-10-17  0:48       ` Robert I. Eachus
2003-10-17 18:41         ` Jeffrey Carter
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox