A Global Singleton is a class of which only one instance exists within a program.

Any attempt to use non-static members of the class involves performing operations on this one instance.




(class +Singleton)
 
(dm message1> ()
   (prinl "This is method 1 on " This) )
 
(dm message2> ()
   (prinl "This is method 2 on " This) )