2007-03-17 15:25:24 -04:00
/* Processed by ecpg (regression mode) */
/* These include files are added by the preprocessor */
# include <ecpglib.h>
# include <ecpgerrno.h>
# include <sqlca.h>
/* End of automatic include section */
# define ECPGdebug(X,Y) ECPGdebug((X)+100,(Y))
# line 1 "parser.pgc"
# include <stdio.h>
# include <stdlib.h>
# include <string.h>
/* test parser addition that merges two tokens into one */
# line 1 "regression.h"
# line 6 "parser.pgc"
2009-05-20 12:39:56 -04:00
int main ( ) {
2007-03-17 15:25:24 -04:00
/* exec sql begin declare section */
2013-11-10 09:20:52 -05:00
2007-03-17 15:25:24 -04:00
# line 10 "parser.pgc"
2008-12-29 12:07:06 -05:00
int item [ 3 ] , ind [ 3 ] , i ;
2007-03-17 15:25:24 -04:00
/* exec sql end declare section */
# line 11 "parser.pgc"
ECPGdebug ( 1 , stderr ) ;
2016-07-17 18:42:31 -04:00
{ ECPGconnect ( __LINE__ , 0 , " ecpg1_regression " , NULL , NULL , NULL , 0 ) ; }
2007-03-17 15:25:24 -04:00
# line 14 "parser.pgc"
{ ECPGsetcommit ( __LINE__ , " on " , NULL ) ; }
# line 16 "parser.pgc"
/* exec sql whenever sql_warning sqlprint ; */
# line 17 "parser.pgc"
/* exec sql whenever sqlerror sqlprint ; */
# line 18 "parser.pgc"
2008-12-29 12:07:06 -05:00
{ ECPGdo ( __LINE__ , 0 , 1 , NULL , 0 , ECPGst_normal , " create table T ( Item1 int , Item2 int ) " , ECPGt_EOIT , ECPGt_EORT ) ;
2007-03-17 15:25:24 -04:00
# line 20 "parser.pgc"
if ( sqlca . sqlwarn [ 0 ] = = ' W ' ) sqlprint ( ) ;
# line 20 "parser.pgc"
if ( sqlca . sqlcode < 0 ) sqlprint ( ) ; }
# line 20 "parser.pgc"
2013-07-29 18:43:44 -04:00
{ ECPGdo ( __LINE__ , 0 , 1 , NULL , 0 , ECPGst_normal , " insert into t select 1 , nullif ( y - 1 , 0 ) from generate_series ( 1 , 3 ) with ordinality as series ( x , y ) " , ECPGt_EOIT , ECPGt_EORT ) ;
2007-03-17 15:25:24 -04:00
# line 24 "parser.pgc"
if ( sqlca . sqlwarn [ 0 ] = = ' W ' ) sqlprint ( ) ;
# line 24 "parser.pgc"
if ( sqlca . sqlcode < 0 ) sqlprint ( ) ; }
# line 24 "parser.pgc"
2008-12-29 12:07:06 -05:00
{ ECPGdo ( __LINE__ , 0 , 1 , NULL , 0 , ECPGst_normal , " select Item2 from T order by Item2 nulls last " , ECPGt_EOIT ,
2007-03-17 15:25:24 -04:00
ECPGt_int , ( item ) , ( long ) 1 , ( long ) 3 , sizeof ( int ) ,
ECPGt_int , ( ind ) , ( long ) 1 , ( long ) 3 , sizeof ( int ) , ECPGt_EORT ) ;
# line 26 "parser.pgc"
if ( sqlca . sqlwarn [ 0 ] = = ' W ' ) sqlprint ( ) ;
# line 26 "parser.pgc"
if ( sqlca . sqlcode < 0 ) sqlprint ( ) ; }
# line 26 "parser.pgc"
for ( i = 0 ; i < 3 ; i + + )
2013-11-10 09:20:52 -05:00
printf ( " item[%d] = %d \n " , i , ind [ i ] ? - 1 : item [ i ] ) ;
2007-03-17 15:25:24 -04:00
2008-12-29 12:07:06 -05:00
{ ECPGdo ( __LINE__ , 0 , 1 , NULL , 0 , ECPGst_normal , " alter table T alter Item1 type bigint " , ECPGt_EOIT , ECPGt_EORT ) ;
2007-03-17 15:25:24 -04:00
# line 31 "parser.pgc"
if ( sqlca . sqlwarn [ 0 ] = = ' W ' ) sqlprint ( ) ;
# line 31 "parser.pgc"
if ( sqlca . sqlcode < 0 ) sqlprint ( ) ; }
# line 31 "parser.pgc"
2008-12-29 12:07:06 -05:00
{ ECPGdo ( __LINE__ , 0 , 1 , NULL , 0 , ECPGst_normal , " alter table T alter column Item2 set data type smallint " , ECPGt_EOIT , ECPGt_EORT ) ;
2008-10-21 04:38:16 -04:00
# line 32 "parser.pgc"
if ( sqlca . sqlwarn [ 0 ] = = ' W ' ) sqlprint ( ) ;
# line 32 "parser.pgc"
if ( sqlca . sqlcode < 0 ) sqlprint ( ) ; }
# line 32 "parser.pgc"
2008-12-29 12:07:06 -05:00
{ ECPGdo ( __LINE__ , 0 , 1 , NULL , 0 , ECPGst_normal , " drop table T " , ECPGt_EOIT , ECPGt_EORT ) ;
2008-10-21 04:38:16 -04:00
# line 34 "parser.pgc"
if ( sqlca . sqlwarn [ 0 ] = = ' W ' ) sqlprint ( ) ;
# line 34 "parser.pgc"
if ( sqlca . sqlcode < 0 ) sqlprint ( ) ; }
# line 34 "parser.pgc"
2007-03-17 15:25:24 -04:00
{ ECPGdisconnect ( __LINE__ , " ALL " ) ;
2008-10-21 04:38:16 -04:00
# line 36 "parser.pgc"
2007-03-17 15:25:24 -04:00
if ( sqlca . sqlwarn [ 0 ] = = ' W ' ) sqlprint ( ) ;
2008-10-21 04:38:16 -04:00
# line 36 "parser.pgc"
2007-03-17 15:25:24 -04:00
if ( sqlca . sqlcode < 0 ) sqlprint ( ) ; }
2008-10-21 04:38:16 -04:00
# line 36 "parser.pgc"
2007-03-17 15:25:24 -04:00
return 0 ;
}