中序遍历线索二叉树

int InOrderTraverse(BiThrTree T)
{
   BiThrTree p=T->lchild;
   while(p!=T)
   {
      while(p->Ltag==Link)  p=p->lchild;
     printf("%c,",p->data );
  while(p->Rtag==Thread  && p->rchild!=T)
  {
    p=p->rchild;printf("%c,",p->data );
  }
   p=p->rchild;
   }
  return 1;
}