diff options
Diffstat (limited to 'src/backend/nodes/list.c')
| -rw-r--r-- | src/backend/nodes/list.c | 17 |
1 files changed, 16 insertions, 1 deletions
diff --git a/src/backend/nodes/list.c b/src/backend/nodes/list.c index 66d69199be..45f42dc502 100644 --- a/src/backend/nodes/list.c +++ b/src/backend/nodes/list.c @@ -8,7 +8,7 @@ * * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/backend/nodes/list.c,v 1.31 2000/04/12 17:15:16 momjian Exp $ + * $Header: /cvsroot/pgsql/src/backend/nodes/list.c,v 1.32 2000/06/09 01:44:12 momjian Exp $ * * NOTES * XXX a few of the following functions are duplicated to handle @@ -523,6 +523,21 @@ set_differencei(List *l1, List *l2) } /* + * Reverse a list, non-destructively + */ +List * +lreverse(List *l) +{ + List *result = NIL; + List *i; + foreach(i, l) + { + result = lcons(lfirst(i), result); + } + return result; +} + +/* * Return t if two integer lists have no members in common. */ bool |
