diff options
| author | Nathan Froyd <froydnj@codesourcery.com> | 2011-05-04 17:21:22 +0000 |
|---|---|---|
| committer | Nathan Froyd <froydnj@gcc.gnu.org> | 2011-05-04 17:21:22 +0000 |
| commit | 42375e2ea3a9043cd0e397b380b35bebf1315202 (patch) | |
| tree | 5f972fe904dfda1c79aed79d1cc145041baddfb5 /gcc | |
| parent | 7a99464652b2b96dfc1bc02cbd4e7c960dc0fb7b (diff) | |
| download | gcc-42375e2ea3a9043cd0e397b380b35bebf1315202.zip gcc-42375e2ea3a9043cd0e397b380b35bebf1315202.tar.gz gcc-42375e2ea3a9043cd0e397b380b35bebf1315202.tar.bz2 | |
remove gfc_chainon_list
remove gfc_chainon_list
* trans.h (gfc_chainon_list): Delete.
* trans.c (gfc_chainon_list): Delete.
From-SVN: r173386
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/trans.c | 13 | ||||
| -rw-r--r-- | gcc/fortran/trans.h | 3 |
3 files changed, 5 insertions, 16 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 5ab6e33..382f1aa 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2011-05-04 Nathan Froyd <froydnj@codesourcery.com> + + * trans.h (gfc_chainon_list): Delete. + * trans.c (gfc_chainon_list): Delete. + 2011-05-04 Tobias Burnus <burnus@net-b.de> PR fortran/48864 diff --git a/gcc/fortran/trans.c b/gcc/fortran/trans.c index 1b3a6b0..1d25cb0 100644 --- a/gcc/fortran/trans.c +++ b/gcc/fortran/trans.c @@ -63,19 +63,6 @@ gfc_advance_chain (tree t, int n) } -/* Wrap a node in a TREE_LIST node and add it to the end of a list. */ - -tree -gfc_chainon_list (tree list, tree add) -{ - tree l; - - l = tree_cons (NULL_TREE, add, NULL_TREE); - - return chainon (list, l); -} - - /* Strip off a legitimate source ending from the input string NAME of length LEN. */ diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index 6a2e4f5..7bf58e4 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -319,9 +319,6 @@ void gfc_conv_string_parameter (gfc_se * se); /* Compare two strings. */ tree gfc_build_compare_string (tree, tree, tree, tree, int, enum tree_code); -/* Add an item to the end of TREE_LIST. */ -tree gfc_chainon_list (tree, tree); - /* When using the gfc_conv_* make sure you understand what they do, i.e. when a POST chain may be created, and what the returned expression may be used for. Note that character strings have special handling. This |