Mercurial > hg > octave-lyh
diff src/genprops.awk @ 7865:b74039822fd2
Add support for hggroup
author | Michael Goffioul <michael.goffioul@gmail.com> |
---|---|
date | Fri, 25 Apr 2008 16:44:59 +0200 |
parents | 8f3459a90bf3 |
children | f1a1f6dd7fac |
line wrap: on
line diff
--- a/src/genprops.awk +++ b/src/genprops.awk @@ -391,11 +391,16 @@ printf ("void\n%s::properties::set (const caseless_str& pname, const octave_value& val)\n{\n", class_name) >> filename; + first = 1; + for (i = 1; i <= idx; i++) { if (! readonly[i]) + { printf (" %sif (pname.compare (\"%s\"))\n set_%s (val);\n", - (i > 1 ? "else " : ""), name[i], name[i]) >> filename; + (first == 0 ? "else " : ""), name[i], name[i]) >> filename; + first = 0; + } } printf (" else\n base_properties::set (pname, val);\n}\n\n") >> filename;