Fix ARI warning about functions without parameters that do not
[deliverable/binutils-gdb.git] / gdb / python / py-evts.c
1 /* Python interface to inferior events.
2
3 Copyright (C) 2009, 2010, 2011 Free Software Foundation, Inc.
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
20 #include "py-events.h"
21
22 /* Initialize python events. */
23
24 static int
25 add_new_registry (eventregistry_object **registryp, char *name)
26 {
27 *registryp = create_eventregistry_object ();
28
29 if (*registryp == NULL)
30 goto fail;
31
32 if (PyModule_AddObject (gdb_py_events.module,
33 name,
34 (PyObject *)(*registryp)) < 0)
35 goto fail;
36
37 return 0;
38
39 fail:
40 Py_XDECREF (*registryp);
41 return -1;
42 }
43
44 void
45 gdbpy_initialize_py_events (void)
46 {
47 gdb_py_events.module = Py_InitModule ("events", NULL);
48
49 if (!gdb_py_events.module)
50 goto fail;
51
52 if (add_new_registry (&gdb_py_events.stop, "stop") < 0)
53 goto fail;
54
55 if (add_new_registry (&gdb_py_events.cont, "cont") < 0)
56 goto fail;
57
58 if (add_new_registry (&gdb_py_events.exited, "exited") < 0)
59 goto fail;
60
61 Py_INCREF (gdb_py_events.module);
62 if (PyModule_AddObject (gdb_module,
63 "events",
64 (PyObject *) gdb_py_events.module) < 0)
65 goto fail;
66
67 return;
68
69 fail:
70 gdbpy_print_stack ();
71 }
This page took 0.043199 seconds and 5 git commands to generate.