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,54aae3da1cf935cd
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news2.google.com!news.maxwell.syr.edu!news-out.visi.com!petbe.visi.com!upp1.onvoy!onvoy.com!news7.onvoy.net.POSTED!not-for-mail
Message-ID: <414CAC2B.60400@y.com>
From: Pylinius <p@y.com>
User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:0.9.8) Gecko/20020204
X-Accept-Language: en-us
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Ada Singleton Pattern
References: <%Fi1d.245967$OR2.11136154@news3.tin.it>
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
Date: Sat, 18 Sep 2004 21:47:09 GMT
NNTP-Posting-Host: 137.192.59.16
X-Complaints-To: abuse@onvoy.com
X-Trace: news7.onvoy.net 1095544029 137.192.59.16 (Sat,
 18 Sep 2004 16:47:09 CDT)
NNTP-Posting-Date: Sat, 18 Sep 2004 16:47:09 CDT
Organization: Onvoy
Xref: g2news1.google.com comp.lang.ada:3833
Date: 2004-09-18T21:47:09+00:00
List-Id: <comp.lang.ada>

Luca Stasio wrote:
> Hi, there is a way to implement the Singleton Pattern in Ada?
> There are some examples out there?
> Thanx.

package Example_Of_Singleton is

    procedure Do_Something;

    procedure Do_Something_Else;

end;


Bring it on you stupid GangOfFour bastards, with your idiotic bloated
idioms that inculcate and contaminate perfectly good alternative
languages!

Bring.

It.

On.