Bert Freudenberg uploaded a new version of MorphicExtras to project The Trunk: http://source.squeak.org/trunk/MorphicExtras-bf.241.mcz
==================== Summary ====================
Name: MorphicExtras-bf.241 Author: bf Time: 6 July 2018, 12:50:51.907705 pm UUID: 9fa635ce-e870-48d6-bc03-7fe4a95af05a Ancestors: MorphicExtras-ul.240
FrameRateMorph: ensure at least one pixel is drawn per frame to not get bogus numbers
=============== Diff against MorphicExtras-ul.240 ===============
Item was changed: ----- Method: FrameRateMorph>>step (in category 'stepping and presenter') ----- step "Compute and display (every half second or so) the current framerate"
| now mSecs mSecsPerFrame framesPerSec newContents | framesSinceLastDisplay := framesSinceLastDisplay + 1. now := Time millisecondClockValue. mSecs := now - lastDisplayTime. (mSecs > 500 or: [mSecs < 0 "clock wrap-around"]) ifTrue: [mSecsPerFrame := mSecs // framesSinceLastDisplay. framesPerSec := (framesSinceLastDisplay * 1000) // mSecs. newContents := mSecsPerFrame printString, ' mSecs (', framesPerSec printString, ' frame', (framesPerSec = 1 ifTrue: [''] ifFalse: ['s']), '/sec)'. self contents: newContents. lastDisplayTime := now. + framesSinceLastDisplay := 0] + ifFalse: + ["Ensure at least one pixel is drawn per frame" + Preferences higherPerformance ifTrue: [self invalidRect: (self position extent: 1@1)]]! - framesSinceLastDisplay := 0]!
packages@lists.squeakfoundation.org