smalltalk singleton模式:如何初始化实例变量？

我在使用singleton模式初始化smalltalk中的实例变量时遇到了麻烦.(这里是另一个实现的链接以便澄清)

这就是我所拥有的:

new

^UniqueInstance ifNil: [UniqueInstance := self basicNew.
                        UniqueInstance: instanceVar := Object new. ].

最后一行(UniqueInstance:instanceVar:= Object new.)不起作用,但基本上我需要做的是:在将UniqueInstance返回给调用者之前,将instanceVar实例化为Object.

请注意,此"new"方法用作类实例化,并且该库是UniqueIsntance的实例变量(所需类的isntance).

谁能指出我正确的方向？

尝试更简单:

YourClass class>>singleton

       UniqueInstance ifNil: [UniqueInstance := self basicNew initialize].
       ^UniqueInstance

然后在类的实例端实现适当的#initialize方法,例如:

YourClass>>initialize

          someInstvar := someInitalValue.
         ^self

更新::访问单例的类方法的名称各不相同,可以是#default,#current或#singleton.我以后大多使用.