Make initialization of special trigger variables a little more readable.

Correct one mis-setting of freeval (which could at worst leak a few bytes
until the trigger exits, so it's no big deal).

diff --git a/src/pl/plpgsql/src/pl_exec.c b/src/pl/plpgsql/src/pl_exec.c
index 079bce21c2b0511e4eb399a57a64f97a6caec4a5..9fbe2897210ab3abc36d2e7e7205efe5f1097ddc 100644 (file)
--- a/src/pl/plpgsql/src/pl_exec.c
+++ b/src/pl/plpgsql/src/pl_exec.c
@@ -3,7 +3,7 @@
  *           procedural language
  *
  * IDENTIFICATION
- *   $PostgreSQL: pgsql/src/pl/plpgsql/src/pl_exec.c,v 1.132 2005/02/24 01:11:40 tgl Exp $
+ *   $PostgreSQL: pgsql/src/pl/plpgsql/src/pl_exec.c,v 1.133 2005/03/25 01:45:42 tgl Exp $
  *
  *   This software is copyrighted by Jan Wieck - Hamburg.
  *
@@ -497,9 +497,6 @@ plpgsql_exec_trigger(PLpgSQL_function *func,
     */
 
    var = (PLpgSQL_var *) (estate.datums[func->tg_op_varno]);
-   var->isnull = false;
-   var->freeval = false;
-
    if (TRIGGER_FIRED_BY_INSERT(trigdata->tg_event))
        var->value = DirectFunctionCall1(textin, CStringGetDatum("INSERT"));
    else if (TRIGGER_FIRED_BY_UPDATE(trigdata->tg_event))
@@ -508,48 +505,50 @@ plpgsql_exec_trigger(PLpgSQL_function *func,
        var->value = DirectFunctionCall1(textin, CStringGetDatum("DELETE"));
    else
        elog(ERROR, "unrecognized trigger action: not INSERT, DELETE, or UPDATE");
-
-   var = (PLpgSQL_var *) (estate.datums[func->tg_name_varno]);
    var->isnull = false;
    var->freeval = true;
+
+   var = (PLpgSQL_var *) (estate.datums[func->tg_name_varno]);
    var->value = DirectFunctionCall1(namein,
                          CStringGetDatum(trigdata->tg_trigger->tgname));
-
-   var = (PLpgSQL_var *) (estate.datums[func->tg_when_varno]);
    var->isnull = false;
    var->freeval = true;
+
+   var = (PLpgSQL_var *) (estate.datums[func->tg_when_varno]);
    if (TRIGGER_FIRED_BEFORE(trigdata->tg_event))
        var->value = DirectFunctionCall1(textin, CStringGetDatum("BEFORE"));
    else if (TRIGGER_FIRED_AFTER(trigdata->tg_event))
        var->value = DirectFunctionCall1(textin, CStringGetDatum("AFTER"));
    else
        elog(ERROR, "unrecognized trigger execution time: not BEFORE or AFTER");
-
-   var = (PLpgSQL_var *) (estate.datums[func->tg_level_varno]);
    var->isnull = false;
    var->freeval = true;
+
+   var = (PLpgSQL_var *) (estate.datums[func->tg_level_varno]);
    if (TRIGGER_FIRED_FOR_ROW(trigdata->tg_event))
        var->value = DirectFunctionCall1(textin, CStringGetDatum("ROW"));
    else if (TRIGGER_FIRED_FOR_STATEMENT(trigdata->tg_event))
        var->value = DirectFunctionCall1(textin, CStringGetDatum("STATEMENT"));
    else
        elog(ERROR, "unrecognized trigger event type: not ROW or STATEMENT");
+   var->isnull = false;
+   var->freeval = true;
 
    var = (PLpgSQL_var *) (estate.datums[func->tg_relid_varno]);
+   var->value = ObjectIdGetDatum(trigdata->tg_relation->rd_id);
    var->isnull = false;
    var->freeval = false;
-   var->value = ObjectIdGetDatum(trigdata->tg_relation->rd_id);
 
    var = (PLpgSQL_var *) (estate.datums[func->tg_relname_varno]);
-   var->isnull = false;
-   var->freeval = true;
    var->value = DirectFunctionCall1(namein,
        CStringGetDatum(RelationGetRelationName(trigdata->tg_relation)));
+   var->isnull = false;
+   var->freeval = true;
 
    var = (PLpgSQL_var *) (estate.datums[func->tg_nargs_varno]);
+   var->value = Int16GetDatum(trigdata->tg_trigger->tgnargs);
    var->isnull = false;
    var->freeval = false;
-   var->value = Int16GetDatum(trigdata->tg_trigger->tgnargs);
 
    /*
     * Store the actual call argument values into the special execution
@@ -712,6 +711,9 @@ plpgsql_exec_error_callback(void *arg)
 
 /* ----------
  * Support functions for copying local execution variables
+ *
+ * NB: this is not a generic copy operation because it assumes that any
+ * pass-by-ref original values will live as long as the copy is needed.
  * ----------
  */
 static PLpgSQL_datum *