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: