]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gdb/m2-valprint.c
Update FSF address.
[thirdparty/binutils-gdb.git] / gdb / m2-valprint.c
CommitLineData
a8a69e63
FF
1/* Support for printing Modula 2 values for GDB, the GNU debugger.
2 Copyright 1986, 1988, 1989, 1991 Free Software Foundation, Inc.
3
4This file is part of GDB.
5
6This program is free software; you can redistribute it and/or modify
7it under the terms of the GNU General Public License as published by
8the Free Software Foundation; either version 2 of the License, or
9(at your option) any later version.
10
11This program is distributed in the hope that it will be useful,
12but WITHOUT ANY WARRANTY; without even the implied warranty of
13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14GNU General Public License for more details.
15
16You should have received a copy of the GNU General Public License
17along with this program; if not, write to the Free Software
6c9638b4 18Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
a8a69e63
FF
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
28int
29m2_val_print (type, valaddr, address, stream, format, deref_ref, recurse,
30 pretty)
31 struct type *type;
32 char *valaddr;
33 CORE_ADDR address;
199b2450 34 GDB_FILE *stream;
a8a69e63
FF
35 int format;
36 int deref_ref;
37 int recurse;
38 enum val_prettyprint pretty;
39{
40 extern int
199b2450 41 c_val_print PARAMS ((struct type *, char *, CORE_ADDR, GDB_FILE *, int, int,
a8a69e63
FF
42 int, enum val_prettyprint));
43 return (c_val_print (type, valaddr, address, stream, format, deref_ref,
44 recurse, pretty));
45}