* eval.c (evaluate_subexp_standard): Use builtin_type_int8

	to construct the EVAL_SKIP dummy return value.
	* ada-lang.c (ada_evaluate_subexp): Likewise.
	* jv-lang.c (evaluate_subexp_java): Likewise.
	* m2-lang.c (evaluate_subexp_modula2): Likewise.
	* scm-lang.c (evaluate_exp): Likewise.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 40dbd2287826f6cbb18c444b27e57400e04ebb01..ec43cbd3c7653891b3a494ed793d505c822044c4 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,12 @@
+2008-09-11  Ulrich Weigand  <uweigand@de.ibm.com>
+
+       * eval.c (evaluate_subexp_standard): Use builtin_type_int8
+       to construct the EVAL_SKIP dummy return value.
+       * ada-lang.c (ada_evaluate_subexp): Likewise.
+       * jv-lang.c (evaluate_subexp_java): Likewise.
+       * m2-lang.c (evaluate_subexp_modula2): Likewise.
+       * scm-lang.c (evaluate_exp): Likewise.
+
 2008-09-11  Ulrich Weigand  <uweigand@de.ibm.com>
 
        * value.h (coerce_enum, coerce_number): Remove prototypes.

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 840b5ed634b2ceea1e2e2e2617c566c0771e83af..15310efad236103c4dd292cc7fb90e3a16c1a37f 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -9238,7 +9238,7 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp,
     }
 
 nosideret:
-  return value_from_longest (builtin_type_long, (LONGEST) 1);
+  return value_from_longest (builtin_type_int8, (LONGEST) 1);
 }
 \f
 

diff --git a/gdb/eval.c b/gdb/eval.c
index ab7d83f1bfeeae9987bb3b1beda2e69d11bf1ab5..6a43e9486e7d48cb07cbcf8382501b7750a9b2fb 100644 (file)
--- a/gdb/eval.c
+++ b/gdb/eval.c
@@ -2482,7 +2482,7 @@ GDB does not (yet) know how to evaluate that kind of expression"));
     }
 
 nosideret:
-  return value_from_longest (builtin_type_long, (LONGEST) 1);
+  return value_from_longest (builtin_type_int8, (LONGEST) 1);
 }
 \f
 /* Evaluate a subexpression of EXP, at index *POS,

diff --git a/gdb/jv-lang.c b/gdb/jv-lang.c
index e74b72da4a211065c3ab3e3774db6d5427c4ae03..4430633240e8f8646edb745a5b5a08b26a8272a2 100644 (file)
--- a/gdb/jv-lang.c
+++ b/gdb/jv-lang.c
@@ -938,7 +938,7 @@ evaluate_subexp_java (struct type *expect_type, struct expression *exp,
 standard:
   return evaluate_subexp_standard (expect_type, exp, pos, noside);
 nosideret:
-  return value_from_longest (builtin_type_long, (LONGEST) 1);
+  return value_from_longest (builtin_type_int8, (LONGEST) 1);
 }
 
 static char *java_demangle (const char *mangled, int options)

diff --git a/gdb/m2-lang.c b/gdb/m2-lang.c
index 5c3a2840a5c020fac40ff50af6563f4c207d0ceb..8bc0ce795230fdfc40c4674dddd5722d883f9c2f 100644 (file)
--- a/gdb/m2-lang.c
+++ b/gdb/m2-lang.c
@@ -273,7 +273,7 @@ evaluate_subexp_modula2 (struct type *expect_type, struct expression *exp,
     }
 
  nosideret:
-  return value_from_longest (builtin_type_long, (LONGEST) 1);
+  return value_from_longest (builtin_type_int8, (LONGEST) 1);
 }
 \f
 

diff --git a/gdb/scm-lang.c b/gdb/scm-lang.c
index 991e4b48d8203e3c2d1be8df83e9bc7abb162290..08f016d45767c05829d4eb5bad64957874c7bb7f 100644 (file)
--- a/gdb/scm-lang.c
+++ b/gdb/scm-lang.c
@@ -220,7 +220,7 @@ evaluate_exp (struct type *expect_type, struct expression *exp,
     }
   return evaluate_subexp_standard (expect_type, exp, pos, noside);
 nosideret:
-  return value_from_longest (builtin_type_long, (LONGEST) 1);
+  return value_from_longest (builtin_type_int8, (LONGEST) 1);
 }
 
 const struct exp_descriptor exp_descriptor_scm =