Mercurial > hg > octave-lojdl
changeset 7225:1f3e360c1bba
[project @ 2007-11-30 06:50:34 by jwe]
author | jwe |
---|---|
date | Fri, 30 Nov 2007 06:50:34 +0000 |
parents | a3435f7017c4 |
children | a3ad66fea44a |
files | src/genprops.awk |
diffstat | 1 files changed, 13 insertions(+), 13 deletions(-) [+] |
line wrap: on
line diff
--- a/src/genprops.awk +++ b/src/genprops.awk @@ -109,7 +109,7 @@ ## The 'o' and 'O' qualifiers are only useful when the the property type ## is something other than octave_value. -function emit_decls () +function emit_declarations () { if (idx > 0) print "private:\n"; @@ -126,7 +126,7 @@ { printf (" %s get_%s (void) const", type[i], name[i]); - if (emit_get[i] == "defn") + if (emit_get[i] == "definition") printf (" { return %s; }\n", name[i]); else printf (";\n"); @@ -142,7 +142,7 @@ { printf (" void set_%s (const %s& val)", name[i], type[i]); - if (emit_set[i] == "defn") + if (emit_set[i] == "definition") { printf ("\n {\n if (! error_state)\n {\n %s = val;\n", name[i]); @@ -160,9 +160,9 @@ { printf (" void set_%s (const octave_value& val)", name[i]); - if (emit_ov_set[i] == "defn") + if (emit_ov_set[i] == "definition") printf (" { set_%s (%s (val)); }\n\n", name[i], type[i]); - else if (emit_ov_set[i] == "asign") + else if (emit_ov_set[i] == "assignment") { printf ("\n {\n %s tmp (%s);\n tmp = val;\n set_%s (tmp);\n };\n\n", type[i], name[i], name[i], name[i]); @@ -187,7 +187,7 @@ } /END_PROPERTIES/ { - emit_decls(); + emit_declarations(); gather = 0; next; } @@ -215,12 +215,12 @@ limits[idx] = 0; mode[idx] = 0; - emit_get[idx] = "defn"; - emit_set[idx] = "defn"; + emit_get[idx] = "definition"; + emit_set[idx] = "definition"; if (type[idx] == "octave_value") emit_ov_set[idx] = ""; else - emit_ov_set[idx] = "defn"; + emit_ov_set[idx] = "definition"; if (NF == field) { @@ -240,7 +240,7 @@ ## There is a custom extern definition for the get function, ## but we still emit the declaration. if (index (quals, "G")) - emit_get[idx] = "decl"; + emit_get[idx] = "declaration"; ## There is a custom inline definition for the set function, ## so we don't emit anything. @@ -250,11 +250,11 @@ ## There is a custom extern definition for the set function, ## but we still emit the declaration. if (index (quals, "S")) - emit_set[idx] = "decl"; + emit_set[idx] = "declaration"; ## emmit an asignment set function if (index (quals, "a")) - emit_ov_set[idx] = "asign"; + emit_ov_set[idx] = "assignment"; if (type[idx] != "octave_value") { @@ -272,7 +272,7 @@ ## octave_value version of the set function, but we ## still emit the declaration. if (index (quals, "O")) - emit_ov_set[idx] = "decl"; + emit_ov_set[idx] = "declaration"; } }