pub unsafe fn ptr_table_split(my_perl: *mut interpreter, a: *mut ptr_tbl)
ptr_table_split [THX] - macro function