--- a/RegressionTests__ComplexTest.st	Thu Nov 01 12:09:48 2012 +0100
+++ b/RegressionTests__ComplexTest.st	Fri Nov 02 10:09:10 2012 +0100
@@ -270,6 +270,18 @@
     "
 !
 
+testFloorCeiling
+    | c1 c2 |
+
+    c1 := Complex real: 1 imaginary: 2.
+    c2 := Complex real: 3 imaginary: 4.
+
+    self should: [ c1 floor ] raise:Error.
+    self should: [ c1 ceiling ] raise:Error.
+
+    "Created: / 02-11-2012 / 10:04:43 / cg"
+!
+
 testModulus
 	| c1 c2 |