git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

gfortran.h (gfc_add_attribute): Change uint to unsigned int. 

2006-02-18   Danny Smith  <dannysmith@users.sourceforeg.net>

    * gfortran.h (gfc_add_attribute): Change uint to unsigned int.
    * symbol.c (gfc_add_attribute): Likewise for definition.
    * resolve.c (resolve_global_procedure): Likewise for variable 'type'.

From-SVN: r111239
This commit is contained in:
Danny Smith 2006-02-18 16:10:59 +00:00 committed by Steven G. Kargl
parent e084430d3d
commit ef6a0629b4
4 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2006-02-18 Danny Smith <dannysmith@users.sourceforeg.net>
* gfortran.h (gfc_add_attribute): Change uint to unsigned int.
* symbol.c (gfc_add_attribute): Likewise for definition.
* resolve.c (resolve_global_procedure): Likewise for variable 'type'.
2006-02-17 Richard Sandiford <richard@codesourcery.com>
* trans-common.c: Include rtl.h earlier.

2
gcc/fortran/gfortran.h
View File

@ -1784,7 +1784,7 @@ void gfc_get_component_attr (symbol_attribute *, gfc_component *);
void gfc_set_sym_referenced (gfc_symbol * sym);
try gfc_add_attribute (symbol_attribute *, locus *, uint);
try gfc_add_attribute (symbol_attribute *, locus *, unsigned int);
try gfc_add_allocatable (symbol_attribute *, locus *);
try gfc_add_dimension (symbol_attribute *, const char *, locus *);
try gfc_add_external (symbol_attribute *, locus *);

2
gcc/fortran/resolve.c
View File

@ -916,7 +916,7 @@ static void
resolve_global_procedure (gfc_symbol *sym, locus *where, int sub)
{
gfc_gsymbol * gsym;
uint type;
unsigned int type;
type = sub ? GSYM_SUBROUTINE : GSYM_FUNCTION;

3
gcc/fortran/symbol.c
View File

@ -604,7 +604,8 @@ duplicate_attr (const char *attr, locus * where)
/* Called from decl.c (attr_decl1) to check attributes, when declared separately. */
try
gfc_add_attribute (symbol_attribute * attr, locus * where, uint attr_intent)
gfc_add_attribute (symbol_attribute * attr, locus * where,
unsigned int attr_intent)
{
if (check_used (attr, NULL, where)