contrib/hstore_plperl/hstore_plperlu--1.0.sql


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

/* contrib/hstore_plperl/hstore_plperlu--1.0.sql */

-- complain if script is sourced in psql, rather than via CREATE EXTENSION
\echo Use "CREATE EXTENSION hstore_plperlu" to load this file. \quit

-- make sure the prerequisite libraries are loaded
LOAD 'plperl';
SELECT NULL::hstore;


CREATE FUNCTION hstore_to_plperlu(val internal) RETURNS internal
LANGUAGE C STRICT IMMUTABLE
AS 'MODULE_PATHNAME', 'hstore_to_plperl';

CREATE FUNCTION plperlu_to_hstore(val internal) RETURNS hstore
LANGUAGE C STRICT IMMUTABLE
AS 'MODULE_PATHNAME', 'plperl_to_hstore';

CREATE TRANSFORM FOR hstore LANGUAGE plperlu (
    FROM SQL WITH FUNCTION hstore_to_plperlu(internal),
    TO SQL WITH FUNCTION plperlu_to_hstore(internal)
);