Hum, but then wait, see suspicious code below
Item was changed:
----- Method: SimpleStackBasedCogit>>genPrimitiveLessThan (in category 'primitive generators') -----
genPrimitiveLessThan
+ ^self
+ genSmallIntegerComparison: JumpLess
+ orDoubleComparison: #JumpFPGreaterOrEqual:and shouldn't it be JumpFPGreater ???