Merge pull request dylan-lang#1528 from cgay/dev

Improve error for x ^ y where y is negative
cgay · Aug 3, 2023 · c15d4fc · c15d4fc
2 parents 0c33594 + 065ea88
commit c15d4fc
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/sources/dylan/integer.dylan b/sources/dylan/integer.dylan
@@ -224,9 +224,8 @@ define integer-sign-adjust abs;
 define method \^
     (base :: <integer>, power :: <integer>) => (res :: <rational>)
   if (negative?(power))
-    //---*** THIS IS WRONG AS / ISN'T DEFINED FOR <integer>!
-    //1 / (base ^ -power)
-    error("Negative powers are unimplemented")
+    error("for '%d ^ %d': negative powers are undefined for integers because division"
+            " is undefined for integers. Use floats instead?", base, power);
   elseif (base = 2)
     ash(1, power)
   elseif (negative?(base))