算法5.8.txt

来自「数据结构课件」· 文本 代码 · 共 31 行

int  Create(GList *ls, char * S)
  { Glist  p;  char  *sub;
   if StrEmpty(S)  *ls = NULL;
   else {
    if (!(*ls=(GList)malloc(sizeof(GLNode))))  return  0;
    if (StrLength(S) = = 1) {
      (*ls)->tag = 0;
      (*ls)->data = S;
     }
    else {
      (*ls)->tag = 1;
      p = *ls;
      hsub =SubStr(S,2,StrLength(S)-2);
      do {
        sever(sub,hsub);
        Create(&(p->ptr.hp), sub);
        q = p;
        if (!StrEmpty(sub)){
          if (!(p = (GList)malloc(sizeof(GLNode))))  return 0;;
          p->tag = 1;
          q->ptr.tp = p;
         }
       }while (!StrEmpty(sub));
       q->ptr.tp = NULL;
      }
     }
   return 1;
  }
算法 5.8