Update tpl.c