OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

resolve.c (compare_case): Give arguments correct type.

Browse Source 
2005-01-14  Steven G. Kargl  <kargls@comcast.net>

	* resolve.c (compare_case): Give arguments correct type.

From-SVN: r93637
This commit is contained in:
Steven G. Kargl 2005-01-14 09:28:03 +00:00 committed by Paul Brook
parent eebeecacfb
commit 6e06dac503
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/fortran/ChangeLog
View File

@ -1,3 +1,7 @@
2005-01-14 Steven G. Kargl <kargls@comcast.net>
* resolve.c (compare_case): Give arguments correct type.
2005-01-13 Kazu Hirata <kazu@cs.umass.edu>
* iresolve.c, trans-common.c, trans-types.c: Fix comment

6
gcc/fortran/resolve.c
View File

@ -2496,12 +2496,8 @@ resolve_allocate_expr (gfc_expr * e)
op1 > op2. Assumes we're not dealing with the default case. */
static int
compare_cases (const void * _op1, const void * _op2)
compare_cases (const gfc_case * op1, const gfc_case * op2)
{
const gfc_case *op1, *op2;
op1 = (const gfc_case *) _op1;
op2 = (const gfc_case *) _op2;
if (op1->low == NULL) /* op1 = (:N) */
{