Revision as of 20:57, 31 March 2014 (view source) rosettacode>Raiph m (→‎{{header\|Perl 6}}: syntax update) ← Older edit		Revision as of 18:02, 28 May 2014 (view source) rosettacode>Statonjr No edit summary Newer edit →
Line 1,440: Clones of Oddball themselves may not be cloned. Methods and slots may still be defined on them: <lang slate>define: #Singleton &builder: [Oddball clone]</lang> =={{header\|Smalltalk}}== <lang smalltalk> SomeClass class>>sharedInstance SharedInstance ifNil: [SharedInstance := self basicNew initialize]. ^ SharedInstance </lang> =={{header\|Tcl}}==

Singleton (view source)