
  TYPE
    pft$p_info = ^pft$info;

*copyc pft$info
