Sorrowの実装はまだ見つけられませんが、squeak-devに投稿された記事は見つかりました。
http://lists.squeakfoundation.org/pipermail/squeak-dev/2004-February/073798.html
これを見るとナイーブな実装ではなく、arrayオブジェクトに#value:メッセージを送ると、arrayをスタックとみなしてJoy風の動作をするようなもののようです。
Joyのquotationも以下のように記述できるらしい。
#((1 2 3) 0 (+) inject:into:)
ただcombinatorに関する記述はないみたい。どうなんでしょう。実物がないので詳しくわからないのが残念です。