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,6426898aedaa5880 X-Google-Attributes: gid103376,public,usenet X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news2.google.com!news2.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!wns13feed!worldnet.att.net!attbi_s21.POSTED!53ab2750!not-for-mail From: "Jeffrey R. Carter" User-Agent: Thunderbird 2.0.0.6 (Windows/20070728) MIME-Version: 1.0 Newsgroups: comp.lang.ada Subject: Re: Pragma for conditional compilation? (Ada 2005 vs. 95) References: <1190879769.361848.188220@22g2000hsm.googlegroups.com> <1190929570.915553.284000@19g2000hsx.googlegroups.com> In-Reply-To: <1190929570.915553.284000@19g2000hsx.googlegroups.com> Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit Message-ID: NNTP-Posting-Host: 12.201.97.213 X-Complaints-To: abuse@mchsi.com X-Trace: attbi_s21 1190955358 12.201.97.213 (Fri, 28 Sep 2007 04:55:58 GMT) NNTP-Posting-Date: Fri, 28 Sep 2007 04:55:58 GMT Organization: AT&T ASP.att.net Date: Fri, 28 Sep 2007 04:55:58 GMT Xref: g2news2.google.com comp.lang.ada:2179 Date: 2007-09-28T04:55:58+00:00 List-Id: Jerry wrote: > >> The third real old way is to code in the option by a "IF-THEN-ELSE-END" >> statements and use a Global constant variable(s). Its low tech but it >> still works. > > OK, but my "problem" is in declaring types which I want to be visible > in 95 but not visible in 05, as 05 provides them itself. An "IF-THEN- > ELSE-END" solution would have to be in the executable part of the > program (right?). Despite the claim, this will not work. You cannot compile Ada-07 code with an Ada-95 compiler. Different bodies for different compilers, selected somehow (project files are a good way with GNAT, as has been suggested) is the best way to address this issue. -- Jeff Carter "This school was here before you came, and it'll be here before you go." Horse Feathers 48