2004-06-27 <david@streamline-computing.com>

	Partial fix for PR cli/1056.
	* valarith.c (value_binop): Check for zero in division and
	remainder evaluation.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 989cf2c..5b86c07 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2004-06-27    <david@streamline-computing.com>
+
+       Partial fix for PR cli/1056.
+       * valarith.c: Check for zero in division and remainder 
+       evaluation.
+
 2004-06-27  Mark Kettenis  <kettenis@gnu.org>
 
        * i387-tdep.c: Remove excessive whitespace.

diff --git a/gdb/valarith.c b/gdb/valarith.c
index 1a86e92..7858f91 100644 (file)
--- a/gdb/valarith.c
+++ b/gdb/valarith.c
@@ -1040,7 +1040,10 @@ value_binop (struct value *arg1, struct value *arg2, enum exp_opcode op)
              break;
 
            case BINOP_DIV:
-             v = v1 / v2;
+             if (v2 != 0)
+               v = v1 / v2;
+             else
+               error ("Division by zero");
               break;
 
             case BINOP_EXP:
@@ -1050,7 +1053,10 @@ value_binop (struct value *arg1, struct value *arg2, enum exp_opcode op)
              break;
 
            case BINOP_REM:
-             v = v1 % v2;
+             if (v2 != 0)
+               v = v1 % v2;
+             else
+               error ("Division by zero");
              break;
 
            case BINOP_MOD: