mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-27 04:52:05 +08:00
3666a04883
This commits the result of running gdb/copyright.py as per our Start of New Year procedure... gdb/ChangeLog Update copyright year range in copyright header of all GDB files.
86 lines
1.5 KiB
C++
86 lines
1.5 KiB
C++
/* Copyright 2020-2021 Free Software Foundation, Inc.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
|
#include <cstring>
|
|
#include <cstdlib>
|
|
|
|
class base_one
|
|
{
|
|
int num1 = 1;
|
|
int num2 = 2;
|
|
int num3 = 3;
|
|
};
|
|
|
|
class base_two
|
|
{
|
|
public:
|
|
base_two ()
|
|
{
|
|
string = strdup ("Something in C++");
|
|
}
|
|
|
|
~base_two ()
|
|
{
|
|
free (string);
|
|
}
|
|
|
|
char *string = nullptr;
|
|
float val = 3.5;
|
|
};
|
|
|
|
class derived_type : public base_one, base_two
|
|
{
|
|
public:
|
|
derived_type ()
|
|
: base_one (),
|
|
base_two ()
|
|
{
|
|
/* Nothing. */
|
|
}
|
|
|
|
private:
|
|
int xxx = 9;
|
|
float yyy = 10.5;
|
|
};
|
|
|
|
static void mixed_func_1f ();
|
|
static void mixed_func_1g ();
|
|
|
|
extern "C"
|
|
{
|
|
/* Entry point to be called from Fortran. */
|
|
void
|
|
mixed_func_1e ()
|
|
{
|
|
mixed_func_1f ();
|
|
}
|
|
|
|
/* The entry point back into Fortran. */
|
|
extern void mixed_func_1h_ ();
|
|
}
|
|
|
|
static void
|
|
mixed_func_1g (derived_type obj)
|
|
{
|
|
mixed_func_1h_ ();
|
|
}
|
|
|
|
static void
|
|
mixed_func_1f () {
|
|
derived_type obj;
|
|
|
|
mixed_func_1g (obj);
|
|
}
|