Skip to content

P
Postgres FD Implementation
Commit 58fb345d authored by Michael Meskes's avatar Michael Meskes
Browse files
Options

Usage of isnan() in ECPG regression tests probably needs '#include <float.h>' as well.

parent a96ad2fc
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 221 additions and 219 deletions
src/interfaces/ecpg/test/expected/pgtypeslib-nan_test.c
View file @ 58fb345d
......@@ -10,6 +10,7 @@
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <float.h>
#include <pgtypes_numeric.h>
#include <decimal.h>
......@@ -21,7 +22,7 @@
#line 7 "nan_test.pgc"
#line 8 "nan_test.pgc"
int
......@@ -33,54 +34,54 @@ main(void)
#line 13 "nan_test.pgc"
#line 14 "nan_test.pgc"
int id ;
#line 14 "nan_test.pgc"
#line 15 "nan_test.pgc"
double d ;
#line 15 "nan_test.pgc"
#line 16 "nan_test.pgc"
numeric * num ;
#line 16 "nan_test.pgc"
#line 17 "nan_test.pgc"
char val [ 16 ] ;
/* exec sql end declare section */
#line 17 "nan_test.pgc"
#line 18 "nan_test.pgc"
ECPGdebug(1, stderr);
/* exec sql whenever sqlerror do sqlprint ( ) ; */
#line 20 "nan_test.pgc"
#line 21 "nan_test.pgc"
{ ECPGconnect(__LINE__, 0, "regress1" , NULL, NULL , NULL, 0);
#line 22 "nan_test.pgc"
#line 23 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 22 "nan_test.pgc"
#line 23 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "create table nantest1 ( id int4 , d float8 )", ECPGt_EOIT, ECPGt_EORT);
#line 24 "nan_test.pgc"
#line 25 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 24 "nan_test.pgc"
#line 25 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into nantest1 ( id , d ) values ( 1 , 'nan' :: float8 ) , ( 2 , 'infinity' :: float8 ) , ( 3 , '-infinity' :: float8 )", ECPGt_EOIT, ECPGt_EORT);
#line 25 "nan_test.pgc"
#line 26 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 25 "nan_test.pgc"
#line 26 "nan_test.pgc"
/* declare cur cursor for select id , d , d from nantest1 */
#line 27 "nan_test.pgc"
#line 28 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare cur cursor for select id , d , d from nantest1", ECPGt_EOIT, ECPGt_EORT);
#line 28 "nan_test.pgc"
#line 29 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 28 "nan_test.pgc"
#line 29 "nan_test.pgc"
while (1)
{
......@@ -91,10 +92,10 @@ if (sqlca.sqlcode < 0) sqlprint ( );}
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(val),(long)16,(long)1,(16)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 31 "nan_test.pgc"
#line 32 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 31 "nan_test.pgc"
#line 32 "nan_test.pgc"
if (sqlca.sqlcode)
break;
......@@ -108,34 +109,34 @@ if (sqlca.sqlcode < 0) sqlprint ( );}
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_double,&(d),(long)1,(long)1,sizeof(double),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 39 "nan_test.pgc"
#line 40 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 39 "nan_test.pgc"
#line 40 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into nantest1 ( id , d ) values ( $1 + 6 , $2 )",
ECPGt_int,&(id),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(val),(long)16,(long)1,(16)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 40 "nan_test.pgc"
#line 41 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 40 "nan_test.pgc"
#line 41 "nan_test.pgc"
}
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close cur", ECPGt_EOIT, ECPGt_EORT);
#line 42 "nan_test.pgc"
#line 43 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 42 "nan_test.pgc"
#line 43 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare cur cursor for select id , d , d from nantest1", ECPGt_EOIT, ECPGt_EORT);
#line 44 "nan_test.pgc"
#line 45 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 44 "nan_test.pgc"
#line 45 "nan_test.pgc"
while (1)
{
......@@ -146,10 +147,10 @@ if (sqlca.sqlcode < 0) sqlprint ( );}
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(val),(long)16,(long)1,(16)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 47 "nan_test.pgc"
#line 48 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 47 "nan_test.pgc"
#line 48 "nan_test.pgc"
if (sqlca.sqlcode)
break;
......@@ -159,25 +160,25 @@ if (sqlca.sqlcode < 0) sqlprint ( );}
printf("%d NaN '%s'\n", id, val);
}
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close cur", ECPGt_EOIT, ECPGt_EORT);
#line 55 "nan_test.pgc"
#line 56 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 55 "nan_test.pgc"
#line 56 "nan_test.pgc"
num = PGTYPESnumeric_new();
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "create table nantest2 ( id int4 , d numeric )", ECPGt_EOIT, ECPGt_EORT);
#line 59 "nan_test.pgc"
#line 60 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 59 "nan_test.pgc"
#line 60 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into nantest2 ( id , d ) values ( 4 , 'nan' :: numeric )", ECPGt_EOIT, ECPGt_EORT);
#line 60 "nan_test.pgc"
#line 61 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 60 "nan_test.pgc"
#line 61 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select id , d , d from nantest2 where id = 4", ECPGt_EOIT,
......@@ -187,10 +188,10 @@ if (sqlca.sqlcode < 0) sqlprint ( );}
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(val),(long)16,(long)1,(16)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 62 "nan_test.pgc"
#line 63 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 62 "nan_test.pgc"
#line 63 "nan_test.pgc"
printf("%d %s '%s'\n", id, (num->sign == NUMERIC_NAN ? "NaN" : "not NaN"), val);
......@@ -198,28 +199,28 @@ if (sqlca.sqlcode < 0) sqlprint ( );}
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into nantest2 ( id , d ) values ( 5 , $1 )",
ECPGt_numeric,&(num),(long)1,(long)0,sizeof(numeric),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 66 "nan_test.pgc"
#line 67 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 66 "nan_test.pgc"
#line 67 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into nantest2 ( id , d ) values ( 6 , $1 )",
ECPGt_char,(val),(long)16,(long)1,(16)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 67 "nan_test.pgc"
#line 68 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 67 "nan_test.pgc"
#line 68 "nan_test.pgc"
/* declare cur1 cursor for select id , d , d from nantest2 */
#line 69 "nan_test.pgc"
#line 70 "nan_test.pgc"
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare cur1 cursor for select id , d , d from nantest2", ECPGt_EOIT, ECPGt_EORT);
#line 70 "nan_test.pgc"
#line 71 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 70 "nan_test.pgc"
#line 71 "nan_test.pgc"
while (1)
{
......@@ -230,33 +231,33 @@ if (sqlca.sqlcode < 0) sqlprint ( );}
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(val),(long)16,(long)1,(16)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 73 "nan_test.pgc"
#line 74 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 73 "nan_test.pgc"
#line 74 "nan_test.pgc"
if (sqlca.sqlcode)
break;
printf("%d %s '%s'\n", id, (num->sign == NUMERIC_NAN ? "NaN" : "not NaN"), val);
}
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close cur1", ECPGt_EOIT, ECPGt_EORT);
#line 78 "nan_test.pgc"
#line 79 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 78 "nan_test.pgc"
#line 79 "nan_test.pgc"
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 80 "nan_test.pgc"
#line 81 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 80 "nan_test.pgc"
#line 81 "nan_test.pgc"
{ ECPGdisconnect(__LINE__, "CURRENT");
#line 81 "nan_test.pgc"
#line 82 "nan_test.pgc"
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 81 "nan_test.pgc"
#line 82 "nan_test.pgc"
return (0);
......
src/interfaces/ecpg/test/pgtypeslib/nan_test.pgc
View file @ 58fb345d
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <float.h>
#include <pgtypes_numeric.h>
#include <decimal.h>
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment