43.7. Event Trigger Procedures in PL/Tcl
Event trigger procedures can be written in PL/Tcl.
requires that a procedure that is
to be called as an event trigger must be declared as a function with no
arguments and a return type of
The information from the trigger manager is passed to the procedure body in the following variables:
The name of the event the trigger is fired for.
The command tag for which the trigger is fired.
The return value of the trigger procedure is ignored.
Here's a little example event trigger procedure that simply raises
message each time a supported command is
CREATE OR REPLACE FUNCTION tclsnitch() RETURNS event_trigger AS $$ elog NOTICE "tclsnitch: $TG_event $TG_tag" $$ LANGUAGE pltcl; CREATE EVENT TRIGGER tcl_a_snitch ON ddl_command_start EXECUTE PROCEDURE tclsnitch();