diff options
Diffstat (limited to 'gdb/parse.c')
| -rw-r--r-- | gdb/parse.c | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/gdb/parse.c b/gdb/parse.c index e2723b7..dff887e 100644 --- a/gdb/parse.c +++ b/gdb/parse.c @@ -475,11 +475,6 @@ length_of_subexp (expr, endpos) args = 2; break; - case OP_F77_SUBSTR: - oplen = 1; - args = 2; - break; - case OP_FUNCALL: case OP_F77_UNDETERMINED_ARGLIST: oplen = 3; @@ -542,8 +537,6 @@ length_of_subexp (expr, endpos) /* Modula-2 */ case MULTI_SUBSCRIPT: - /* Fortran */ - case MULTI_F77_SUBSCRIPT: oplen = 3; args = 1 + longest_to_int (expr->elts[endpos- 2].longconst); break; @@ -620,11 +613,6 @@ prefixify_subexp (inexpr, outexpr, inend, outbeg) args = 2; break; - case OP_F77_SUBSTR: - oplen = 1; - args = 2; - break; - case OP_FUNCALL: case OP_F77_UNDETERMINED_ARGLIST: oplen = 3; @@ -691,8 +679,6 @@ prefixify_subexp (inexpr, outexpr, inend, outbeg) /* Modula-2 */ case MULTI_SUBSCRIPT: - /* Fortran */ - case MULTI_F77_SUBSCRIPT: oplen = 3; args = 1 + longest_to_int (inexpr->elts[inend - 2].longconst); break; |