Tuplestorestate *
 ExecMakeTableFunctionResult(ExprState *funcexpr,
                            ExprContext *econtext,
+                           MemoryContext argContext,
                            TupleDesc expectedDesc,
                            bool randomAccess)
 {
        /*
         * Evaluate the function's argument list.
         *
-        * Note: ideally, we'd do this in the per-tuple context, but then the
-        * argument values would disappear when we reset the context in the
-        * inner loop.  So do it in caller context.  Perhaps we should make a
-        * separate context just to hold the evaluated arguments?
+        * We can't do this in the per-tuple context: the argument values
+        * would disappear when we reset that context in the inner loop.  And
+        * the caller's CurrentMemoryContext is typically a query-lifespan
+        * context, so we don't want to leak memory there.  We require the
+        * caller to pass a separate memory context that can be used for this,
+        * and can be reset each time through to avoid bloat.
         */
+       MemoryContextReset(argContext);
+       oldcontext = MemoryContextSwitchTo(argContext);
        argDone = ExecEvalFuncArgs(&fcinfo, fcache->args, econtext);
+       MemoryContextSwitchTo(oldcontext);
+
        /* We don't allow sets in the arguments of the table function */
        if (argDone != ExprSingleResult)
            ereport(ERROR,
 
 #include "nodes/nodeFuncs.h"
 #include "parser/parsetree.h"
 #include "utils/builtins.h"
+#include "utils/memutils.h"
 
 
 /*
            node->funcstates[0].tstore = tstore =
                ExecMakeTableFunctionResult(node->funcstates[0].funcexpr,
                                            node->ss.ps.ps_ExprContext,
+                                           node->argcontext,
                                            node->funcstates[0].tupdesc,
                                          node->eflags & EXEC_FLAG_BACKWARD);
 
            fs->tstore =
                ExecMakeTableFunctionResult(fs->funcexpr,
                                            node->ss.ps.ps_ExprContext,
+                                           node->argcontext,
                                            fs->tupdesc,
                                          node->eflags & EXEC_FLAG_BACKWARD);
 
    ExecAssignResultTypeFromTL(&scanstate->ss.ps);
    ExecAssignScanProjectionInfo(&scanstate->ss);
 
+   /*
+    * Create a memory context that ExecMakeTableFunctionResult can use to
+    * evaluate function arguments in.  We can't use the per-tuple context for
+    * this because it gets reset too often; but we don't want to leak
+    * evaluation results into the query-lifespan context either.  We just
+    * need one context, because we evaluate each function separately.
+    */
+   scanstate->argcontext = AllocSetContextCreate(CurrentMemoryContext,
+                                                 "Table function arguments",
+                                                 ALLOCSET_DEFAULT_MINSIZE,
+                                                 ALLOCSET_DEFAULT_INITSIZE,
+                                                 ALLOCSET_DEFAULT_MAXSIZE);
+
    return scanstate;
 }
 
 
                   bool *isNull);
 extern Tuplestorestate *ExecMakeTableFunctionResult(ExprState *funcexpr,
                            ExprContext *econtext,
+                           MemoryContext argContext,
                            TupleDesc expectedDesc,
                            bool randomAccess);
 extern Datum ExecEvalExprSwitchContext(ExprState *expression, ExprContext *econtext,
 
  *     nfuncs              number of functions being executed
  *     funcstates          per-function execution states (private in
  *                         nodeFunctionscan.c)
+ *     argcontext          memory context to evaluate function arguments in
  * ----------------
  */
 struct FunctionScanPerFuncState;
    int         nfuncs;
    struct FunctionScanPerFuncState *funcstates;        /* array of length
                                                         * nfuncs */
+   MemoryContext argcontext;
 } FunctionScanState;
 
 /* ----------------