I realize new smalltalk mock objects framework named BehaviorMockup with SSpec functionality.
There is Squeak (http://www.squeaksource.com/BehaviorMockup.html) and VW versions (cincom public repository)

Simplest language for behavior specfications:

[:mock | mock someMessage] should strictly satisfy: [:mock | mock someMessage willReturn: 'some']

or

[:mock | mock someMessage] should lenient satisfy: [:mock | mock someMessage willReturn: 'some']

SSpec functionality:

For more detailes see Wiki on SqueakSource and many acceptance tests in package

Best regards,
Denis