diff options
| author | janus <janus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-05-31 08:09:09 +0000 |
|---|---|---|
| committer | janus <janus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-05-31 08:09:09 +0000 |
| commit | ee73dd7b1cfffac2a2b70ca66496f8382cc7b0e8 (patch) | |
| tree | 47677cddfe498b18259a39ec527d93408dae351e /gcc/fortran/misc.c | |
| parent | 789a3e1c0c343c55c193906b019b9bbdccc4b2a3 (diff) | |
| download | gcc-ee73dd7b1cfffac2a2b70ca66496f8382cc7b0e8.tar.gz | |
2013-05-31 Janus Weil <janus@gcc.gnu.org>
PR fortran/54190
PR fortran/57217
* gfortran.h (gfc_terminal_width): Remove prototype.
* error.c (get_terminal_width): Moved here from misc.c. Renamed.
Try to determine terminal width from environment variable.
* interface.c (compare_type, compare_rank): New functions. Fix assumed
type/rank handling.
(compare_type_rank, check_dummy_characteristics,
check_result_characteristics, gfc_compare_interfaces): Use them.
(symbol_rank): Slightly modified and moved.
* misc.c (gfc_terminal_width): Moved to error.c.
2013-05-31 Janus Weil <janus@gcc.gnu.org>
PR fortran/54190
PR fortran/57217
* gfortran.dg/dummy_procedure_5.f90: Modified error message.
* gfortran.dg/interface_26.f90: Ditto.
* gfortran.dg/proc_ptr_11.f90: Ditto.
* gfortran.dg/proc_ptr_15.f90: Ditto.
* gfortran.dg/proc_ptr_comp_20.f90: Ditto.
* gfortran.dg/proc_ptr_comp_33.f90: Ditto.
* gfortran.dg/proc_ptr_result_5.f90: Ditto.
* gfortran.dg/typebound_override_1.f90: Ditto.
* gfortran.dg/typebound_override_4.f90: Ditto.
* gfortran.dg/typebound_proc_6.f03: Ditto.
* gfortran.dg/assumed_type_7.f90: New test.
* gfortran.dg/typebound_override_5.f90: New test.
* gfortran.dg/typebound_override_6.f90: New test.
* gfortran.dg/typebound_override_7.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@199475 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/misc.c')
| -rw-r--r-- | gcc/fortran/misc.c | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/gcc/fortran/misc.c b/gcc/fortran/misc.c index cce599b3cbc..9b8f31f68fc 100644 --- a/gcc/fortran/misc.c +++ b/gcc/fortran/misc.c @@ -24,15 +24,6 @@ along with GCC; see the file COPYING3. If not see #include "gfortran.h" -/* Get terminal width. */ - -int -gfc_terminal_width (void) -{ - return 80; -} - - /* Initialize a typespec to unknown. */ void |