tpl/tests/test52.c
2013-03-12 16:38:58 -04:00

31 lines
562 B
C

#include <stdio.h>
#include "tpl.h"
int main() {
tpl_node *tn;
int j;
tn = tpl_map("A(A(i))",&j);
j=1;
tpl_pack(tn,2);
tpl_pack(tn,1);
j=2;
tpl_pack(tn,2);
/* omit packing parent */
tpl_dump(tn, TPL_FILE, "/tmp/test52.tpl");
tpl_free(tn);
tn = tpl_map("A(A(i))",&j);
tpl_load(tn, TPL_FILE, "/tmp/test52.tpl");
while(tpl_unpack(tn,1) > 0) {
printf("----------\n");
while(tpl_unpack(tn,2) > 0) {
printf("--> j is %d\n", j);
}
}
tpl_free(tn);
return(0);
}