diff options
| author | Richard Henderson <rth@redhat.com> | 2001-10-17 20:57:51 -0700 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 2001-10-17 20:57:51 -0700 |
| commit | bf0dde96f56c9ba50541e707b64f26102b6b5131 (patch) | |
| tree | 59b37f7352a3f60621e7f976ee8f7536ba6bfdfd /gcc/f/std.c | |
| parent | 8ea6262761029a1cccc0e0280ce8be198e687636 (diff) | |
| download | gcc-bf0dde96f56c9ba50541e707b64f26102b6b5131.zip gcc-bf0dde96f56c9ba50541e707b64f26102b6b5131.tar.gz gcc-bf0dde96f56c9ba50541e707b64f26102b6b5131.tar.bz2 | |
std.c (ffestd_labeldef_format): Fix variable/stmt ordering.
* std.c (ffestd_labeldef_format): Fix variable/stmt ordering.
(ffestd_R737A): Likewise.
From-SVN: r46328
Diffstat (limited to 'gcc/f/std.c')
| -rw-r--r-- | gcc/f/std.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/f/std.c b/gcc/f/std.c index b8e3b39..db8c723 100644 --- a/gcc/f/std.c +++ b/gcc/f/std.c @@ -1503,10 +1503,10 @@ ffestd_labeldef_branch (ffelab label) void ffestd_labeldef_format (ffelab label) { - ffestd_label_formatdef_ = label; - ffestdStmt_ stmt; + ffestd_label_formatdef_ = label; + stmt = ffestd_stmt_new_ (FFESTD_stmtidFORMATLABEL_); ffestd_stmt_append_ (stmt); stmt->u.formatlabel.label = label; @@ -2441,10 +2441,10 @@ ffestd_R625 (ffesttExprList exprlist, ffebld stat) void ffestd_R737A (ffebld dest, ffebld source) { - ffestd_check_simple_ (); - ffestdStmt_ stmt; + ffestd_check_simple_ (); + stmt = ffestd_stmt_new_ (FFESTD_stmtidR737A_); ffestd_stmt_append_ (stmt); ffestd_subr_line_save_ (stmt); |