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-Thread: 103376,3869f0598191b11d
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news1.google.com!news.glorb.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsread.com!newsstand.newsread.com!POSTED.monger.newsread.com!not-for-mail
Newsgroups: comp.lang.ada
Subject: Re: Porting ADA source
From: "Peter C. Chapin" <pchapin@sover.net>
References: <40FBBB16.8050206@noplace.com> <bGUKc.133469$Oq2.23309@attbi_s52>
Organization: Kelsey Mountain Software
Message-ID: <Xns952C4A50086B7pchapinsovernet@207.106.92.237>
User-Agent: Xnews/5.04.25
Date: Tue, 20 Jul 2004 11:18:13 GMT
NNTP-Posting-Host: 216.114.178.143
X-Complaints-To: Abuse Role <abuse@sover.net>, We Care <abuse@newsread.com>
X-Trace: monger.newsread.com 1090322293 216.114.178.143 (Tue,
 20 Jul 2004 07:18:13 EDT)
NNTP-Posting-Date: Tue, 20 Jul 2004 07:18:13 EDT
Xref: g2news1.google.com comp.lang.ada:2266
Date: 2004-07-20T11:18:13+00:00
List-Id: <comp.lang.ada>

tmoran@acm.org wrote in news:bGUKc.133469$Oq2.23309@attbi_s52:

> #ifdef Alpha
>   Y := Cosine(X);
> #else
>   Y := Cos(X);
> #endif
> 
> vs
>   function Cosine(X : Float) return Float renames Cos;
>   ...
>   Y := Cosine(X); -- original, unchanged, source

I'm new to Ada so forgive me if I'm beating a dead horse here, but I'm not 
sure how this example solves the problem. If the Ada code is compiled in an 
environment where 'Cos' does not exist, won't the renaming declaration cause 
an error?

Peter