Commit 693ac2ab by Francois-Xavier Coudert Committed by François-Xavier Coudert

unit.c (get_internal_unit): Make default sign mode unspecified.

	* io/unit.c (get_internal_unit): Make default sign mode unspecified.
	(init_units): Make default sign mode unspecified.

From-SVN: r227178
parent 0c308f59
2015-08-25 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> 2015-08-25 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
* io/unit.c (get_internal_unit): Make default sign mode unspecified.
(init_units): Make default sign mode unspecified.
2015-08-25 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
* libgfortran.h (check_buffered): Remove unused prototype. * libgfortran.h (check_buffered): Remove unused prototype.
2015-08-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> 2015-08-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
......
...@@ -507,7 +507,7 @@ get_internal_unit (st_parameter_dt *dtp) ...@@ -507,7 +507,7 @@ get_internal_unit (st_parameter_dt *dtp)
iunit->flags.form = FORM_FORMATTED; iunit->flags.form = FORM_FORMATTED;
iunit->flags.pad = PAD_YES; iunit->flags.pad = PAD_YES;
iunit->flags.status = STATUS_UNSPECIFIED; iunit->flags.status = STATUS_UNSPECIFIED;
iunit->flags.sign = SIGN_SUPPRESS; iunit->flags.sign = SIGN_UNSPECIFIED;
iunit->flags.decimal = DECIMAL_POINT; iunit->flags.decimal = DECIMAL_POINT;
iunit->flags.delim = DELIM_UNSPECIFIED; iunit->flags.delim = DELIM_UNSPECIFIED;
iunit->flags.encoding = ENCODING_DEFAULT; iunit->flags.encoding = ENCODING_DEFAULT;
...@@ -606,7 +606,7 @@ init_units (void) ...@@ -606,7 +606,7 @@ init_units (void)
u->flags.blank = BLANK_NULL; u->flags.blank = BLANK_NULL;
u->flags.pad = PAD_YES; u->flags.pad = PAD_YES;
u->flags.position = POSITION_ASIS; u->flags.position = POSITION_ASIS;
u->flags.sign = SIGN_SUPPRESS; u->flags.sign = SIGN_UNSPECIFIED;
u->flags.decimal = DECIMAL_POINT; u->flags.decimal = DECIMAL_POINT;
u->flags.delim = DELIM_UNSPECIFIED; u->flags.delim = DELIM_UNSPECIFIED;
u->flags.encoding = ENCODING_DEFAULT; u->flags.encoding = ENCODING_DEFAULT;
...@@ -635,7 +635,7 @@ init_units (void) ...@@ -635,7 +635,7 @@ init_units (void)
u->flags.status = STATUS_OLD; u->flags.status = STATUS_OLD;
u->flags.blank = BLANK_NULL; u->flags.blank = BLANK_NULL;
u->flags.position = POSITION_ASIS; u->flags.position = POSITION_ASIS;
u->flags.sign = SIGN_SUPPRESS; u->flags.sign = SIGN_UNSPECIFIED;
u->flags.decimal = DECIMAL_POINT; u->flags.decimal = DECIMAL_POINT;
u->flags.delim = DELIM_UNSPECIFIED; u->flags.delim = DELIM_UNSPECIFIED;
u->flags.encoding = ENCODING_DEFAULT; u->flags.encoding = ENCODING_DEFAULT;
...@@ -664,7 +664,7 @@ init_units (void) ...@@ -664,7 +664,7 @@ init_units (void)
u->flags.status = STATUS_OLD; u->flags.status = STATUS_OLD;
u->flags.blank = BLANK_NULL; u->flags.blank = BLANK_NULL;
u->flags.position = POSITION_ASIS; u->flags.position = POSITION_ASIS;
u->flags.sign = SIGN_SUPPRESS; u->flags.sign = SIGN_UNSPECIFIED;
u->flags.decimal = DECIMAL_POINT; u->flags.decimal = DECIMAL_POINT;
u->flags.encoding = ENCODING_DEFAULT; u->flags.encoding = ENCODING_DEFAULT;
u->flags.async = ASYNC_NO; u->flags.async = ASYNC_NO;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment