RosettaCodeData/Task/Singleton/OxygenBasic/singleton.basic

12 lines
253 B
Plaintext

Class Singleton
static sys inst 'private
int instantiated() { return inst }
void constructor(){ if not inst then inst=@this }
'all other methods start with @this=inst
end class
'if not singleton.instantiated
new Singleton MySingleton
'endif