You just need a class variable #UniqueInstance and those methods: current �� �� "Can also be named #default or #instance" �� �� �� �� ^ UniqueInstance �� �� �� �� �� �� �� �� ifNil: [ UniqueInstance := self basicNew; initialize; yourself ]