]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gdb/m2-valprint.c
* config/sh/tm-sh.h (BELIEVE_PCC_PROMOTION): Define, so that
[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"
b607efe7 25#include "m2-lang.h"
a8a69e63
FF
26
27/* FIXME: For now, just explicitly declare c_val_print and use it instead */
28
29int
4ef1f467
DT
30m2_val_print (type, valaddr, embedded_offset, address,
31 stream, format, deref_ref, recurse, pretty)
a8a69e63
FF
32 struct type *type;
33 char *valaddr;
4ef1f467 34 int embedded_offset;
a8a69e63 35 CORE_ADDR address;
199b2450 36 GDB_FILE *stream;
a8a69e63
FF
37 int format;
38 int deref_ref;
39 int recurse;
40 enum val_prettyprint pretty;
41{
42 extern int
4ef1f467
DT
43 c_val_print PARAMS ((struct type *, char *, int, CORE_ADDR,
44 GDB_FILE *, int, int, int, enum val_prettyprint));
45 return (c_val_print (type, valaddr, 0, address, stream, format, deref_ref,
a8a69e63
FF
46 recurse, pretty));
47}