tpl/tests/test62.c

21 lines
515 B
C
Raw Normal View History

2013-03-12 16:38:58 -04:00
#include <stdio.h>
#include "tpl.h"
int main() {
tpl_node *tn;
int i;
tn = tpl_map("A(i)",&i);
tpl_load(tn,TPL_FILE,"test62_0.tpl");
while (tpl_unpack(tn,1) > 0) printf("i is %d\n", i);
/* test load-then-pack (then load): implicit free via tpl_free_keep_map */
for(i=0;i>-10;i--) tpl_pack(tn,1);
tpl_dump(tn, TPL_FILE,"/tmp/test62_1.tpl");
tpl_load(tn,TPL_FILE,"/tmp/test62_1.tpl");
while (tpl_unpack(tn,1) > 0) printf("i is %d\n", i);
tpl_free(tn);
return(0);
}