← Back to branch summary

~vcs-imports/mammoth-replicator/trunk

« back to all changes in this revision

Viewing changes to src/interfaces/ecpg/test/testdynalloc.pgc

  • Committer: alvherre
  • Date: 2005-12-16 21:24:52 UTC
  • Revision ID: svn-v4:db760fc0-0f08-0410-9d63-cc6633f64896:trunk:1
Initial import of the REL8_0_3 sources from the Pgsql CVS repository.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/interfaces/ecpg/test/testdynalloc.pgc
 
1
#include <stdio.h>
 
2
exec sql include sqlca;
 
3
#include <stdlib.h>
 
4
 
 
5
int main()
 
6
{  
 
7
   exec sql begin declare section;
 
8
   char **cpp=0;
 
9
   int *ipointer=0;
 
10
   exec sql end declare section;
 
11
   int i;
 
12
 
 
13
   if (getenv("SQLOPT")) ECPGdebug(1,stderr);
 
14
 
 
15
   exec sql whenever sqlerror do sqlprint();
 
16
   exec sql connect to template1;
 
17
   
 
18
   exec sql allocate descriptor mydesc;
 
19
   exec sql select tablename into descriptor mydesc from pg_tables;
 
20
   exec sql get descriptor mydesc value 1 :cpp=DATA, :ipointer=INDICATOR;
 
21
 
 
22
   printf("Result ");
 
23
   for (i=0;i<sqlca.sqlerrd[2];++i)
 
24
   {  if (ipointer[i]) printf("NULL, ");
 
25
      else printf("'%s', ",cpp[i]); 
 
26
   }
 
27
   ECPGfree_auto_mem();
 
28
   printf("\n");
 
29
 
 
30
   exec sql deallocate descriptor mydesc;
 
31
   exec sql disconnect;
 
32
   return 0;
 
33
}