diff options
| author | Bernhard Fischer <rep.nop@aon.at> | 2005-11-27 20:27:40 +0000 |
|---|---|---|
| committer | Steven G. Kargl <kargls@comcast.net> | 2005-11-27 20:27:40 +0000 |
| commit | 1f13acd5cc8460ab0303a630cd80008f1f778d01 (patch) | |
| tree | 0de32fcafe4b1349bebeac4bd8bb3d693656334c | |
| parent | 520c88fba2b9c0ecf5f97c67eeab480f11b16f57 (diff) | |
2005-11-27 Bernhard Fischer <rep.nop@aon.at>
* gfortran.h: remove superfluous whitespace and use GNU
comment-style for the documentation of backend_decl.
git-svn-id: https://gcc.gnu.org/svn/gcc/branches/gcc-4_1-branch@107572 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/gfortran.h | 22 |
2 files changed, 16 insertions, 11 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index f000ed0ec01..f25aa03067f 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2005-11-27 Bernhard Fischer <rep.nop@aon.at> + + * gfortran.h: remove superfluous whitespace and use GNU + comment-style for the documentation of backend_decl. + 2005-11-26 Steven G. Kargl <kargls@comcast.net> PR fortran/24917 diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index 95794a5ca7b..dd740194477 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -492,17 +492,17 @@ typedef struct ENUM_BITFIELD (ifsrc) if_source:2; ENUM_BITFIELD (procedure_type) proc:3; - + /* Special attributes for Cray pointers, pointees. */ - unsigned cray_pointer:1, cray_pointee:1; + unsigned cray_pointer:1, cray_pointee:1; } symbol_attribute; /* The following three structures are used to identify a location in - the sources. - + the sources. + gfc_file is used to maintain a tree of the source files and how they include each other @@ -510,17 +510,17 @@ symbol_attribute; which file it resides in locus point to the sourceline and the character in the source - line. + line. */ -typedef struct gfc_file +typedef struct gfc_file { struct gfc_file *included_by, *next, *up; int inclusion_line, line; char *filename; } gfc_file; -typedef struct gfc_linebuf +typedef struct gfc_linebuf { #ifdef USE_MAPPED_LOCATION source_location location; @@ -537,7 +537,7 @@ typedef struct gfc_linebuf #define gfc_linebuf_header_size (offsetof (gfc_linebuf, line)) -typedef struct +typedef struct { char *nextc; gfc_linebuf *lb; @@ -786,7 +786,7 @@ typedef struct gfc_common_head int use_assoc, saved; char name[GFC_MAX_SYMBOL_LEN + 1]; struct gfc_symbol *head; -} +} gfc_common_head; #define gfc_get_common_head() gfc_getmem(sizeof(gfc_common_head)) @@ -845,7 +845,7 @@ typedef struct gfc_namespace /* Tree containing all the user-defined operators in the namespace. */ gfc_symtree *uop_root; /* Tree containing all the common blocks. */ - gfc_symtree *common_root; + gfc_symtree *common_root; /* If set_flag[letter] is set, an implicit type has been set for letter. */ int set_flag[GFC_LETTERS]; @@ -1415,7 +1415,7 @@ typedef struct gfc_code ext; /* Points to additional structures required by statement */ /* Backend_decl is used for cycle and break labels in do loops, and - * probably for other constructs as well, once we translate them. */ + probably for other constructs as well, once we translate them. */ tree backend_decl; } gfc_code; |