--- a/ArithmeticValue.st	Tue Oct 27 17:25:06 2015 +0100
+++ b/ArithmeticValue.st	Tue Oct 27 17:26:41 2015 +0100
@@ -1195,11 +1195,16 @@
 !
 
 raisedToInteger:exp
-    "return the receiver raised to exp"
+    "return the receiver raised to exp.
+     Warning: if the receiver is a float/double, currently INF
+     may be returned. This may be changed silently to raise an error
+     in future versions."
 
     ^ self raisedToIntegerAsInteger:exp
 
     "
+     (2.0 raisedToInteger:10000)
+
      (2.0 raisedToInteger:216)
      (2 raisedToInteger:216)
      (2 raisedTo:216)