comp.lang.ada
 help / color / mirror / Atom feed
From: Samuel Tardieu <sam@inf.enst.fr>
To: pascal.obry@der.edfgdf.fr (Pascal Obry)
Subject: Re: Question about constants initialisation
Date: 1996/04/24
Date: 1996-04-24T00:00:00+00:00	[thread overview]
Message-ID: <qw6lojlbq5b.fsf@gargantua.enst.fr> (raw)
In-Reply-To: 4ll9vt$h70@cf01

>>>>> "Pascal" == Pascal Obry <pascal.obry@der.edfgdf.fr> writes:

Pascal> I was wondering how to initialize the constant Null_Azerty in
Pascal> the following piece of code.

The following piece of code:

with Ada.Strings.Unbounded;
package Ess is
   use Ada.Strings.Unbounded;
   type Azerty is private;
   Null_Azerty : constant Azerty;
private
   type Azerty is new Unbounded_String;
   Null_Azerty : constant Azerty := Azerty (Null_Unbounded_String);
end Ess;

works well with GNAT 3.03:

% gcc -c -gnatv ess.ads

GNAT Compiler Version 3.03 Copyright 1995 Free Software Foundation, Inc.

Compiling: ess.ads (source file time stamp: 1996-04-24 15:23:29)
 9 lines: No errors

   Sam
-- 
"La cervelle des petits enfants, ca doit avoir comme un petit gout de noisette"
                                                       Charles Baudelaire




  reply	other threads:[~1996-04-24  0:00 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1996-04-24  0:00 Question about constants initialisation Pascal Obry
1996-04-24  0:00 ` Samuel Tardieu [this message]
1996-04-25  0:00   ` Pascal Obry
replies disabled

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