1
*** /laptop/my2pg.pl Mon Apr 19 18:51:44 2004
2
--- my2pg.pl Mon Apr 19 18:59:09 2004
6
# $My2pg: my2pg.pl,v 1.28 2001/12/06 19:32:20 fonin Exp $
7
# $Id: my2pg.diff,v 1.1 2004-04-19 23:18:12 momjian Exp $
10
+ # Revision 1.9 2002/08/22 00:01:39 tgl
11
+ # Add a bunch of pseudo-types to replace the behavior formerly associated
12
+ # with OPAQUE, as per recent pghackers discussion. I still want to do some
13
+ # more work on the 'cstring' pseudo-type, but I'm going to commit the bulk
14
+ # of the changes now before the tree starts shifting under me ...
17
# $Log: my2pg.diff,v $
18
# Revision 1.1 2004-04-19 23:18:12 momjian
19
# Update to my2pg version 1.28, add docs, update URL for newest version.
21
# Create diff of custom changes Tom made to the utility for CREATE
24
# This will make moving this utility out of CVS easier.
26
# Revision 1.28 2002/11/30 12:03:48 fonin
29
print LIBTYPES "\n * Types for table ".uc($table_name);
30
print LIBTYPES "\n */\n";
32
! $types.="\nCREATE FUNCTION $typename"."_in (opaque)
36
! WITH (ISCACHABLE);\n";
38
# creating output function
41
print LIBTYPES "\n * Types for table ".uc($table_name);
42
print LIBTYPES "\n */\n";
44
! $types.="\nCREATE FUNCTION $typename"."_in (cstring)
48
! WITH (ISSTRICT, ISCACHABLE);\n";
50
# creating output function
57
! $types.="\nCREATE FUNCTION $typename"."_out (opaque)
61
! WITH (ISCACHABLE);\n";
63
$types.="\nCREATE TYPE $typename (
69
! $types.="\nCREATE FUNCTION $typename"."_out ($typename)
73
! WITH (ISSTRICT, ISCACHABLE);\n";
75
$types.="\nCREATE TYPE $typename (
79
print LIBTYPES "\n * Types for table ".uc($table_name);
80
print LIBTYPES "\n */\n";
82
! $types.="\nCREATE FUNCTION $typename"."_in (opaque)
87
print LIBTYPES "\n * Types for table ".uc($table_name);
88
print LIBTYPES "\n */\n";
90
! $types.="\nCREATE FUNCTION $typename"."_in (cstring)
99
! $types.="\nCREATE FUNCTION $typename"."_out (opaque)
108
! $types.="\nCREATE FUNCTION $typename"."_out ($typename)