From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,ec7fc30600a974ce
X-Google-Attributes: gid103376,public
From: Gautier <gautier.demontmollin@maths.unine.ch>
Subject: Re: Programming for the World in Ada95
Date: 2000/02/14
Message-ID: <38A860D7.E9A46AA3@maths.unine.ch>#1/1
X-Deja-AN: 585849574
Content-Transfer-Encoding: 7bit
References: <38A83838.44A43A7D@res.raytheon.com>
X-Accept-Language: en
Content-Type: text/plain; charset=us-ascii
X-Trace: 14 Feb 2000 20:07:35 +0100, mac13-32.unine.ch
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Date: 2000-02-14T00:00:00+00:00
List-Id: <comp.lang.ada>

> Is there an easy way to specify message strings at load time, or must
> this be done at compile time?

You can do both with an enumerated type : type language is ( english,... )
For load time, you can have several files with a message per line,
whose names are "msg_file: array( language ) of string( 1..8 ):= ( "engl.msg",...
or use "language'image" for that.
Each message would be indexed by another, (orthogonal:-) enumerated type:
"type message is ( alert_such, warning_bla,... );".
Loading via
"Open(f, msg_file( chosen_language )); for m in message loop Get_Line(f,..."
For compile you could use constant arrays or use case statements for displaying.
Just ideas. A primitive implementation in AD's source
direct: http://members.xoom.com/gdemont/logiciel/ad.zip
page: http://members.xoom.com/gdemont/ad.htm 
HTH
-- 
Gautier