1 #include <stdio.h>
2 #include "tpl.h"
3 
main()4 int main() {
5     tpl_node *tn;
6     int i;
7 
8     tn = tpl_map("A(i)",&i);
9     for(i=0;i<10;i++) tpl_pack(tn,1);
10 
11     /* test pack-then-unpack without dump/load; implicit dump/load*/
12     while (tpl_unpack(tn,1) > 0) printf("i is %d\n", i);
13 
14     /* implicit conversion back to output tpl (discards previous data in tpl */
15     for(i=0;i>-10;i--) tpl_pack(tn,1);
16 
17     /* one more implicit conversion */
18     while (tpl_unpack(tn,1) > 0) printf("i is %d\n", i);
19 
20     tpl_free(tn);
21     return(0);
22 }
23