pike.git / bin / mkxml.pike

version» Context lines:

pike.git/bin/mkxml.pike:1: - /* $Id: mkxml.pike,v 1.29 2001/07/20 00:46:14 nilsson Exp $ */ + /* $Id: mkxml.pike,v 1.30 2001/07/20 04:18:18 nilsson Exp $ */      string LENA_PATH = "../autodoc/image_ill.pnm";   string makepic1;   string makepic2;      mapping parse=([ " appendix":([]) ]);   int illustration_counter;      #define error(X) throw( ({ (X), backtrace()[0..sizeof(backtrace())-2] }) )   
pike.git/bin/mkxml.pike:593:    switch (enttype)    {    case "appendix":    f->write("<"+enttype+" name="+S(name)+">\n");    break;    case "class":    case "module":    f->write("<"+enttype+" name="+S(canname)+">\n");    break;    default: -  f->write("<docgroup homogen-type="+S(enttype)+ -  " homogen-name="+S(canname)+">\n"); +  f->write("<docgroup homogen-type="+S(enttype)); +  if(huh->decl) { +  lambda() { +  string m,n;    -  +  array decl; +  if(!arrayp(huh->decl)) +  decl = ({ huh->decl }); +  else +  decl = huh->decl; +  +  foreach(decl, string prot) { +  sscanf(prot, "%*s %s(", n); +  if(!m) { m=n; continue; } +  if(n!=m) return; +  } +  if(convname[m]) m=convname[m]; +  f->write(" homogen-name="+S(m)); +  }(); +  } +  f->write(">\n"); +     if (huh->decl)    {    foreach (arrayp(huh->decl)?huh->decl:({huh->decl}),string decl)    {    docdecl(enttype,decl,f);    }    }    else    foreach (names,string name)    {
pike.git/bin/mkxml.pike:819:   }      array(string) tag_quote_args(Parser.HTML p, mapping args) {    return ({ sprintf("<%s%{ %s='%s'%}>", p->tag_name(), (array)args) });   }      void make_doc_files()   {    html2xml=Parser.HTML();    html2xml->add_tag("br",lambda(mixed...) { return ({"<br/>"}); }); -  html2xml->add_tag("wbr",lambda(mixed...) { return ({"<wbr/>"}); }); +  html2xml->add_tag("wbr",lambda(mixed...) { return ({"<br/>"}); });       html2xml->add_tags( ([ "dl":tag_quote_args,    "dt":tag_quote_args,    "dd":tag_quote_args,    "table":tag_quote_args,    "tr":tag_quote_args,    "th":tag_quote_args,    "td":tag_quote_args,    "a":tag_quote_args,    "ref":tag_quote_args ]) );