com.c (ffecom_init_0): Rename xargc to f__xargc, in accord with same-dated change to f/runtime.

Tue May 19 12:56:54 1998  Craig Burley  <burley@gnu.org>
* com.c (ffecom_init_0): Rename xargc to f__xargc,
in accord with same-dated change to f/runtime.

From-SVN: r19952
This commit is contained in:
Craig Burley 1998-05-22 10:24:50 +00:00 committed by Dave Love
parent e72d9e6b9d
commit 1ed565d7a6

View File

@ -12518,7 +12518,7 @@ ffecom_init_0 ()
/* Do "extern int xargc;". */
ffecom_tree_xargc_ = build_decl (VAR_DECL,
get_identifier ("xargc"),
get_identifier ("f__xargc"),
integer_type_node);
DECL_EXTERNAL (ffecom_tree_xargc_) = 1;
TREE_STATIC (ffecom_tree_xargc_) = 1;