|
35 | 35 | # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
36 | 36 | # SUCH DAMAGE. |
37 | 37 | # |
38 | | -# $My2pg: my2pg.pl,v 1.22 2001/12/06 19:32:20 fonin Exp $ |
39 | | -# $Id: my2pg.pl,v 1.6 2002/01/07 22:36:51 momjian Exp $ |
| 38 | +# $My2pg: my2pg.pl,v 1.23 2001/12/06 19:32:20 fonin Exp $ |
| 39 | +# $Id: my2pg.pl,v 1.7 2002/02/08 14:47:56 momjian Exp $ |
40 | 40 |
|
41 | 41 | # TODO: |
42 | 42 | # + Handle SETs |
|
47 | 47 |
|
48 | 48 | # |
49 | 49 | # $Log: my2pg.pl,v $ |
50 | | -# Revision 1.6 2002/01/07 22:36:51 momjian |
51 | | -# Update my2pg to version 1.22. |
| 50 | +# Revision 1.7 2002/02/08 14:47:56 momjian |
| 51 | +# Upgrade my2pg version 1.23. |
| 52 | +# |
| 53 | +# Revision 1.23 2002/02/07 22:13:52 fonin |
| 54 | +# Bugfix by Hans-Juergen Schoenig <hs@cybertec.at>: additional space after |
| 55 | +# FLOAT8 is required. |
52 | 56 | # |
53 | 57 | # Revision 1.22 2001/12/06 19:32:20 fonin |
54 | 58 | # Patch: On line 594 where you check for UNIQUE, I believe the regex should try |
|
147 | 151 | $|=1; |
148 | 152 |
|
149 | 153 | print("------------------------------------------------------------------"); |
150 | | -print("\n-- My2Pg\$Revision: 1.6 $\translated dump"); |
| 154 | +print("\n-- My2Pg1.23translated dump"); |
151 | 155 | print("\n--"); |
152 | 156 | print("\n------------------------------------------------------------------"); |
153 | 157 |
|
|
169 | 173 | # push header to libtypes.c |
170 | 174 | open(LIBTYPES,">$libtypesource"); |
171 | 175 | print LIBTYPES"/******************************************************"; |
172 | | -print LIBTYPES"\n * My2Pg\$Revision: 1.6 $\translated dump"; |
| 176 | +print LIBTYPES"\n * My2Pg\$Revision: 1.7 $\translated dump"; |
173 | 177 | print LIBTYPES"\n * User types definitions"; |
174 | 178 | print LIBTYPES"\n ******************************************************/"; |
175 | 179 | print LIBTYPES"\n\n#include <postgres.h>\n"; |
|
198 | 202 | s/bigint\(\d+\)/INT8/i; |
199 | 203 | s/int\(\d+\)/INT4/i; |
200 | 204 | s/float(\(\d+,\d*\))/DECIMAL$1/i; |
201 | | -s/double precision/FLOAT8/i; |
| 205 | +s/double precision/FLOAT8/i; |
202 | 206 | s/([\W])double(\(\d+,\d*\))/$1DECIMAL$2/i; |
203 | | -s/([\W])double[\W]/$1FLOAT8/i; |
204 | | -s/([\W])real[\W]/$1FLOAT8/i; |
| 207 | +s/([\W])double[\W]/$1FLOAT8/i; |
| 208 | +s/([\W])real[\W]/$1FLOAT8/i; |
205 | 209 | s/([\W])real(\(\d+,\d*\))/$1DECIMAL$2/i; |
206 | 210 |
|
207 | 211 | # Convert string types |
|
700 | 704 |
|
701 | 705 | open(MAKE,">Makefile"); |
702 | 706 | print MAKE"# |
703 | | -# My2Pg\$Revision: 1.6 $\translated dump |
| 707 | +# My2Pg\$Revision: 1.7 $\translated dump |
704 | 708 | # Makefile |
705 | 709 | # |
706 | 710 |
|
|