diff -r c0202064b824 -r 61698126d402 ChangeLog.joel
diff -r c0202064b824 -r 61698126d402 ada-lang.c
--- a/ada-lang.c	Tue Sep 09 12:31:38 2008 -0700
+++ b/ada-lang.c	Tue Sep 09 12:57:26 2008 -0700
@@ -10541,11 +10541,10 @@ ada_evaluate_subexp (struct type *expect
 
       if (noside == EVAL_SKIP)
         goto nosideret;
-      type = builtin_type (exp->gdbarch)->builtin_int;
       if (noside == EVAL_AVOID_SIDE_EFFECTS)
-        return value_zero (type, not_lval);
-      else
-        return value_from_longest (type,
+        return value_zero (builtin_type_int32, not_lval);
+      else
+        return value_from_longest (builtin_type_int32,
                                    TARGET_CHAR_BIT * TYPE_LENGTH (type));
 
     case OP_ATR_VAL: