src/pl/tcl/test/test_mklang.sql


1
2
3
4
5
6
7
8
9

create function pltcl_call_handler() returns opaque
	as '/usr/local/pgsql/lib/pltcl.so'
	language 'C';

create trusted procedural language 'pltcl'
	handler pltcl_call_handler
	lancompiler 'PL/Tcl';