+2001-10-17 Richard Henderson <rth@redhat.com>
+
+ * std.c (ffestd_labeldef_format): Fix variable/stmt ordering.
+ (ffestd_R737A): Likewise.
+
2001-10-17 Richard Henderson <rth@redhat.com>
* com.h: Remove FFECOM_targetCURRENT, FFECOM_ONEPASS, BUILT_FOR_270,
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;
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);