[svn:DBD-Pg] r11865 - DBD-Pg/trunk

Author: turnstep
Date: Mon Sep 22 16:12:49 2008
New Revision: 11865

Modified:
   DBD-Pg/trunk/types.c

Log:
Adjust for new pg_types.h layout


Modified: DBD-Pg/trunk/types.c
==============================================================================
--- DBD-Pg/trunk/types.c	(original)
+++ DBD-Pg/trunk/types.c	Mon Sep 22 16:12:49 2008
@@ -21,7 +21,7 @@
  {PG_ACLITEMARRAY      ,"_aclitem"         ,',',"array_out"       ,quote_string,dequote_string,{0},1,0},
  {PG_BITARRAY          ,"_bit"             ,',',"array_out"       ,quote_string,dequote_string,{0},1,0},
  {PG_BOOLARRAY         ,"_bool"            ,',',"array_out"       ,quote_string,dequote_string,{0},1,0},
- {PG_BOXARRAY          ,"_box"             ,';',"array_out"       ,quote_string,dequote_string,{0},1,0},
+ {PG_BOXARRAY          ,"_box"             ,',',"array_out"       ,quote_string,dequote_string,{0},1,0},
  {PG_BPCHARARRAY       ,"_bpchar"          ,',',"array_out"       ,quote_string,dequote_string,{0},1,0},
  {PG_BYTEAARRAY        ,"_bytea"           ,',',"array_out"       ,quote_string,dequote_string,{0},1,0},
  {PG_CHARARRAY         ,"_char"            ,',',"array_out"       ,quote_string,dequote_string,{0},1,0},
@@ -376,7 +376,7 @@
 while(<$fh>) {
 	s/FLOAT8PASSBYVAL/t/;
 	s/FLOAT4PASSBYVAL/t/;
-	if (/^DATA\(insert OID\s+=\s+(\d+)\s+\(\s+(\S+)\s+\S+ \S+\s+\S+\s+[t|f]\s+. ([tf]) \\(\d+) (\d+)\s+(\d+) (\d+) (\S+) (\S+) (\S+) (\S+)/o) {
+	if (/^DATA\(insert OID\s+=\s+(\d+)\s+\(\s+(\S+)\s+\S+ \S+\s+\S+\s+[t|f]\s+. . [tf] ([tf]) \\(\d+) (\d+)\s+(\d+) (\d+) (\S+) (\S+) (\S+) (\S+)/o) {
 		my ($oid,$name,$typedef,$delim,$typrelid,$typelem,$typarray,$tin,$tout,$bin,$bout) =
 			($1,$2,$3,chr(oct($4)),$5,$6,$7,$8,$9,$10,$11);
 		die "Duplicated OID $oid!: $_\n" if exists $pgtype{$oid};