* gdbtk.c: Add functions Tcl_Malloc, Tcl_Realloc, and Tcl_Free.
This commit is contained in:
parent
f1b64caa98
commit
8c19daa1e5
2 changed files with 26 additions and 0 deletions
|
@ -1,5 +1,7 @@
|
||||||
Tue Jun 20 10:19:40 1995 Stu Grossman (grossman@cygnus.com)
|
Tue Jun 20 10:19:40 1995 Stu Grossman (grossman@cygnus.com)
|
||||||
|
|
||||||
|
* gdbtk.c: Add functions Tcl_Malloc, Tcl_Realloc, and Tcl_Free.
|
||||||
|
|
||||||
* gdbtk.tcl (add_breakpoint_frame): Add more fields.
|
* gdbtk.tcl (add_breakpoint_frame): Add more fields.
|
||||||
* (create_file_win create_asm_win build_framework): Create null
|
* (create_file_win create_asm_win build_framework): Create null
|
||||||
bindings for meta keys to keep window from dropping down to
|
bindings for meta keys to keep window from dropping down to
|
||||||
|
|
24
gdb/gdbtk.c
24
gdb/gdbtk.c
|
@ -68,6 +68,30 @@ static int x_fd; /* X network socket */
|
||||||
|
|
||||||
static int disassemble_from_exec = -1;
|
static int disassemble_from_exec = -1;
|
||||||
|
|
||||||
|
/* Supply malloc calls for tcl/tk. */
|
||||||
|
|
||||||
|
char *
|
||||||
|
Tcl_Malloc (size)
|
||||||
|
unsigned int size;
|
||||||
|
{
|
||||||
|
return xmalloc (size);
|
||||||
|
}
|
||||||
|
|
||||||
|
char *
|
||||||
|
Tcl_Realloc (ptr, size)
|
||||||
|
char *ptr;
|
||||||
|
unsigned int size;
|
||||||
|
{
|
||||||
|
return xrealloc (ptr, size);
|
||||||
|
}
|
||||||
|
|
||||||
|
void
|
||||||
|
Tcl_Free(ptr)
|
||||||
|
char *ptr;
|
||||||
|
{
|
||||||
|
free (ptr);
|
||||||
|
}
|
||||||
|
|
||||||
static void
|
static void
|
||||||
null_routine(arg)
|
null_routine(arg)
|
||||||
int arg;
|
int arg;
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue