[fpc-pascal] Implementing a true Singleton - Can we decrease the visibility of a method?

[Michael Van Canneyt]

On Fri, 8 Dec 2006, Steve Williams wrote:

> > I found this by trying to implement a True Singleton in Free Pascal /
> > Delphi.  For those that don't know, a Singleton is a Design Pattern
> > that allows only one instance of a class.  It seems it is impossible
> > to do in Free Pascal / Delphi.  :-(
> 
> Try this.
> http://bdn.borland.com/article/22576

Maybe we should include an implementation in FPC by default ?

Michael.