home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / gdb-4.16-base.tgz / gdb-4.16-base.tar / fsf / gdb / gdb / m2-valprint.c < prev    next >
C/C++ Source or Header  |  1995-08-01  |  2KB  |  46 lines
  1. /* Support for printing Modula 2 values for GDB, the GNU debugger.
  2.    Copyright 1986, 1988, 1989, 1991 Free Software Foundation, Inc.
  3.  
  4. This file is part of GDB.
  5.  
  6. This program is free software; you can redistribute it and/or modify
  7. it under the terms of the GNU General Public License as published by
  8. the Free Software Foundation; either version 2 of the License, or
  9. (at your option) any later version.
  10.  
  11. This program is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with this program; if not, write to the Free Software
  18. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  19.  
  20. #include "defs.h"
  21. #include "obstack.h"
  22. #include "symtab.h"
  23. #include "gdbtypes.h"
  24. #include "valprint.h"
  25.  
  26. /* FIXME:  For now, just explicitly declare c_val_print and use it instead */
  27.  
  28. int
  29. m2_val_print (type, valaddr, address, stream, format, deref_ref, recurse,
  30.           pretty)
  31.      struct type *type;
  32.      char *valaddr;
  33.      CORE_ADDR address;
  34.      GDB_FILE *stream;
  35.      int format;
  36.      int deref_ref;
  37.      int recurse;
  38.      enum val_prettyprint pretty;
  39. {
  40.   extern int
  41.   c_val_print PARAMS ((struct type *, char *, CORE_ADDR, GDB_FILE *, int, int,
  42.                int, enum val_prettyprint));
  43.   return (c_val_print (type, valaddr, address, stream, format, deref_ref,
  44.                recurse, pretty));
  45. }
  46.