contrib/bool_plperl/bool_plperlu--1.0.sql

   1 /* contrib/bool_plperl/bool_plperlu--1.0.sql */
   2
   3 -- complain if script is sourced in psql, rather than via CREATE EXTENSION
   4 \echo Use "CREATE EXTENSION bool_plperlu" to load this file. \quit
   5
   6 CREATE FUNCTION bool_to_plperlu(val internal) RETURNS internal
   7 LANGUAGE C STRICT IMMUTABLE
   8 AS 'MODULE_PATHNAME', 'bool_to_plperl';
   9
  10 CREATE FUNCTION plperlu_to_bool(val internal) RETURNS bool
  11 LANGUAGE C STRICT IMMUTABLE
  12 AS 'MODULE_PATHNAME', 'plperl_to_bool';
  13
  14 CREATE TRANSFORM FOR bool LANGUAGE plperlu (
  15     FROM SQL WITH FUNCTION bool_to_plperlu(internal),
  16     TO SQL WITH FUNCTION plperlu_to_bool(internal)
  17 );
  18
  19 COMMENT ON TRANSFORM FOR bool LANGUAGE plperlu IS 'transform between bool and Perl';