*** empty log message ***

1 files changed, 20 insertions, 6 deletions

diff --git a/src/interfaces/ecpg/test/test4.pgc b/src/interfaces/ecpg/test/test4.pgc
index 191a74789e..c61d5f0c7f 100644
--- a/src/interfaces/ecpg/test/test4.pgc
+++ b/src/interfaces/ecpg/test/test4.pgc
@@ -6,7 +6,8 @@ int
 main ()
 {
 EXEC SQL BEGIN DECLARE SECTION;
-	int a = 1;
+	int i = 1;
+	int a[10] = {9,8,7,6,5,4,3,2,1,0};
 	double f;
 EXEC SQL END DECLARE SECTION;
 	FILE *dbgs;
@@ -16,23 +17,31 @@ EXEC SQL END DECLARE SECTION;
 
         EXEC SQL CONNECT TO mm;
 
-	EXEC SQL CREATE TABLE test (f decimal(8,2), a int);
+	EXEC SQL SET AUTOCOMMIT = ON;
 
-	EXEC SQL INSERT INTO test(f,a) VALUES(17000.00,1);
+ 	EXEC SQL BEGIN WORK;
+
+	EXEC SQL CREATE TABLE test (f decimal(8,2), i int, a int[10]);
+
+	EXEC SQL INSERT INTO test(f,i,a) VALUES(17000.00,1,'{0,1,2,3,4,5,6,7,8,9}');
+
+/*	EXEC SQL INSERT INTO test(f,i,a) VALUES(140787.0,2,:a);*/
 
 	EXEC SQL COMMIT;
 
+	EXEC SQL BEGIN WORK; 
+
 	EXEC SQL SELECT f::float
          INTO :f
          FROM test
-         WHERE a = :a;
+         WHERE i = :i;
 
 	printf("Found f::float=%f\n", f);
 
 	EXEC SQL SELECT f
          INTO :f
          FROM test
-         WHERE a = :a;
+         WHERE i = :i;
 
 	printf("Found f=%f\n", f);
 
@@ -41,4 +50,9 @@ EXEC SQL END DECLARE SECTION;
 	EXEC SQL COMMIT;
 
 	EXEC SQL DISCONNECT;
-}	
+
+	if (dbgs != NULL)
+                fclose(dbgs);
+
+	return (0);
+}