Import Swedish translation

[platform/upstream/binutils.git] / gprof / vax.c

diff --git a/gprof/vax.c b/gprof/vax.c
index c1f77df..9d67430 100644 (file)
--- a/gprof/vax.c
+++ b/gprof/vax.c
@@ -1,5 +1,5 @@
 /*
- * Copyright (c) 1983 Regents of the University of California.
+ * Copyright (c) 1983, 2001 Regents of the University of California.
  * All rights reserved.
  *
  * Redistribution and use in source and binary forms are permitted
@@ -53,6 +53,12 @@ struct modebyte
 Sym indirectchild;
 
 
+static operandenum vax_operandmode PARAMS ((struct modebyte *));
+static char *vax_operandname PARAMS ((operandenum));
+static long vax_operandlength PARAMS ((struct modebyte *));
+static bfd_vma vax_reladdr PARAMS ((struct modebyte *));
+void vax_find_call PARAMS ((Sym *, bfd_vma, bfd_vma));
+
 static operandenum
 vax_operandmode (modep)
      struct modebyte *modep;
@@ -250,7 +256,8 @@ vax_find_call (parent, p_lowpc, p_highpc)
       p_highpc = s_highpc;
     }
   DBG (CALLDEBUG, printf ("[findcall] %s: 0x%lx to 0x%lx\n",
-                         parent->name, p_lowpc, p_highpc));
+                         parent->name, (unsigned long) p_lowpc,
+                         (unsigned long) p_highpc));
   for (instructp = (unsigned char *) core_text_space + p_lowpc;
        instructp < (unsigned char *) core_text_space + p_highpc;
        instructp += length)
@@ -263,8 +270,9 @@ vax_find_call (parent, p_lowpc, p_highpc)
           *      skip the count of the number of arguments.
           */
          DBG (CALLDEBUG,
-              printf ("[findcall]\t0x%x:calls",
-                      instructp - (unsigned char *) core_text_space));
+              printf ("[findcall]\t0x%lx:calls",
+                      ((unsigned long)
+                       (instructp - (unsigned char *) core_text_space))));
          firstmode = vax_operandmode ((struct modebyte *) (instructp + length));
          switch (firstmode)
            {
@@ -296,7 +304,7 @@ vax_find_call (parent, p_lowpc, p_highpc)
               *      [are there others that we miss?,
               *       e.g. arrays of pointers to functions???]
               */
-             arc_add (parent, &indirectchild, (long) 0);
+             arc_add (parent, &indirectchild, (unsigned long) 0);
              length += vax_operandlength (
                                  (struct modebyte *) (instructp + length));
              continue;
@@ -305,7 +313,7 @@ vax_find_call (parent, p_lowpc, p_highpc)
            case longrel:
              /*
               *    regular pc relative addressing
-              *      check that this is the address of 
+              *      check that this is the address of
               *      a function.
               */
              destpc = vax_reladdr ((struct modebyte *) (instructp + length))
@@ -314,16 +322,18 @@ vax_find_call (parent, p_lowpc, p_highpc)
                {
                  child = sym_lookup (&symtab, destpc);
                  DBG (CALLDEBUG,
-                      printf ("[findcall]\tdestpc 0x%lx", destpc);
+                      printf ("[findcall]\tdestpc 0x%lx",
+                              (unsigned long) destpc);
                       printf (" child->name %s", child->name);
-                      printf (" child->addr 0x%lx\n", child->addr);
+                      printf (" child->addr 0x%lx\n",
+                              (unsigned long) child->addr);
                    );
                  if (child->addr == destpc)
                    {
                      /*
                       *    a hit
                       */
-                     arc_add (parent, child, (long) 0);
+                     arc_add (parent, child, (unsigned long) 0);
                      length += vax_operandlength ((struct modebyte *)
                                                   (instructp + length));
                      continue;