diff options
| author | Tom Lane <tgl@sss.pgh.pa.us> | 2008-11-19 01:10:24 +0000 |
|---|---|---|
| committer | Tom Lane <tgl@sss.pgh.pa.us> | 2008-11-19 01:10:24 +0000 |
| commit | cd35e9d7468e8f86dd5a7d928707f4ba8cdae44d (patch) | |
| tree | 0871bc92bd00e622cc567d29edf3d9a7c9b9adff /src/pl/plperl/plperl.c | |
| parent | 667685ca7da3b895fe362863c3da00b010543399 (diff) | |
| download | postgresql-cd35e9d7468e8f86dd5a7d928707f4ba8cdae44d.tar.gz postgresql-cd35e9d7468e8f86dd5a7d928707f4ba8cdae44d.zip | |
Some infrastructure changes for the upcoming auto-explain contrib module:
* Refactor explain.c slightly to export a convenient-to-use subroutine
for printing EXPLAIN results.
* Provide hooks for plugins to get control at ExecutorStart and ExecutorEnd
as well as ExecutorRun.
* Add some minimal support for tracking the total runtime of ExecutorRun.
This code won't actually do anything unless a plugin prods it to.
* Change the API of the DefineCustomXXXVariable functions to allow nonzero
"flags" to be specified for a custom GUC variable. While at it, also make
the "bootstrap" default value for custom GUCs be explicitly specified as a
parameter to these functions. This is to eliminate confusion over where the
default comes from, as has been expressed in the past by some users of the
custom-variable facility.
* Refactor GUC code a bit to ensure that a custom variable gets initialized to
something valid (like its default value) even if the placeholder value was
invalid.
Diffstat (limited to 'src/pl/plperl/plperl.c')
| -rw-r--r-- | src/pl/plperl/plperl.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/pl/plperl/plperl.c b/src/pl/plperl/plperl.c index 75eaf10134c..a221b92a2f1 100644 --- a/src/pl/plperl/plperl.c +++ b/src/pl/plperl/plperl.c @@ -1,7 +1,7 @@ /********************************************************************** * plperl.c - perl as a procedural language for PostgreSQL * - * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.141 2008/10/29 00:00:39 tgl Exp $ + * $PostgreSQL: pgsql/src/pl/plperl/plperl.c,v 1.142 2008/11/19 01:10:24 tgl Exp $ * **********************************************************************/ @@ -196,7 +196,8 @@ _PG_init(void) gettext_noop("If true, will compile trusted and untrusted perl code in strict mode"), NULL, &plperl_use_strict, - PGC_USERSET, + false, + PGC_USERSET, 0, NULL, NULL); EmitWarningsOnPlaceholders("plperl"); |