How Can an Object Read its Own Name

Hi Everyone,

I'd like for an object to be able to send a message with it's unique name
as an argument.

For example:
The Foo instance of the class Bar sends a message with an argument of Foo.

The Sna instance of the class Bar sends a message with an argument of Sna.

Foo := Bar new .
Sna := Bar new .

I tried to use self but to no avail.

Many thanks,

Gary