Branch: Tag:

2001-07-20

2001-07-20 00:46:14 by Martin Nilsson <mani@lysator.liu.se>

Bugfix for argument names.

Rev: bin/mkxml.pike:1.29

1: - /* $Id: mkxml.pike,v 1.28 2001/07/20 00:21:48 nilsson Exp $ */ + /* $Id: mkxml.pike,v 1.29 2001/07/20 00:46:14 nilsson Exp $ */      string LENA_PATH = "../autodoc/image_ill.pnm";   string makepic1;
522:       // Find name    string n = ""; +  i++;    for (; i<sizeof(in); i++) { -  if(in[i]==')') +  if(in[i]==')') { +  if(!sizeof(String.trim_all_whites(n))) +  throw( ({ "Empty argument name.\n", backtrace() }) );    return res + "<argument name=" + S(n) + "><type>" + t +    "</type></argument>\n"; -  +  }    if(in[i]==',') { -  +  if(!sizeof(String.trim_all_whites(n))) +  throw( ({ "Empty argument name.\n", backtrace() }) );    res += "<argument name=" + S(n) + "><type>" + t +    "</type></argument>\n";    break;    } -  if(in[i]==' ') +  if(in[i]==' ') {    if(n=="...") {    n = "";    t = "<varargs>" + t + "</varargs>";    } -  +  }    else    n += in[i..i];    }