Marcel Taeumel uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-mt.1410.mcz

==================== Summary ====================

Name: Kernel-mt.1410
Author: mt
Time: 27 August 2021, 8:01:02.129421 am
UUID: bfb40b87-1a6b-0e47-a620-5d8b4de5ca04
Ancestors: Kernel-mt.1409

Adds missing changes in #roundUpTo:.

=============== Diff against Kernel-eem.1408 ===============

Item was changed:
  ----- Method: Number>>roundDownTo: (in category 'truncation and round off') -----
  roundDownTo: aNumber 
  	"Answer the next multiple of aNumber toward negative infinity that is nearest the 
  	receiver."
   	"Examples:
  		3.1479 roundDownTo: 0.01 -> 3.14
  		3.1479 roundDownTo: 0.1 -> 3.1
  		1923 roundDownTo: 10 -> 1920
  		3.1479 roundDownTo: 0.005 -> 3.145
  		-3.1479 roundDownTo: 0.01 -> -3.15"
  		
+ 	^ aNumber isInteger
+ 		ifTrue: [self roundDownToInteger: aNumber]
+ 		ifFalse: [(self/aNumber) floor * aNumber]!
- 	^(self/aNumber) floor * aNumber!

Item was added:
+ ----- Method: Number>>roundDownToInteger: (in category 'truncation and round off') -----
+ roundDownToInteger: aNumber 
+ 
+ 	^ self - (self \\ aNumber)!

Item was changed:
  ----- Method: Number>>roundUpTo: (in category 'truncation and round off') -----
  roundUpTo: aNumber 
  	"Answer the next multiple of aNumber toward infinity that is nearest the 
  	receiver."
   	"Examples:
  		3.1479 roundUpTo: 0.01 -> 3.15
  		3.1479 roundUpTo: 0.1 -> 3.2
  		1923 roundUpTo: 10 -> 1930
  		3.1479 roundUpTo: 0.005 -> 3.15
  		-3.1479 roundUpTo: 0.01 -> -3.14"
  
+ 	^ aNumber isInteger
+ 		ifTrue: [self roundUpToInteger: aNumber]
+ 		ifFalse: [(self/aNumber) ceiling * aNumber]!
- 	^(self/aNumber) ceiling * aNumber!

Item was added:
+ ----- Method: Number>>roundUpToInteger: (in category 'truncation and round off') -----
+ roundUpToInteger: aNumber 
+ 
+ 	| rem |
+ 	^ (rem := self \\ aNumber) ~= 0
+ 		ifTrue: [self + aNumber - rem]
+ 		ifFalse: [self]!