diff options
author | John Gilmore <gnu@cygnus> | 1991-09-28 01:35:29 +0000 |
---|---|---|
committer | John Gilmore <gnu@cygnus> | 1991-09-28 01:35:29 +0000 |
commit | d8ce13268e9c7514b4b09757ad762bce9d0bfb0a (patch) | |
tree | 7156d8661603b50b662933c870fbc95050b43f60 /gdb/language.c | |
parent | dad0e12d57c432daeabe8f9a05848a60a5d08f91 (diff) | |
download | gdb-d8ce13268e9c7514b4b09757ad762bce9d0bfb0a.zip gdb-d8ce13268e9c7514b4b09757ad762bce9d0bfb0a.tar.gz gdb-d8ce13268e9c7514b4b09757ad762bce9d0bfb0a.tar.bz2 |
* coffread.c (coff_symfile_read): Use xmalloc, not malloc.
* language.c, printcmd.c: Lint.
* language.h (get_frame_language): Declare.
* saber.suppress: update.
* stack.c (find_relative_frame): Remove complex code that was
#if 0'd, stick with simple code. Lint.
* saber.suppress: Update a bit.
* symfile.c (add_symbol_file_command): Add "?" to question.
* utils.c (parse_escape): Avoid \a due to bdead compilers.
* value.h: Declare typedef_print.
* valprint.c (val_print, type_print_base): TYPE_CODE_RANGE less
kludgey.
Diffstat (limited to 'gdb/language.c')
-rw-r--r-- | gdb/language.c | 49 |
1 files changed, 24 insertions, 25 deletions
diff --git a/gdb/language.c b/gdb/language.c index 4cef749..a7a1285 100644 --- a/gdb/language.c +++ b/gdb/language.c @@ -94,8 +94,8 @@ void set_range_str(); /* Show command. Display a warning if the language set does not match the frame. */ void -show_language_command (str, from_tty) - char *str; +show_language_command (ignore, from_tty) + char *ignore; int from_tty; { enum language flang; /* The language of the current frame */ @@ -109,8 +109,8 @@ show_language_command (str, from_tty) /* Set command. Change the current working language. */ void -set_language_command (str, from_tty) - char *str; +set_language_command (ignore, from_tty) + char *ignore; int from_tty; { int i; @@ -161,8 +161,8 @@ modula-2 Use the Modula-2 language\n"); /* Show command. Display a warning if the type setting does not match the current language. */ void -show_type_command(str, from_tty) - char *str; +show_type_command(ignore, from_tty) + char *ignore; int from_tty; { if (type_check != current_language->la_type_check) @@ -172,8 +172,8 @@ show_type_command(str, from_tty) /* Set command. Change the setting for type checking. */ void -set_type_command(str, from_tty) - char *str; +set_type_command(ignore, from_tty) + char *ignore; int from_tty; { if (!strcmp(type,"on")) @@ -200,14 +200,14 @@ set_type_command(str, from_tty) return; } set_type_str(); - show_type_command(); + show_type_command((char *)NULL, from_tty); } /* Show command. Display a warning if the range setting does not match the current language. */ void -show_range_command(str, from_tty) - char *str; +show_range_command(ignore, from_tty) + char *ignore; int from_tty; { @@ -218,8 +218,8 @@ show_range_command(str, from_tty) /* Set command. Change the setting for range checking. */ void -set_range_command(str, from_tty) - char *str; +set_range_command(ignore, from_tty) + char *ignore; int from_tty; { if (!strcmp(range,"on")) @@ -246,7 +246,7 @@ set_range_command(str, from_tty) return; } set_range_str(); - show_range_command(); + show_range_command((char *)0, from_tty); } /* Set the status of range and type checking based on @@ -256,7 +256,6 @@ set_range_command(str, from_tty) static void set_type_range() { - char *rtmp, *ttmp; if (range_mode == range_mode_auto) range_check = current_language->la_range_check; @@ -290,7 +289,7 @@ set_language(lang) void set_lang_str() { - char *tmp, *prefix = ""; + char *prefix = ""; free (language); if (language_mode == language_mode_auto) @@ -360,11 +359,11 @@ void language_info () { printf("Current Language: %s\n",language); - show_language_command(); + show_language_command((char *)0, 1); printf("Type checking: %s\n",type); - show_type_command(); + show_type_command((char *)0, 1); printf("Range checking: %s\n",range); - show_range_command(); + show_range_command((char *)0, 1); } /* Return the result of a binary operation. */ @@ -374,10 +373,8 @@ binop_result_type(v1,v2) { int l1,l2,size,uns; - l1=TYPE_LENGTH(VALUE_TYPE(v1)); - l2=TYPE_LENGTH(VALUE_TYPE(v2)); - size = l1 > l2 ? l1 : l2; - uns = TYPE_UNSIGNED(VALUE_TYPE(v1)) || TYPE_UNSIGNED(VALUE_TYPE(v2)); + l1 = TYPE_LENGTH(VALUE_TYPE(v1)); + l2 = TYPE_LENGTH(VALUE_TYPE(v2)); switch(current_language->la_language) { @@ -401,6 +398,8 @@ binop_result_type(v1,v2) return l1 > l2 ? VALUE_TYPE(v1) : VALUE_TYPE(v2); break; } + abort(); + return (struct type *)0; /* For lint */ } /* This page contains functions that return format strings for @@ -921,8 +920,8 @@ struct cmd_list_element *setchecklist = NULL; struct cmd_list_element *showchecklist = NULL; static void -set_check (arg, from_tty) - char *arg; +set_check (ignore, from_tty) + char *ignore; int from_tty; { printf( |