*** empty log message ***
This commit is contained in:
Edmund Mergl
parent
09e41a037e
commit
234776dbbc
@ -2,11 +2,11 @@
|
||||
|
||||
# demo script, has been tested with:
|
||||
# - Postgres-6.1
|
||||
# - apache_1.2b8
|
||||
# - mod_perl-0.97
|
||||
# - perl5.003_93
|
||||
# - apache_1.2
|
||||
# - mod_perl-1.0
|
||||
# - perl5.004
|
||||
|
||||
use CGI::Apache;
|
||||
use CGI;
|
||||
use Pg;
|
||||
use strict;
|
||||
|
||||
|
||||
@ -51,7 +51,7 @@ Revision history for Perl extension Pg.
|
||||
- changed test.pl for large objects:
|
||||
test only lo_import and lo_export
|
||||
|
||||
1.6.0 Apr 29, 1997
|
||||
1.6.1 Jun 02 1997
|
||||
- renamed to pgsql_perl5
|
||||
- adapted to PostgreSQL-6.1
|
||||
- test only functions, which are also
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#-------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile.PL,v 1.1.1.1 1997/04/29 19:37:09 mergl Exp $
|
||||
# $Id: Makefile.PL,v 1.2 1997/06/02 19:41:59 mergl Exp $
|
||||
#
|
||||
# Copyright (c) 1997 Edmund Mergl
|
||||
#
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#-------------------------------------------------------
|
||||
#
|
||||
# $Id: Pg.pm,v 1.1.1.1 1997/04/29 19:37:10 mergl Exp $
|
||||
# $Id: Pg.pm,v 1.2 1997/06/02 19:42:01 mergl Exp $
|
||||
#
|
||||
# Copyright (c) 1997 Edmund Mergl
|
||||
#
|
||||
@ -83,7 +83,7 @@ require 5.003;
|
||||
PGRES_InvalidOid
|
||||
);
|
||||
|
||||
$VERSION = '1.6.0';
|
||||
$VERSION = '1.6.1';
|
||||
|
||||
sub AUTOLOAD {
|
||||
# This AUTOLOAD is used to 'autoload' constants from the constant()
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
/*-------------------------------------------------------
|
||||
*
|
||||
* $Id: Pg.xs,v 1.1.1.1 1997/04/29 19:37:10 mergl Exp $
|
||||
* $Id: Pg.xs,v 1.2 1997/06/02 19:42:03 mergl Exp $
|
||||
*
|
||||
* Copyright (c) 1997 Edmund Mergl
|
||||
*
|
||||
@ -424,6 +424,18 @@ PQclear(res)
|
||||
PGresult * res
|
||||
|
||||
|
||||
void
|
||||
PQdisplayTuples(res, fp, fillAlign, fieldSep, printHeader, quiet)
|
||||
PGresult * res
|
||||
FILE * fp
|
||||
int fillAlign
|
||||
char * fieldSep
|
||||
int printHeader
|
||||
int quiet
|
||||
CODE:
|
||||
PQdisplayTuples(res, fp, fillAlign, (const char *)fieldSep, printHeader, quiet);
|
||||
|
||||
|
||||
void
|
||||
PQprintTuples(res, fout, printAttName, terseOutput, width)
|
||||
PGresult * res
|
||||
@ -904,6 +916,18 @@ PQgetisnull(res, tup_num, field_num)
|
||||
int field_num
|
||||
|
||||
|
||||
void
|
||||
PQdisplayTuples(res, fp, fillAlign, fieldSep, printHeader, quiet)
|
||||
PGresult * res
|
||||
FILE * fp
|
||||
int fillAlign
|
||||
char * fieldSep
|
||||
int printHeader
|
||||
int quiet
|
||||
CODE:
|
||||
PQdisplayTuples(res, fp, fillAlign, (const char *)fieldSep, printHeader, quiet);
|
||||
|
||||
|
||||
void
|
||||
PQprintTuples(res, fout, printAttName, terseOutput, width)
|
||||
PG_result res
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#-------------------------------------------------------
|
||||
#
|
||||
# $Id: README,v 1.1.1.1 1997/04/29 19:37:10 mergl Exp $
|
||||
# $Id: README,v 1.2 1997/06/02 19:42:05 mergl Exp $
|
||||
#
|
||||
# Copyright (c) 1997 Edmund Mergl
|
||||
#
|
||||
@ -25,13 +25,17 @@ programmers.
|
||||
|
||||
|
||||
|
||||
COPYRIGHT INFO
|
||||
--------------
|
||||
COPYRIGHT:
|
||||
----------
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of either:
|
||||
|
||||
a) the GNU General Public License as published by the Free
|
||||
Software Foundation; or
|
||||
|
||||
b) the "Artistic License", as specified in the Perl README file.
|
||||
|
||||
This Postgres-Perl interface is copyright 1996, 1997 Edmund Mergl. You are
|
||||
free to use it for any purpose, commercial or noncommercial, provided
|
||||
that if you redistribute the source code, this statement of copyright
|
||||
remains attached.
|
||||
|
||||
|
||||
IF YOU HAVE PROBLEMS:
|
||||
@ -98,8 +102,15 @@ If you have compile errors like "XS_VERSION_BOOTCHECK undeclared", make a
|
||||
If this file is not present, you need to recompile and reinstall perl.
|
||||
|
||||
|
||||
---------------------------------------------------------------------------
|
||||
DOCUMENTATION:
|
||||
--------------
|
||||
|
||||
Detailed documentation can be found in Pg.pm. Use 'perldoc Pg' after
|
||||
installation to read the documentation.
|
||||
|
||||
Edmund Mergl <E.Mergl@bawue.de> April 29, 1997
|
||||
|
||||
---------------------------------------------------------------------------
|
||||
|
||||
Edmund Mergl <E.Mergl@bawue.de> June 02, 1997
|
||||
|
||||
---------------------------------------------------------------------------
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#-------------------------------------------------------
|
||||
#
|
||||
# $Id: test.pl,v 1.1.1.1 1997/04/29 19:37:10 mergl Exp $
|
||||
# $Id: test.pl,v 1.2 1997/06/02 19:42:07 mergl Exp $
|
||||
#
|
||||
# Copyright (c) 1997 Edmund Mergl
|
||||
#
|
||||
@ -65,6 +65,7 @@ $| = 1;
|
||||
# getisnull
|
||||
# print
|
||||
# notifies
|
||||
# displayTuples
|
||||
# printTuples
|
||||
# lo_import
|
||||
# lo_export
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#-------------------------------------------------------
|
||||
#
|
||||
# $Id: test.pl.newstyle,v 1.1.1.1 1997/04/29 19:37:10 mergl Exp $
|
||||
# $Id: test.pl.newstyle,v 1.2 1997/06/02 19:42:11 mergl Exp $
|
||||
#
|
||||
# Copyright (c) 1997 Edmund Mergl
|
||||
#
|
||||
@ -68,6 +68,7 @@ $| = 1;
|
||||
# tty
|
||||
# getlength
|
||||
# getisnull
|
||||
# displayTuples
|
||||
# printTuples
|
||||
# lo_open
|
||||
# lo_close
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#-------------------------------------------------------
|
||||
#
|
||||
# $Id: test.pl.oldstyle,v 1.1.1.1 1997/04/29 19:37:10 mergl Exp $
|
||||
# $Id: test.pl.oldstyle,v 1.2 1997/06/02 19:42:13 mergl Exp $
|
||||
#
|
||||
# Copyright (c) 1997 Edmund Mergl
|
||||
#
|
||||
@ -68,6 +68,7 @@ $| = 1;
|
||||
# PQtty()
|
||||
# PQgetlength()
|
||||
# PQgetisnull()
|
||||
# PQdisplayTuples()
|
||||
# PQprintTuples()
|
||||
# PQlo_open()
|
||||
# PQlo_close()
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#-------------------------------------------------------
|
||||
#
|
||||
# $Id: typemap,v 1.1.1.1 1997/04/29 19:37:10 mergl Exp $
|
||||
# $Id: typemap,v 1.2 1997/06/02 19:42:14 mergl Exp $
|
||||
#
|
||||
# Copyright (c) 1997 Edmund Mergl
|
||||
#
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user