Merge pull request #244 from olekscode/243-Tests-failing-on-Pharo-10

Tests failing on pharo 10

Author: olekscode

src/Math-FunctionFit/PMGeneralFunctionFit.class.st

@@ -19,7 +19,7 @@ Class {
 		'data',
 		'dataTruncated'
 	],
-	#category : 'Math-FunctionFit'
+	#category : #'Math-FunctionFit'
 }
 
 { #category : #creation }
@@ -98,7 +98,7 @@ PMGeneralFunctionFit >> evaluate [
 |ff|
 ff :=PMErrorMinimizer function: errorFunction.
 firstResult :=[ff evaluate .ff parameters] 
-	ifError: [:err :rcvr | verbose ifTrue: [self inform: 'ErrorMinimizer was not successful']. nil].
+	onErrorDo: [ verbose ifTrue: [self inform: 'ErrorMinimizer was not successful']. nil].
 firstResult ifNotNil: [go addPointAt: firstResult] .
 firstResult := go evaluate .
 self errorType =#squared 
@@ -107,7 +107,7 @@ ff parameters: firstResult.
 ff desiredPrecision: PMFloatingPointMachine new machinePrecision.
 ff maximumIterations: 1000 .
 result:=[ff evaluate .ff parameters] 
-			ifError: [:err :rcvr | 
+			onErrorDo: [ 
 				verbose ifTrue: [self inform: 'last FunctionFit was not successful']. 
 				ff result parameters].
 ((errorFunction value: result) > (errorFunction value: firstResult)) ifTrue:[

src/Math-Tests-KDTree/PMKDTreeTest.class.st

@@ -104,7 +104,7 @@ PMKDTreeTest >> testKDTree1Dimension [
 { #category : #tests }
 PMKDTreeTest >> testKDTree1DimensionIntegers [
 	| m aVector aResult bResult |
-	m := (1 to: 20) collect: [:index | Array with: (rand nextInt: 10)].	"only integers, obviously with multiples. test distances because the nearest neighbours are not necessarily the same"
+	m := (1 to: 20) collect: [:index | Array with: (rand nextInteger: 10)].	"only integers, obviously with multiples. test distances because the nearest neighbours are not necessarily the same"
 	self initializeTreeWith: m as: true.
 	0 to: 11 do:[:v | aVector := Array with: v.
 		aResult :=(aVector first - (stupid nnSearch: aVector i: 3)) abs.		"distances between 3 nearest numbers and aVector "