diff options
| author | burley <burley@138bc75d-0d04-0410-961f-82ee72b054a4> | 1999-05-15 15:46:16 +0000 |
|---|---|---|
| committer | burley <burley@138bc75d-0d04-0410-961f-82ee72b054a4> | 1999-05-15 15:46:16 +0000 |
| commit | c1576ae068d72456237d9424e0d480a5fc2b6e39 (patch) | |
| tree | e34430028463cc12d8cccfae35f3b14838e3bfdf /gcc/f/top.c | |
| parent | bb42a0cf799f5f4ad4c4c174cca271159143784b (diff) | |
| download | gcc-c1576ae068d72456237d9424e0d480a5fc2b6e39.tar.gz | |
fix INTEGER*8 subscripts, add -fflatten-arrays
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@26948 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/f/top.c')
| -rw-r--r-- | gcc/f/top.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/f/top.c b/gcc/f/top.c index 8603f011ea0..0d6fb35e214 100644 --- a/gcc/f/top.c +++ b/gcc/f/top.c @@ -74,6 +74,7 @@ bool ffe_is_dollar_ok_ = FFETARGET_defaultIS_DOLLAR_OK; bool ffe_is_f2c_ = FFETARGET_defaultIS_F2C; bool ffe_is_f2c_library_ = FFETARGET_defaultIS_F2C_LIBRARY; bool ffe_is_ffedebug_ = FALSE; +bool ffe_is_flatten_arrays_ = FALSE; bool ffe_is_free_form_ = FFETARGET_defaultIS_FREE_FORM; bool ffe_is_globals_ = TRUE; bool ffe_is_init_local_zero_ = FFETARGET_defaultIS_INIT_LOCAL_ZERO; @@ -216,6 +217,10 @@ ffe_decode_option (argc, argv) ffe_set_is_f2c_library (TRUE); else if (strcmp (&opt[2], "no-f2c-library") == 0) ffe_set_is_f2c_library (FALSE); + else if (strcmp (&opt[2], "flatten-arrays") == 0) + ffe_set_is_flatten_arrays (TRUE); + else if (strcmp (&opt[2], "no-flatten-arrays") == 0) + ffe_set_is_flatten_arrays (FALSE); else if (strcmp (&opt[2], "free-form") == 0) ffe_set_is_free_form (TRUE); else if (strcmp (&opt[2], "no-free-form") == 0) |