diff options
Diffstat (limited to 'contrib/int8/int8.source')
| -rw-r--r-- | contrib/int8/int8.source | 288 |
1 files changed, 0 insertions, 288 deletions
diff --git a/contrib/int8/int8.source b/contrib/int8/int8.source deleted file mode 100644 index 3f0e175670..0000000000 --- a/contrib/int8/int8.source +++ /dev/null @@ -1,288 +0,0 @@ ---------------------------------------------------------------------------- --- --- int8.sql- --- This file defines operators for 64-bit integers. --- ---------------------------------------------------------------------------- - -LOAD '_OBJWD_/int8.so'; - -CREATE FUNCTION int8in(opaque) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE FUNCTION int8out(opaque) - RETURNS opaque - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE TYPE int8 ( - internallength = 8, - input = int8in, - output = int8out -); - - ------------------------------ --- Create operators ------------------------------ - -CREATE FUNCTION int8um(int8) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR - ( - rightarg = int8, - procedure = int8um -); - -CREATE FUNCTION int8pl(int8,int8) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR + ( - leftarg = int8, - rightarg = int8, - procedure = int8pl, - commutator = + -); - -CREATE FUNCTION int8mi(int8,int8) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR - ( - leftarg = int8, - rightarg = int8, - procedure = int8mi -); - -CREATE FUNCTION int8mul(int8,int8) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR * ( - leftarg = int8, - rightarg = int8, - procedure = int8mul, - commutator = * -); - -CREATE FUNCTION int8div(int8,int8) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR / ( - leftarg = int8, - rightarg = int8, - procedure = int8div -); - --- --- 64-bit comparison operators --- - -CREATE FUNCTION int8eq(int8,int8) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR = ( - leftarg = int8, - rightarg = int8, - procedure = int8eq, - commutator = = -); - -CREATE FUNCTION int8ne(int8,int8) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR <> ( - leftarg = int8, - rightarg = int8, - procedure = int8ne, - commutator = <> -); - -CREATE FUNCTION int8lt(int8,int8) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR < ( - leftarg = int8, - rightarg = int8, - procedure = int8lt -); - -CREATE FUNCTION int8gt(int8,int8) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR > ( - leftarg = int8, - rightarg = int8, - procedure = int8gt -); - -CREATE FUNCTION int8le(int8,int8) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR <= ( - leftarg = int8, - rightarg = int8, - procedure = int8le -); - -CREATE FUNCTION int8ge(int8,int8) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR >= ( - leftarg = int8, - rightarg = int8, - procedure = int8ge -); - --- --- 64-bit/32-bit comparison operators --- - -CREATE FUNCTION int84eq(int8,int4) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR = ( - leftarg = int8, - rightarg = int4, - procedure = int84eq, - commutator = = -); - -CREATE FUNCTION int84ne(int8,int4) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR <> ( - leftarg = int8, - rightarg = int4, - procedure = int84ne, - commutator = <> -); - -CREATE FUNCTION int84lt(int8,int4) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR < ( - leftarg = int8, - rightarg = int4, - procedure = int84lt -); - -CREATE FUNCTION int84gt(int8,int4) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR > ( - leftarg = int8, - rightarg = int4, - procedure = int84gt -); - -CREATE FUNCTION int84le(int8,int4) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR <= ( - leftarg = int8, - rightarg = int4, - procedure = int84le -); - -CREATE FUNCTION int84ge(int8,int4) - RETURNS bool - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE OPERATOR >= ( - leftarg = int8, - rightarg = int4, - procedure = int84ge -); - --- --- Conversion functions --- - -CREATE FUNCTION int48(int4) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE FUNCTION int84(int8) - RETURNS int4 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - ---CREATE FUNCTION int28(int2) --- RETURNS int8 --- AS '_OBJWD_/int8.so' --- LANGUAGE 'c'; --- ---CREATE FUNCTION int82(int8) --- RETURNS int2 --- AS '_OBJWD_/int8.so' --- LANGUAGE 'c'; - -CREATE FUNCTION i8tod(int8) - RETURNS float8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - -CREATE FUNCTION dtoi8(float8) - RETURNS int8 - AS '_OBJWD_/int8.so' - LANGUAGE 'c'; - --- --- Generic conversion routines --- - -CREATE FUNCTION int8(int4) - RETURNS int8 - AS 'select int48($1)' - LANGUAGE 'sql'; - -CREATE FUNCTION int8(float8) - RETURNS int8 - AS 'select dtoi8($1)' - LANGUAGE 'sql'; - -CREATE FUNCTION float8(int8) - RETURNS float8 - AS 'select i8tod($1)' - LANGUAGE 'sql'; - -CREATE FUNCTION int4(int8) - RETURNS int4 - AS 'select int84($1)' - LANGUAGE 'sql'; - |