1
0
mirror of https://github.com/postgres/postgres.git synced 2025-07-14 08:21:07 +03:00

Change lcons(x, NIL) to makeList(x) where appropriate.

This commit is contained in:
Bruce Momjian
2001-01-17 17:26:45 +00:00
parent 8e9840383c
commit 5088f0748a
12 changed files with 36 additions and 35 deletions

View File

@ -6,7 +6,7 @@
* Portions Copyright (c) 1996-2000, PostgreSQL, Inc
* Portions Copyright (c) 1994, Regents of the University of California
*
* $Id: geqo_eval.c,v 1.55 2000/09/19 18:42:33 tgl Exp $
* $Id: geqo_eval.c,v 1.56 2001/01/17 17:26:44 momjian Exp $
*
*-------------------------------------------------------------------------
*/
@ -122,7 +122,7 @@ gimme_tree(Query *root, List *initial_rels,
else
{
/* tree main part */
List *acceptable_rels = lcons(inner_rel, NIL);
List *acceptable_rels = makeList1(inner_rel);
List *new_rels;
RelOptInfo *new_rel;

View File

@ -10,7 +10,7 @@
*
*
* IDENTIFICATION
* $Header: /cvsroot/pgsql/src/backend/optimizer/path/_deadcode/Attic/xfunc.c,v 1.13 2000/01/26 05:56:36 momjian Exp $
* $Header: /cvsroot/pgsql/src/backend/optimizer/path/_deadcode/Attic/xfunc.c,v 1.14 2001/01/17 17:26:45 momjian Exp $
*
*-------------------------------------------------------------------------
*/
@ -300,7 +300,7 @@ xfunc_pullup(Query *queryInfo,
get_clause(cinfo), LispNil);
xfunc_copyrel(get_parent(newkid), &newrel);
set_parent(newkid, newrel);
set_pathlist(newrel, lcons(newkid, NIL));
set_pathlist(newrel, makeList1(newkid));
set_unorderedpath(newrel, (PathPtr) newkid);
set_cheapestpath(newrel, (PathPtr) newkid);
set_size(newrel,

View File

@ -11,7 +11,7 @@
* Portions Copyright (c) 1994, Regents of the University of California
*
* IDENTIFICATION
* $Header: /cvsroot/pgsql/src/backend/optimizer/path/pathkeys.c,v 1.28 2000/12/14 22:30:43 tgl Exp $
* $Header: /cvsroot/pgsql/src/backend/optimizer/path/pathkeys.c,v 1.29 2001/01/17 17:26:45 momjian Exp $
*
*-------------------------------------------------------------------------
*/
@ -119,7 +119,7 @@ add_equijoined_keys(Query *root, RestrictInfo *restrictinfo)
/* Build the new set only when we know we must */
if (newset == NIL)
newset = lcons(item1, lcons(item2, NIL));
newset = makeList2(item1, item2);
/* Found a set to merge into our new set */
newset = set_union(newset, curset);
@ -135,7 +135,7 @@ add_equijoined_keys(Query *root, RestrictInfo *restrictinfo)
/* Build the new set only when we know we must */
if (newset == NIL)
newset = lcons(item1, lcons(item2, NIL));
newset = makeList2(item1, item2);
root->equi_key_list = lcons(newset, root->equi_key_list);
}
@ -534,7 +534,7 @@ build_index_pathkeys(Query *root,
/* Make a one-sublist pathkeys list for the function expression */
item = makePathKeyItem((Node *) make_funcclause(funcnode, funcargs),
sortop);
retval = lcons(make_canonical_pathkey(root, item), NIL);
retval = makeList1(make_canonical_pathkey(root, item));
}
else
{
@ -678,7 +678,7 @@ make_pathkeys_for_sortclauses(List *sortclauses,
* canonicalize_pathkeys() might replace it with a longer sublist
* later.
*/
pathkeys = lappend(pathkeys, lcons(pathkey, NIL));
pathkeys = lappend(pathkeys, makeList1(pathkey));
}
return pathkeys;
}

View File

@ -14,7 +14,7 @@
*
*
* IDENTIFICATION
* $Header: /cvsroot/pgsql/src/backend/optimizer/prep/prepunion.c,v 1.58 2000/12/14 22:30:44 tgl Exp $
* $Header: /cvsroot/pgsql/src/backend/optimizer/prep/prepunion.c,v 1.59 2001/01/17 17:26:45 momjian Exp $
*
*-------------------------------------------------------------------------
*/
@ -467,7 +467,7 @@ List *
find_all_inheritors(Oid parentrel)
{
List *examined_relids = NIL;
List *unexamined_relids = lconsi(parentrel, NIL);
List *unexamined_relids = makeListi1(parentrel);
/*
* While the queue of unexamined relids is nonempty, remove the first