Commit | Line | Data |
---|---|---|
c17a9e46 HZ |
1 | /* Python interface to inferior breakpoint stop events. |
2 | ||
61baf725 | 3 | Copyright (C) 2009-2017 Free Software Foundation, Inc. |
c17a9e46 HZ |
4 | |
5 | This file is part of GDB. | |
6 | ||
7 | This program is free software; you can redistribute it and/or modify | |
8 | it under the terms of the GNU General Public License as published by | |
9 | the Free Software Foundation; either version 3 of the License, or | |
10 | (at your option) any later version. | |
11 | ||
12 | This program is distributed in the hope that it will be useful, | |
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | GNU General Public License for more details. | |
16 | ||
17 | You should have received a copy of the GNU General Public License | |
18 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ | |
19 | ||
d071a26b | 20 | #include "defs.h" |
c17a9e46 | 21 | #include "py-stopevent.h" |
abf5651e | 22 | #include "py-ref.h" |
c17a9e46 | 23 | |
e36122e9 | 24 | extern PyTypeObject breakpoint_event_object_type |
62eec1a5 | 25 | CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("event_object"); |
c17a9e46 | 26 | |
db6573d6 TT |
27 | /* Create and initialize a BreakpointEvent object. This acquires new |
28 | references to BREAKPOINT_LIST and FIRST_BP. */ | |
c17a9e46 HZ |
29 | |
30 | PyObject * | |
6839b47f | 31 | create_breakpoint_event_object (PyObject *breakpoint_list, PyObject *first_bp) |
c17a9e46 | 32 | { |
7780f186 | 33 | gdbpy_ref<> breakpoint_event_obj |
abf5651e | 34 | (create_stop_event_object (&breakpoint_event_object_type)); |
c17a9e46 | 35 | |
abf5651e TT |
36 | if (breakpoint_event_obj == NULL) |
37 | return NULL; | |
c17a9e46 | 38 | |
abf5651e | 39 | if (evpy_add_attribute (breakpoint_event_obj.get (), |
c17a9e46 | 40 | "breakpoint", |
6839b47f | 41 | first_bp) < 0) |
abf5651e TT |
42 | return NULL; |
43 | if (evpy_add_attribute (breakpoint_event_obj.get (), | |
6839b47f KP |
44 | "breakpoints", |
45 | breakpoint_list) < 0) | |
abf5651e | 46 | return NULL; |
c17a9e46 | 47 | |
abf5651e | 48 | return breakpoint_event_obj.release (); |
c17a9e46 HZ |
49 | } |
50 | ||
51 | GDBPY_NEW_EVENT_TYPE (breakpoint, | |
52 | "gdb.BreakpointEvent", | |
53 | "BreakpointEvent", | |
54 | "GDB breakpoint stop event object", | |
e36122e9 | 55 | stop_event_object_type); |