diff options
Diffstat (limited to 'gcc/f/equiv.c')
| -rw-r--r-- | gcc/f/equiv.c | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/gcc/f/equiv.c b/gcc/f/equiv.c index 54dc12bf719..f58de9c4379 100644 --- a/gcc/f/equiv.c +++ b/gcc/f/equiv.c @@ -913,21 +913,6 @@ ffeequiv_add (ffeequiv eq, ffebld list, ffelexToken t) ffeequiv_set_list (eq, ffebld_new_item (list, ffeequiv_list (eq))); } -/* ffeequiv_dump -- Dump info on equivalence object - - ffeequiv eq; - ffeequiv_dump(eq); */ - -#if FFECOM_targetCURRENT == FFECOM_targetFFE -void -ffeequiv_dump (ffeequiv eq) -{ - if (ffeequiv_common (eq) != NULL) - fprintf (dmpout, "(common %s) ", ffesymbol_text (ffeequiv_common (eq))); - ffebld_dump (ffeequiv_list (eq)); -} -#endif - /* ffeequiv_exec_transition -- Do the hard work on all the equivalence objects ffeequiv_exec_transition(); */ |
