Age Owner TLA Line data Source code
1 : #include <stdio.h>
2 : #include <stdlib.h>
3 : #include <string.h>
4 :
5 : /* test parser addition that merges two tokens into one */
6 : EXEC SQL INCLUDE ../regression;
7 :
5072 meskes 8 CBC 1 : int main() {
9 : EXEC SQL BEGIN DECLARE SECTION;
10 : int item[3], ind[3], i;
11 : EXEC SQL END DECLARE SECTION;
12 :
5867 13 1 : ECPGdebug(1, stderr);
14 1 : EXEC SQL CONNECT TO REGRESSDB1;
15 :
16 1 : EXEC SQL SET AUTOCOMMIT TO ON;
17 : EXEC SQL WHENEVER SQLWARNING SQLPRINT;
18 : EXEC SQL WHENEVER SQLERROR SQLPRINT;
19 :
20 1 : EXEC SQL CREATE TABLE T ( Item1 int, Item2 int );
21 1 :
3437 peter_e 22 1 : EXEC SQL INSERT INTO t
23 : SELECT 1,nullif(y-1,0)
24 : FROM generate_series(1,3) WITH ORDINALITY AS series(x,y);
5867 meskes 25 1 :
26 1 : EXEC SQL SELECT Item2 INTO :item:ind FROM T ORDER BY Item2 NULLS LAST;
27 1 :
28 4 : for (i=0; i<3; i++)
3437 peter_e 29 3 : printf("item[%d] = %d\n", i, ind[i] ? -1 : item[i]);
30 :
5283 31 1 : EXEC SQL ALTER TABLE T ALTER Item1 TYPE bigint;
32 1 : EXEC SQL ALTER TABLE T ALTER COLUMN Item2 SET DATA TYPE smallint;
33 1 :
5867 meskes 34 1 : EXEC SQL DROP TABLE T;
35 1 :
36 1 : EXEC SQL DISCONNECT ALL;
37 1 :
38 1 : return 0;
39 : }
|