simple test for names = ft_getpnames() versus free_pnode(names)
.control
let buf = 0
let buf = buf + 1
quit
.endc
.end