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.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,fd63afa4dc364b7e
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-03-22 13:17:42 PST
Path: 
 supernews.google.com!sn-xit-02!supernews.com!news.tele.dk!193.190.198.17!newsfeeds.belnet.be!news.belnet.be!btnet-peer1!btnet-feed5!btnet!mendelevium.btinternet.com!not-for-mail
From: "singlespeeder" <singlespeeder@32sixteen.com>
Newsgroups: comp.lang.ada
Subject: Re: Implementing C/C++ style #include...
Date: Thu, 22 Mar 2001 21:15:36 -0000
Organization: BT Internet
Message-ID: <99dpom$169$1@neptunium.btinternet.com>
References: <98m938$2iod0$1@ID-25716.news.dfncis.de>
 <OrZxgIisAHA.289@cpmsnbbsa09> <3ab9f314.13778993@news.geccs.gecm.com>
 <99d2ao$ecu$1@nh.pace.co.uk>
NNTP-Posting-Host: host213-122-19-40.btinternet.com
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4029.2901
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4029.2901
Xref: supernews.google.com comp.lang.ada:6010
Date: 2001-03-22T21:15:36+00:00
List-Id: <comp.lang.ada>

I use a Trace package with two bodies, one which contains null stubs. Then
use the make script to select the right body to load into the Ada library
before compiling. Calls to the trace package don't have to be wrapped in
if-then-else's

with Trace;
...
Trace.Log_Line ("some text to log to file")
...

Nick