include/opcode/

[deliverable/binutils-gdb.git] / gdb / p-valprint.c

diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c
index fa0ec6c40a10ef7a6ad80c630b88ff34c5fc70f3..23a04dab3dc65832d73359e7958e70496142fda9 100644 (file)
--- a/gdb/p-valprint.c
+++ b/gdb/p-valprint.c
@@ -219,7 +219,7 @@ pascal_val_print (struct type *type, const gdb_byte *valaddr,
 
                  if (msymbol != NULL)
                    wsym = lookup_symbol (SYMBOL_LINKAGE_NAME (msymbol), block,
-                                         VAR_DOMAIN, &is_this_fld, NULL);
+                                         VAR_DOMAIN, &is_this_fld);
 
                  if (wsym)
                    {