1 #include <stdio.h> 2 #include "tpl.h" 3 main()4int 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