summaryrefslogtreecommitdiff
path: root/src/interfaces/ecpg/test/test5.pgc
diff options
context:
space:
mode:
Diffstat (limited to 'src/interfaces/ecpg/test/test5.pgc')
-rw-r--r--src/interfaces/ecpg/test/test5.pgc62
1 files changed, 0 insertions, 62 deletions
diff --git a/src/interfaces/ecpg/test/test5.pgc b/src/interfaces/ecpg/test/test5.pgc
deleted file mode 100644
index 1c9289a77d5..00000000000
--- a/src/interfaces/ecpg/test/test5.pgc
+++ /dev/null
@@ -1,62 +0,0 @@
-#include <stdlib.h>
-#include <stdio.h>
-
-EXEC SQL INCLUDE sqlca;
-
-static void ErrorExit (void);
-
-int main (void)
- {
- EXEC SQL BEGIN DECLARE SECTION;
- int result;
- int values[2], i;
- EXEC SQL END DECLARE SECTION;
- FILE *dbgs;
-
- if ((dbgs = fopen("log", "w")) != NULL)
- ECPGdebug(1, dbgs);
-
- EXEC SQL WHENEVER SQLERROR DO ErrorExit();
- EXEC SQL CONNECT TO 'mm';
- EXEC SQL CREATE TABLE tab (index int);
- EXEC SQL INSERT INTO tab(index) values(14);
- EXEC SQL INSERT INTO tab(index) values(7);
- EXEC SQL COMMIT;
-
- EXEC SQL CREATE FUNCTION my_fun () RETURNS int AS
- '/home/postgres/pgsql/src/interfaces/ecpg.mm/test/stp.so' LANGUAGE 'C';
- EXEC SQL COMMIT;
-
- EXEC SQL SELECT index INTO :values FROM tab;
- for (i = 0; i < 2; i++)
- printf("tab[%d] = %d\n", i, values[i]);
-
- EXEC SQL SELECT my_fun () INTO :result;
- printf ("result = %d\n", result);
-
- EXEC SQL DROP TABLE tab;
- EXEC SQL DROP FUNCTION my_fun ();
- EXEC SQL COMMIT;
- EXEC SQL DISCONNECT;
-
- if (dbgs != NULL)
- fclose(dbgs);
- exit (0);
- }
-
-
-static void ErrorExit (void)
- {
- EXEC SQL WHENEVER SQLERROR CONTINUE;
-
- sqlprint();
-
- EXEC SQL ROLLBACK;
-
- EXEC SQL DROP TABLE tab;
- EXEC SQL DROP FUNCTION my_fun ();
- EXEC SQL COMMIT;
-
- EXEC SQL DISCONNECT;
- exit (-1);
- }