2005-02-11 Andrew Cagney <cagney@gnu.org>

[deliverable/binutils-gdb.git] / gdb / infcall.c

diff --git a/gdb/infcall.c b/gdb/infcall.c
index 667a07fad0855151ed76796a438f73117120a5f6..9246cc092282113f2b27f377a0d9cc58686dbbe8 100644 (file)
--- a/gdb/infcall.c
+++ b/gdb/infcall.c
@@ -96,7 +96,7 @@ value_arg_coerce (struct value *arg, struct type *param_type,
          && TYPE_CODE (arg_type) != TYPE_CODE_PTR)
        {
          arg = value_addr (arg);
-         arg->type = param_type;
+         deprecated_set_value_type (arg, param_type);
          return arg;
        }
       break;
@@ -204,7 +204,7 @@ find_function_addr (struct value *function, struct type **retval_type)
       value_type = builtin_type_int;
     }
   else
-    error ("Invalid data type for function to be called.");
+    error (_("Invalid data type for function to be called."));
 
   if (retval_type != NULL)
     *retval_type = value_type;
@@ -481,11 +481,11 @@ call_function_by_hand (struct value *function, int nargs, struct value **args)
        break;
       }
     default:
-      internal_error (__FILE__, __LINE__, "bad switch");
+      internal_error (__FILE__, __LINE__, _("bad switch"));
     }
 
   if (nargs < TYPE_NFIELDS (ftype))
-    error ("too few arguments in function call");
+    error (_("too few arguments in function call"));
 
   {
     int i;
@@ -536,13 +536,14 @@ call_function_by_hand (struct value *function, int nargs, struct value **args)
                       this point.  */
                    /* Go see if the actual parameter is a variable of
                       type pointer to function or just a function.  */
-                   if (args[i]->lval == not_lval)
+                   if (VALUE_LVAL (args[i]) == not_lval)
                      {
                        char *arg_name;
-                       if (find_pc_partial_function ((CORE_ADDR) args[i]->aligner.contents[0], &arg_name, NULL, NULL))
-                         error ("\
+                       /* NOTE: cagney/2005-01-02: THIS IS BOGUS.  */
+                       if (find_pc_partial_function ((CORE_ADDR) value_contents (args[i])[0], &arg_name, NULL, NULL))
+                         error (_("\
 You cannot use function <%s> as argument. \n\
-You must use a pointer to function type variable. Command ignored.", arg_name);
+You must use a pointer to function type variable. Command ignored."), arg_name);
                      }
              }
          }
@@ -647,7 +648,7 @@ You must use a pointer to function type variable. Command ignored.", arg_name);
     sp = DEPRECATED_PUSH_ARGUMENTS (nargs, args, sp, struct_return,
                                    struct_addr);
   else
-    error ("This target does not support function calls");
+    error (_("This target does not support function calls"));
 
   /* Set up a frame ID for the dummy frame so we can pass it to
      set_momentary_breakpoint.  We need to give the breakpoint a frame
@@ -769,11 +770,11 @@ You must use a pointer to function type variable. Command ignored.", arg_name);
 
              /* FIXME: Insert a bunch of wrap_here; name can be very
                 long if it's a C++ name with arguments and stuff.  */
-             error ("\
+             error (_("\
 The program being debugged was signaled while in a function called from GDB.\n\
 GDB has restored the context to what it was before the call.\n\
 To change this behavior use \"set unwindonsignal off\"\n\
-Evaluation of the expression containing the function (%s) will be abandoned.",
+Evaluation of the expression containing the function (%s) will be abandoned."),
                     name);
            }
          else
@@ -789,11 +790,11 @@ Evaluation of the expression containing the function (%s) will be abandoned.",
              discard_inferior_status (inf_status);
              /* FIXME: Insert a bunch of wrap_here; name can be very
                 long if it's a C++ name with arguments and stuff.  */
-             error ("\
+             error (_("\
 The program being debugged was signaled while in a function called from GDB.\n\
 GDB remains in the frame where the signal was received.\n\
 To change this behavior use \"set unwindonsignal on\"\n\
-Evaluation of the expression containing the function (%s) will be abandoned.",
+Evaluation of the expression containing the function (%s) will be abandoned."),
                     name);
            }
        }
@@ -816,15 +817,15 @@ Evaluation of the expression containing the function (%s) will be abandoned.",
             someday this will be implemented (it would not be easy).  */
          /* FIXME: Insert a bunch of wrap_here; name can be very long if it's
             a C++ name with arguments and stuff.  */
-         error ("\
+         error (_("\
 The program being debugged stopped while in a function called from GDB.\n\
 When the function (%s) is done executing, GDB will silently\n\
 stop (instead of continuing to evaluate the expression containing\n\
-the function call).", name);
+the function call)."), name);
        }
 
       /* The above code errors out, so ...  */
-      internal_error (__FILE__, __LINE__, "... should not be here");
+      internal_error (__FILE__, __LINE__, _("... should not be here"));
     }
 
   /* If we get here the called FUNCTION run to completion. */
@@ -884,8 +885,8 @@ function.  However, some older debug info formats do not provide enough\n\
 information to determine that a function is prototyped.  If this flag is\n\
 set, GDB will perform the conversion for a function it considers\n\
 unprototyped.\n\
-The default is to perform the conversion.\n", "\
-Coercion of floats to doubles when calling functions is %s.",
+The default is to perform the conversion.\n",
+                          NULL, /* PRINT: Coercion of floats to doubles when calling functions is %s.  */
                           NULL, NULL, &setlist, &showlist);
 
   add_setshow_boolean_cmd ("unwindonsignal", no_class,
@@ -895,7 +896,7 @@ Show unwinding of stack if a signal is received while in a call dummy.", "\
 The unwindonsignal lets the user determine what gdb should do if a signal\n\
 is received while in a function called from gdb (call dummy).  If set, gdb\n\
 unwinds the stack and restore the context to what as it was before the call.\n\
-The default is to stop in the frame where the signal was received.", "\
-Unwinding of stack if a signal is received while in a call dummy is %s.",
+The default is to stop in the frame where the signal was received.",
+                          NULL, /* PRINT: Unwinding of stack if a signal is received while in a call dummy is %s.  */
                           NULL, NULL, &setlist, &showlist);
 }