Estou tendo problemas para obter o padrão singleton para inicializar uma variável de instância no smalltalk. (aqui está umlink para outra implementação para esclarecimentos)

é isso que eu tenho:

new

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

essa última linha (UniqueInstance: instanceVar: = Object new.) não funciona, mas é basicamente o que eu preciso fazer: instanciar instanceVar como um Object antes de retornar UniqueInstance de volta ao chamador.

Observe que esse método 'novo' é usado como uma instituição de classe e que as bibliotecas são uma variável de instância de UniqueIsntance (a isntância da classe desejada).

Alguém pode me apontar na direção certa?