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

18 lines
299 B
C

#include <stdio.h>
#include "tpl.h"
extern tpl_hook_t tpl_hook;
int main() {
tpl_node *tn;
int i;
tpl_hook.oops = printf;
tn = tpl_map("A(i)",&i);
tpl_load(tn,TPL_FILE,"test13.tpl");
while (tpl_unpack(tn,1) > 0) printf("i is %d\n", i);
tpl_free(tn);
return(0);
}