pike.git/ src/ test/ verifymanual.lpc

1995-11-12

1995-11-12 23:10:16 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 7478d0f072c8fa7bc1feab91ccc840a5ddc5f156 (13 lines) (+12/-1) ^{[ Show | Annotate ]}
  Branch: branches/E-12

now checks for name in SYNTAX field

Rev: src/test/verifymanual.lpc:1.2

35:    int partno;    foreach(explode(cont,"============================================================================\n"),part)    { +  string part_name="error";    list headers = (<>);    partno++;   
77:    switch(type)    {    case "NAME": -  if(sscanf(rest,"\t%s - %s",a,b)!=2) +  if(sscanf(rest,"\t%s - %s",part_name,b)!=2)    {    perror("Error in header "+type+" in "+path+" part "+partno+".\n");    errs++;
89:    }    break;    +  case "SYNTAX": +  if(efuns[name] && search(rest, part_name)==-1) +  { +  perror("SYNTAX header does not contain name in "+path+" part "+partno+".\n"); +  errs++; +  } +  break; +     case "SEE ALSO":    rest=replace(rest,({"\n",",","\t"}),({" "," "," "}));    see_also|=mklist((rest/" ")-({" "})); -  +  break;    }    }    }