darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

* language.c (lang_bool_type): Add Fortran support.

Browse source 
* eval.c (OP_BOOL):  Use LA_BOOL_TYPE.
This commit is contained in:
Per Bothner 1996-01-24 00:16:38 +00:00
parent ae3471873e
commit ec5f347c76
2 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gdb/ChangeLog
View file

@ -1,3 +1,8 @@
Tue Jan 23 14:36:05 1996 Per Bothner <bothner@kalessin.cygnus.com>
* language.c (lang_bool_type): Add Fortran support.
* eval.c (OP_BOOL): Use LA_BOOL_TYPE.
Tue Jan 23 13:08:26 1996 Jeffrey A Law (law@cygnus.com)
* symfile.c (auto_solib_add): Renamed from auto_solib_add_at_startup.

9
gdb/language.c
View file

@ -782,6 +782,15 @@ lang_bool_type ()
{
case language_chill:
return builtin_type_chill_bool;
case language_fortran:
sym = lookup_symbol ("logical", NULL, VAR_NAMESPACE, NULL, NULL);
if (sym)
{
struct type *type = SYMBOL_TYPE (sym);
if (type && TYPE_CODE (type) == TYPE_CODE_BOOL)
return type;
}
return builtin_type_f_logical_s2;
case language_cplus:
sym = lookup_symbol ("bool", NULL, VAR_NAMESPACE, NULL, NULL);
if (sym)