*** pgsql/src/interfaces/ecpg/test/pgtypeslib/nan_test.pgc	2010/02/09 08:57:13	1.4
--- pgsql/src/interfaces/ecpg/test/pgtypeslib/nan_test.pgc	2010/02/16 18:41:23	1.5
*************** main(void)
*** 37,46 ****
  		exec sql fetch from cur into :id, :d, :val;
  		if (sqlca.sqlcode)
  			break;
- 		if (isinf(d))
- 			printf("%d %sInf '%s'\n", id, (d < 0 ? "-" : "+"), val);
  		if (isnan(d))
  			printf("%d  NaN '%s'\n", id, val);
  
  		exec sql insert into nantest1 (id, d) values (:id + 3, :d);
  		exec sql insert into nantest1 (id, d) values (:id + 6, :val);
--- 37,46 ----
  		exec sql fetch from cur into :id, :d, :val;
  		if (sqlca.sqlcode)
  			break;
  		if (isnan(d))
  			printf("%d  NaN '%s'\n", id, val);
+ 		else if (isinf(d))
+ 			printf("%d %sInf '%s'\n", id, (d < 0 ? "-" : "+"), val);
  
  		exec sql insert into nantest1 (id, d) values (:id + 3, :d);
  		exec sql insert into nantest1 (id, d) values (:id + 6, :val);