From 311bcfc6b3acdd6fd152798c7f287ddf74fa2a98 Mon Sep 17 00:00:00 2001
From: Daniel Baumann <daniel.baumann@progress-linux.org>
Date: Tue, 16 Apr 2024 21:46:48 +0200
Subject: Adding upstream version 15.4.

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
---
 src/pl/tcl/pltcl--1.0.sql | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 src/pl/tcl/pltcl--1.0.sql

(limited to 'src/pl/tcl/pltcl--1.0.sql')

diff --git a/src/pl/tcl/pltcl--1.0.sql b/src/pl/tcl/pltcl--1.0.sql
new file mode 100644
index 0000000..2ed2b92
--- /dev/null
+++ b/src/pl/tcl/pltcl--1.0.sql
@@ -0,0 +1,12 @@
+/* src/pl/tcl/pltcl--1.0.sql */
+
+CREATE FUNCTION pltcl_call_handler() RETURNS language_handler
+  LANGUAGE c AS 'MODULE_PATHNAME';
+
+CREATE TRUSTED LANGUAGE pltcl
+  HANDLER pltcl_call_handler;
+
+-- The language object, but not the functions, can be owned by a non-superuser.
+ALTER LANGUAGE pltcl OWNER TO @extowner@;
+
+COMMENT ON LANGUAGE pltcl IS 'PL/Tcl procedural language';
-- 
cgit v1.2.3

