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,be23df8e7e275d73
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-07-23 06:03:51 PST
Path: 
 archiver1.google.com!newsfeed.google.com!newsfeed.stanford.edu!nntp.cs.ubc.ca!newsfeed.direct.ca!look.ca!hammer.uoregon.edu!skates!not-for-mail
From: Stephen Leake <stephen.a.leake.1@gsfc.nasa.gov>
Newsgroups: comp.lang.ada
Subject: Re: emacs Else and ada-mode
Date: 23 Jul 2001 09:00:11 -0400
Organization: NASA Goddard Space Flight Center
Message-ID: <uae1v242s.fsf_-_@gsfc.nasa.gov>
References: <mailman.994732330.19029.comp.lang.ada@ada.eu.org>
 <mailman.994781951.32588.comp.lang.ada@ada.eu.org>
 <0zS27.187213$DG1.31590366@news1.rdc1.mi.home.com>
 <dKZ27.26879$B56.4674508@news2-win.server.ntlworld.com>
 <3B4C65F5.B304D12A@earthlink.net>
 <pK_27.27350$B56.4717960@news2-win.server.ntlworld.com>
 <9ihvff$l7i$1@nh.pace.co.uk> <XN037.15614$Kf3.190690@www.newsranger.com>
 <9ikprr$fku$1@bob.news.rcn.net> <Cym37.16986$Kf3.220382@www.newsranger.com>
 <un164o8w6.fsf@gsfc.nasa.gov> <cnX47.22238$Kf3.282845@www.newsranger.com>
 <uk8169hkf.fsf@gsfc.nasa.gov> <tBm57.24076$Kf3.326822@www.newsranger.com>
 <u4rs7k5v9.fsf@gsfc.nasa.gov> <TtY57.944$ar1.4224@www.newsranger.com>
NNTP-Posting-Host: anarres.gsfc.nasa.gov
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: skates.gsfc.nasa.gov 995894253 6374 128.183.220.71 (23 Jul 2001
 13:17:33 GMT)
X-Complaints-To: dscoggin@cne-odin.gsfc.nasa.gov
NNTP-Posting-Date: 23 Jul 2001 13:17:33 GMT
User-Agent: Gnus/5.0808 (Gnus v5.8.8) Emacs/20.6
Xref: archiver1.google.com comp.lang.ada:10471
Date: 2001-07-23T13:17:33+00:00
List-Id: <comp.lang.ada>

Ted Dennison<dennison@telepath.com> writes:

> >if {conditional} then
> 
> Well...I'm all over that like ugly on an ape then. :-) 
> 
> I really became enamored of LSE templates while I was doing VMS work. The nifty
> thing is that you can go in and modify the templates so that it automaticly adds
> the appropriate file and subprogram headers that your current project's coding
> standards require. That saves *so* much typing (even if most of is was
> cut-and-paste).
> 
> Hmmm. I wonder how much work it would be to integrate with Ada-mode's auto
> package body stub creation....

Not hard, unless you are using gnatstub to do the bodies. Just rewrite
ada-gen-treat-proc, and put in the placeholders you want. They are
just text strings; no properties or anything.

Changing gnatstub is also possible, since you have the source. But I
haven't looked at it. One stated requirement on the current gnatstub
is that the generated code actually compile; adding templates would
make it not compile. 

DEC Ada had a flag that said "recognize templates, and treat them as
errors". That way, you could check for other syntax errors, but not
generate bogus object code. Adding that to GNAT might be a good idea,
but I never actually used it in DEC Ada.

-- 
-- Stephe