Changed GError for the same reason as GObject

Author: noha

src/Geometry-Tests/GAngleTest.class.st

@@ -181,7 +181,7 @@ GAngleTest >> testMultiplication [
 	self assert: angle * 2 equals: 180 degrees.
 	self assert: 2 * angle equals: 180 degrees.
 	self assert: angle * 1 equals: 90 degrees.
-	self should: [ angle * 10 degrees ] raise: GError description: 'It should not be possible to multiple two angles'
+	self should: [ angle * 10 degrees ] raise: GeometryError description: 'It should not be possible to multiple two angles'
 ]
 
 { #category : #tests }

src/Geometry-Tests/GPointTest.class.st

@@ -211,5 +211,5 @@ GPointTest >> testTranslateBy [
 { #category : #tests }
 GPointTest >> testWithCollection [
 	self assert: (GPoint withCollection: #(1 2)) equals: 1 , 2.
-	self should: [ GPoint withCollection: #() ] raise: GError
+	self should: [ GPoint withCollection: #() ] raise: GeometryError
 ]

src/Geometry-Tests/GPolygonTest.class.st

@@ -251,7 +251,7 @@ GPolygonTest >> testScaleBy [
 	polygon scaleBy: 1 / 2.
 	self assert: polygon vertices equals: {(5 , 2) . (-2 , 5) . (-5 , -5)}.
 
-	self should: [ polygon scaleBy: 0 ] raise: GError
+	self should: [ polygon scaleBy: 0 ] raise: GeometryError
 ]
 
 { #category : #tests }

src/Geometry-Tests/GRectangleTest.class.st

@@ -127,8 +127,8 @@ GRectangleTest >> testIntersectionsWithRay [
 
 { #category : #tests }
 GRectangleTest >> testVertices [
-	self should: [ GRectangle vertices: {(1 , 1) . (2 , 2) . (3 , 5)} ] raise: GError.
-	self should: [ GRectangle vertices: {(0 , 0) . (2 , 0) . (2 , -2) . (-1 , -2)} ] raise: GError
+	self should: [ GRectangle vertices: {(1 , 1) . (2 , 2) . (3 , 5)} ] raise: GeometryError.
+	self should: [ GRectangle vertices: {(0 , 0) . (2 , 0) . (2 , -2) . (-1 , -2)} ] raise: GeometryError
 ]
 
 { #category : #tests }

src/Geometry-Tests/GTestCase.class.st

@@ -53,6 +53,6 @@ GTestCase >> testEquals [
 
 { #category : #tests }
 GTestCase >> testErrorsArePersonnalized [
-	self should: [ self newInstance error ] raise: GError.
-	self should: [ self newInstance error: 'Error' ] raise: GError
+	self should: [ self newInstance error ] raise: GeometryError.
+	self should: [ self newInstance error: 'Error' ] raise: GeometryError
 ]

src/Geometry/GLine.class.st

@@ -67,7 +67,7 @@ GLine >> = line [
 	(self isParallelTo: line) ifFalse: [ ^ false ].
 
 	^ [ (self yFor: 1) =~ (line yFor: 1) ]
-		on: GError
+		on: GeometryError
 		do: [ "This can happen if b = 0" (self xFor: 1) =~ (line xFor: 1) ]
 ]
 
@@ -117,7 +117,7 @@ GLine >> distanceTo: aGPoint [
 { #category : #comparing }
 GLine >> hash [
 	^ ([ self yFor: 1 ]
-		on: GError
+		on: GeometryError
 		do: [ "This can happen if b = 0" self xFor: 1 ]) hash
 ]
 

src/Geometry/GError.class.st renamed to src/Geometry/GeometryError.class.st

@@ -5,7 +5,7 @@ Description
 I am a common exception for the Geometry project
 "
 Class {
-	#name : #GError,
+	#name : #GeometryError,
 	#superclass : #Error,
 	#category : #'Geometry-Exceptions'
 }

src/Geometry/GeometryObject.class.st

@@ -12,12 +12,12 @@ Class {
 
 { #category : #'error handling' }
 GeometryObject class >> error [
-	GError signal
+	GeometryError signal
 ]
 
 { #category : #'error handling' }
 GeometryObject class >> error: aString [
-	GError signal: aString
+	GeometryError signal: aString
 ]
 
 { #category : #'error handling' }