octave: libinterp/corefcn/genprops.awk annotate

annotate libinterp/corefcn/genprops.awk @ 33617:ec2635a02328 bytecode-interpreter tip

maint: Merge default to bytecode-interpreter.

author	Markus Mützel <markus.muetzel@gmx.de>
date	Tue, 21 May 2024 18:29:03 +0200
parents	2e484f9f1f18
children

rev	line source
27923 bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	1 ########################################################################
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	2 ##
32632 2e484f9f1f18 maint: update Octave Project Developers copyright for the new year John W. Eaton <jwe@octave.org> parents: 31883 diff changeset	3 ## Copyright (C) 2007-2024 The Octave Project Developers
27918 b442ec6dda5c use centralized file for copyright info for individual contributors John W. Eaton <jwe@octave.org> parents: 27320 diff changeset	4 ##
27923 bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	5 ## See the file COPYRIGHT.md in the top-level directory of this
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	6 ## distribution or <https://octave.org/copyright/>.
7019 4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe] jwe parents: 6904 diff changeset	7 ##
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe] jwe parents: 6904 diff changeset	8 ## This file is part of Octave.
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	9 ##
24534 194eb4bd202b maint: Update punctuation for GPL v3 license text. Rik <rik@octave.org> parents: 24120 diff changeset	10 ## Octave is free software: you can redistribute it and/or modify it
22755 3a2b891d0b33 maint: Standardize Copyright formatting. Rik <rik@octave.org> parents: 22323 diff changeset	11 ## under the terms of the GNU General Public License as published by
24534 194eb4bd202b maint: Update punctuation for GPL v3 license text. Rik <rik@octave.org> parents: 24120 diff changeset	12 ## the Free Software Foundation, either version 3 of the License, or
22755 3a2b891d0b33 maint: Standardize Copyright formatting. Rik <rik@octave.org> parents: 22323 diff changeset	13 ## (at your option) any later version.
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	14 ##
22755 3a2b891d0b33 maint: Standardize Copyright formatting. Rik <rik@octave.org> parents: 22323 diff changeset	15 ## Octave is distributed in the hope that it will be useful, but
3a2b891d0b33 maint: Standardize Copyright formatting. Rik <rik@octave.org> parents: 22323 diff changeset	16 ## WITHOUT ANY WARRANTY; without even the implied warranty of
3a2b891d0b33 maint: Standardize Copyright formatting. Rik <rik@octave.org> parents: 22323 diff changeset	17 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
3a2b891d0b33 maint: Standardize Copyright formatting. Rik <rik@octave.org> parents: 22323 diff changeset	18 ## GNU General Public License for more details.
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	19 ##
7019 4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe] jwe parents: 6904 diff changeset	20 ## You should have received a copy of the GNU General Public License
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe] jwe parents: 6904 diff changeset	21 ## along with Octave; see the file COPYING. If not, see
24534 194eb4bd202b maint: Update punctuation for GPL v3 license text. Rik <rik@octave.org> parents: 24120 diff changeset	22 ## <https://www.gnu.org/licenses/>.
7019 4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe] jwe parents: 6904 diff changeset	23 ##
27923 bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	24 ########################################################################
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	25 ##
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	26 ## Generate the graphics.h file from graphics.h.in and write the
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	27 ## output to stdout.
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	28 ##
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	29 ## If the variable emit_graphics_props is set on the command line,
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	30 ## generate the graphics-props.cc file from graphics.h.in and write
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	31 ## the output to stdout.
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	32 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	33 ## Lines between the BEGIN_PROPERTIES and END_PROPERTIES markers have
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	34 ## one of the following formats:
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	35 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	36 ## TYPE NAME
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	37 ## TYPE NAME QUALIFIERS
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	38 ## mutable TYPE NAME
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	39 ## mutable TYPE NAME QUALIFIERS
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	40 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	41 ## For each property, we generate a declaration for the property.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	42 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	43 ## If QUALIFIERS is omitted, we generate the following functions directly
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	44 ## in the class declaration:
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	45 ##
6875 1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	46 ## TYPE
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	47 ## get_NAME () const
6875 1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	48 ## {
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	49 ## return NAME;
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	50 ## }
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	51 ##
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	52 ## void
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	53 ## set_NAME (const TYPE& val)
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	54 ## {
20733 c6464d78da69 eliminate error_state from generated code John W. Eaton <jwe@octave.org> parents: 19697 diff changeset	55 ## NAME = val;
6875 1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	56 ## }
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	57 ##
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	58 ## void
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	59 ## set_NAME (const octave_value& val)
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	60 ## {
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	61 ## set_NAME (TYPE (val));
1f843c5601b3 [project @ 2007-09-06 21:41:50 by jwe] jwe parents: 6874 diff changeset	62 ## }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	63 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	64 ## If present, the QUALIFIERS string may include any of the characters
23201 239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	65 ## g, G, m, s, S, o, O, h, d which have the following meanings:
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	66 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	67 ## g: There is a custom inline definition for the get function,
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	68 ## so we don't emit one.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	69 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	70 ## G: There is a custom extern definition for the get function,
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	71 ## so we emit only the declaration.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	72 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	73 ## s: There is a custom inline definition for the type-specific set
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	74 ## function, so we don't emit one.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	75 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	76 ## S: There is a custom extern definition for the type-specific set
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	77 ## function, so we emit only the declaration.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	78 ##
23201 239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	79 ## d: The property is deprecated and a warning is emitted when accessing it.
239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	80 ##
16838 f68b0f51c896 genprops.awk: Add comment about 'o','O', 'a' options no longer being processed. Rik <rik@octave.org> parents: 15195 diff changeset	81 ################################################################################
f68b0f51c896 genprops.awk: Add comment about 'o','O', 'a' options no longer being processed. Rik <rik@octave.org> parents: 15195 diff changeset	82 ## 'o','O','a' are currently not processed. They are commented out in code.
f68b0f51c896 genprops.awk: Add comment about 'o','O', 'a' options no longer being processed. Rik <rik@octave.org> parents: 15195 diff changeset	83 ################################################################################
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	84 ##
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	85 ## o: There is a custom inline definition for the octave_value version
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	86 ## of the set function, so we don't emit one.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	87 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	88 ## O: There is a custom extern definition for the octave_value version
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	89 ## of the set function, so we emit only the declaration.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	90 ##
6904 1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	91 ## a: The octave_value version of the set function will use assignment:
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	92 ##
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	93 ## void
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	94 ## set_NAME (const octave_value& val)
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	95 ## {
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	96 ## TYPE tmp (NAME);
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	97 ## tmp = val;
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	98 ## set_NAME (tmp);
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	99 ## }
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	100 ##
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	101 ## This is useful for things like the radio_value classes which
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	102 ## use an overloaded assignment operator of the form
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	103 ##
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	104 ## radio_property& operator = (const octave_value& val);
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	105 ##
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	106 ## that preserves the list of possible values, which is different
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	107 ## from what would happen if we simply used the
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	108 ##
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	109 ## TYPE (const octave_value&)
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	110 ##
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	111 ## constructor, which creates a new radio_property and so cannot
1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	112 ## preserve the old list of possible values.
16838 f68b0f51c896 genprops.awk: Add comment about 'o','O', 'a' options no longer being processed. Rik <rik@octave.org> parents: 15195 diff changeset	113 ################################################################################
6904 1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	114 ##
7214 86d0b16f2bb2 [project @ 2007-11-29 03:40:04 by jwe] jwe parents: 7019 diff changeset	115 ## l: Add the line
86d0b16f2bb2 [project @ 2007-11-29 03:40:04 by jwe] jwe parents: 7019 diff changeset	116 ##
86d0b16f2bb2 [project @ 2007-11-29 03:40:04 by jwe] jwe parents: 7019 diff changeset	117 ## update_axis_limits ("NAME");
86d0b16f2bb2 [project @ 2007-11-29 03:40:04 by jwe] jwe parents: 7019 diff changeset	118 ##
86d0b16f2bb2 [project @ 2007-11-29 03:40:04 by jwe] jwe parents: 7019 diff changeset	119 ## to the type-specific set function.
86d0b16f2bb2 [project @ 2007-11-29 03:40:04 by jwe] jwe parents: 7019 diff changeset	120 ##
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	121 ## m: Add the line
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	122 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	123 ## set_NAMEmode ("manual");
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	124 ##
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	125 ## to the type-specific set function.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	126 ##
7379 a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	127 ## h: Make the property hidden
a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	128 ##
7427 65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	129 ## r: Make the property read-only. A read-only property is not
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	130 ## settable from the global set (caseless_str, octave_value)
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	131 ## method, but still has set_X accessor.
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	132 ##
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	133 ## u: The property has an inline updater method. This effectively
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	134 ## add the line
7427 65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	135 ##
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	136 ## update_NAME ();
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	137 ##
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	138 ## to the type-specific set function. This line is added before
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	139 ## any other update call (like those added by the 'l' or 'm'
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	140 ## modifiers.
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	141 ##
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	142 ## U: Like 'u' modifier except that the updater is not inline.
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	143 ## A declaration for the updater function will be emitted.
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	144 ##
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	145 ## f: The property does not have any factory default value.
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	146 ##
25273 ac6ba9f2fa41 Add new Figure graphic property "Number" (bug #53343). Rik <rik@octave.org> parents: 25054 diff changeset	147 ## The 'o' and 'O' qualifiers are only useful when the property type
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	148 ## is something other than octave_value.
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	149
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	150 ## simple accessor
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	151
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	152 function emit_get_accessor (i, rtype, faccess)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	153 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	154 printf (" %s get_%s () const", rtype, name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	155
23201 239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	156 if (emit_get[i] == "definition" && deprecated[i])
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	157 printf ("\n {\n warning_with_id (\"Octave:deprecated-property\",\"'%s' is deprecated and will be removed from a future version of Octave\");\n return m_%s.%s ();\n }\n", name[i], name[i], faccess);
23201 239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	158 else if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	159 printf (" { return m_%s.%s (); }\n", name[i], faccess);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	160 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	161 printf (";\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	162 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	163
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	164 ## bool_property
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	165
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	166 function emit_get_bool (i)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	167 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	168 printf (" bool is_%s () const", name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	169
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	170 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	171 printf (" { return m_%s.is_on (); }\n", name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	172 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	173 printf (";\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	174
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	175 emit_get_accessor(i, "std::string", "current_value");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	176 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	177
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	178 ## radio_property
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	179
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	180 function emit_get_radio (i)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	181 {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	182 printf (" bool %s_is (const std::string& v) const", name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	183
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	184 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	185 printf (" { return m_%s.is (v); }\n", name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	186 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	187 printf (";\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	188
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	189 emit_get_accessor(i, "std::string", "current_value");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	190 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	191
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	192 ## color_property
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	193
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	194 function emit_get_color (i)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	195 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	196 printf (" bool %s_is_rgb () const { return m_%s.is_rgb (); }\n", name[i], name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	197
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	198 printf (" bool %s_is (const std::string& v) const", name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	199
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	200 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	201 printf (" { return m_%s.is (v); }\n", name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	202 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	203 printf (";\n");
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	204
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	205 printf (" Matrix get_%s_rgb () const", name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	206
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	207 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	208 printf (" { return (m_%s.is_rgb () ? m_%s.rgb () : Matrix ()); }\n", name[i], name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	209 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	210 printf (";\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	211
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	212 emit_get_accessor(i, "octave_value", "get");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	213 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	214
7844 3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	215 ## double_radio_property
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	216
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	217 function emit_get_double_radio (i)
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	218 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	219 printf (" bool %s_is_double () const { return m_%s.is_double (); }\n", name[i], name[i]);
7844 3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	220
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	221 printf (" bool %s_is (const std::string& v) const", name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	222
7844 3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	223 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	224 printf (" { return m_%s.is (v); }\n", name[i]);
7844 3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	225 else
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	226 printf (";\n");
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	227
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	228 printf (" double get_%s_double () const", name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	229
7844 3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	230 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	231 printf (" { return (m_%s.is_double () ? m_%s.double_value () : 0); }\n", name[i], name[i]);
7844 3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	232 else
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	233 printf (";\n");
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	234
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	235 emit_get_accessor(i, "octave_value", "get");
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	236 }
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	237
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	238 ## callback_property
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	239
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	240 function emit_get_callback (i)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	241 {
26112 36e0e5b428e7 Implement uitable (patch #9084) Andrew Thornton <art27@cantab.net> parents: 25342 diff changeset	242 printf (" void execute_%s (const octave_value& new_data = octave_value ()) const", name[i]);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	243
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	244 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	245 printf (" { m_%s.execute (new_data); }\n", name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	246 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	247 printf (";\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	248
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	249 emit_get_accessor(i, "octave_value", "get");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	250 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	251
7836 4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	252 ## array_property
4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	253
4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	254 function emit_get_array (i)
4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	255 {
4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	256 emit_get_accessor(i, "octave_value", "get");
4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	257 }
4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	258
13281 834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	259 ## string_array_property
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	260
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	261 function emit_get_string_array (i)
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	262 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	263 printf (" std::string get_%s_string () const", name[i]);
13281 834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	264
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	265 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	266 printf (" { return m_%s.string_value (); }\n", name[i]);
13281 834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	267 else
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	268 printf (";\n");
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	269
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	270 printf (" string_vector get_%s_vector () const", name[i]);
13281 834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	271
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	272 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	273 printf (" { return m_%s.string_vector_value (); }\n", name[i]);
13281 834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	274 else
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	275 printf (";\n");
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	276
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	277 emit_get_accessor(i, "octave_value", "get");
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	278 }
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	279
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	280 ## common section
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	281
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	282 function emit_common_declarations ()
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	283 {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	284 printf ("public:\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	285 printf (" properties (const graphics_handle& mh, const graphics_handle& p);\n\n");
31855 1daf8bfceac3 default or disable more ctors, dtors, and assignment ops John W. Eaton <jwe@octave.org> parents: 31771 diff changeset	286 printf (" properties () = delete;\n\n");
31883 56809fe23e53 eliminate some clang warnings about defaulted functions being deleted John W. Eaton <jwe@octave.org> parents: 31855 diff changeset	287 printf (" OCTAVE_DISABLE_COPY_MOVE (properties)\n\n");
31855 1daf8bfceac3 default or disable more ctors, dtors, and assignment ops John W. Eaton <jwe@octave.org> parents: 31771 diff changeset	288 printf (" ~properties () = default;\n\n");
7406 e9b2e44f9341 [project @ 2008-01-19 07:37:56 by jwe] jwe parents: 7403 diff changeset	289 printf (" void set (const caseless_str& pname, const octave_value& val);\n\n");
7379 a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	290 printf (" octave_value get (bool all = false) const;\n\n");
7406 e9b2e44f9341 [project @ 2008-01-19 07:37:56 by jwe] jwe parents: 7403 diff changeset	291 printf (" octave_value get (const caseless_str& pname) const;\n\n");
9620 b00af0da85dd graphics.h.in: provide std::string and char* versions of graphics_object:get functions John W. Eaton <jwe@octave.org> parents: 9616 diff changeset	292 printf (" octave_value get (const std::string& pname) const\n {\n return get (caseless_str (pname));\n }\n\n");
b00af0da85dd graphics.h.in: provide std::string and char* versions of graphics_object:get functions John W. Eaton <jwe@octave.org> parents: 9616 diff changeset	293 printf (" octave_value get (const char *pname) const\n {\n return get (caseless_str (pname));\n }\n\n");
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	294 printf (" property get_property (const caseless_str& pname);\n\n");
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	295 printf (" std::string graphics_object_name () const { return s_go_name; }\n\n");
21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	296 printf (" static property_list::pval_map_type factory_defaults ();\n\n");
30039 f16cfb2d7d1b maint: rename graphics object class static variable to "s_go_name". Rik <rik@octave.org> parents: 29889 diff changeset	297 printf ("private:\n static std::string s_go_name;\n\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	298 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	299
7225 1f3e360c1bba [project @ 2007-11-30 06:50:34 by jwe] jwe parents: 7214 diff changeset	300 function emit_declarations ()
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	301 {
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	302 if (class_name && ! base)
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	303 emit_common_declarations();
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	304
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	305 printf ("public:\n\n\n static std::set<std::string> core_property_names ();\n\n static std::set<std::string> readonly_property_names ();\n\n static bool has_core_property (const caseless_str& pname);\n\n static bool has_readonly_property (const caseless_str& pname);\n\n std::set<std::string> all_property_names () const;\n\n");
9585 06b8b51dca48 also handle user-defined graphics properties in new property name validation scheme John W. Eaton <jwe@octave.org> parents: 9584 diff changeset	306
06b8b51dca48 also handle user-defined graphics properties in new property name validation scheme John W. Eaton <jwe@octave.org> parents: 9584 diff changeset	307 if (! base)
06b8b51dca48 also handle user-defined graphics properties in new property name validation scheme John W. Eaton <jwe@octave.org> parents: 9584 diff changeset	308 printf (" bool has_property (const caseless_str& pname) const;\n\n");
9185 1e5c11890f85 check for invalid property names when setting defaults John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	309
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	310 if (idx > 0)
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	311 print (base ? "protected:\n" : "private:\n");
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	312
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	313 for (i = 1; i <= idx; i++)
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	314 printf (" %s%s m_%s;\n", mutable[i] ? "mutable " : "", type[i], name[i]);
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	315
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	316 if (idx > 0)
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	317 print "\npublic:\n";
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	318
8059 75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	319 if (idx > 0)
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	320 {
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	321 printf (" enum\n {");
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	322 for (i = 1; i <= idx; i++)
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	323 {
11239 5fa7667f90e5 Add prefix ID_ to property ids to avoid name clash on windows Kai Habel <kai.habel@gmx.de> parents: 11074 diff changeset	324 printf ("%s\n ID_%s = %d", (i == 1 ? "" : ","), toupper(name[i]), pcount);
8059 75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	325 pcount++;
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	326 }
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	327 printf ("\n };\n\n");
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	328 pcount = (int(pcount/1000)+1)*1000;
75c99d3f97d7 Octave to backend notification scheme John W. Eaton <jwe@octave.org> parents: 7895 diff changeset	329 }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	330
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	331 for (i = 1; i <= idx; i++)
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	332 {
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	333 if (emit_get[i])
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	334 {
7836 4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	335 if (type[i] == "any_property")
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	336 emit_get_accessor(i, "octave_value", "get");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	337 else if (type[i] == "handle_property")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	338 emit_get_accessor(i, "graphics_handle", "handle_value");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	339 else if (type[i] == "string_property")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	340 emit_get_accessor(i, "std::string", "string_value");
13281 834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	341 else if (type[i] == "text_label_property")
12959 0c86ae6f7c34 new text_label_property graphics property type John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	342 emit_get_accessor(i, "octave_value", "get");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	343 else if (type[i] == "double_property")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	344 emit_get_accessor(i, "double", "double_value");
7844 3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	345 else if (type[i] == "double_radio_property")
3d60445d3638 Add new double_radio_property class for alpha values. Michael Goffioul <michael.goffioul@gmail.com> parents: 7836 diff changeset	346 emit_get_double_radio(i);
7836 4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	347 else if (type[i] == "array_property" \
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	348 \|\| type[i] == "row_vector_property")
7836 4fb2db9c87dd Turn cdata properties into array_property. Add min/max computation to array_property. Michael Goffioul <michael.goffioul@gmail.com> parents: 7826 diff changeset	349 emit_get_array(i);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	350 else if (type[i] == "bool_property")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	351 emit_get_bool(i);
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	352 else if (type[i] == "radio_property")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	353 emit_get_radio(i);
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	354 else if (type[i] == "color_property")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	355 emit_get_color(i);
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	356 else if (type[i] == "callback_property")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	357 emit_get_callback(i);
13281 834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	358 else if (type[i] == "string_array_property")
834f904a3dcb Add support for full asynchronous graphics toolkit running in a separate Michael Goffioul <michael.goffioul@gmail.com> parents: 12959 diff changeset	359 emit_get_string_array(i);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	360 else
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	361 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	362 printf (" %s get_%s () const", type[i], name[i]);
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	363
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	364 if (emit_get[i] == "definition")
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	365 printf (" { return m_%s; }\n", name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	366 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	367 printf (";\n");
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	368 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	369 printf ("\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	370 }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	371 }
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	372
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	373 if (idx > 0)
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	374 printf ("\n");
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	375
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	376 for (i = 1; i <= idx; i++)
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	377 {
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	378 if (emit_set[i])
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	379 {
21684 1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	380 ## Allow mutable properties to be set from const methods by
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	381 ## declaring the corresponding set method const. The idea here is
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	382 ## to allow "constant" properties to be set after initialization.
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	383 ## For example, info about the OpenGL context for a figure can
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	384 ## only be set once the context is established, and that happens
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	385 ## after the figure object is created. Properties handled this
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	386 ## way should probably also be declared read only.
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	387
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	388 printf (" void set_%s (const octave_value& val)%s",
1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	389 name[i], mutable[i] ? " const" : "");
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	390
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	391 if (emit_set[i] == "definition")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	392 {
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	393 if (updaters[i] \|\| limits[i] \|\| mode[i])
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	394 has_builtin_listeners = 1;
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	395 else
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	396 has_builtin_listeners = 0;
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	397
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	398 printf ("\n {\n if (m_%s.set (val, %s))\n {\n",
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	399 name[i], (has_builtin_listeners ? "false" : "true"));
8139 6b3a965b6c7d genprops.awk: emit set_mode calls before updaters John W. Eaton <jwe@octave.org> parents: 8063 diff changeset	400 if (mode[i])
24120 0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	401 printf (" set_%smode (\"manual\");\n", name[i]);
7427 65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	402 if (updater[i])
24120 0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	403 printf (" update_%s ();\n", name[i]);
23201 239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	404 if (deprecated[i])
24120 0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	405 printf (" warning_with_id (\"Octave:deprecated-property\",\"'%s' is deprecated and will be removed from a future version of Octave\");\n", name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	406 if (limits[i])
24120 0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	407 printf (" update_axis_limits (\"%s\");\n", name[i]);
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	408 if (has_builtin_listeners)
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	409 printf (" m_%s.run_listeners (GCB_POSTSET);\n", name[i]);
21684 1449e3b98941 store OpenGL version info in figure properties John W. Eaton <jwe@octave.org> parents: 20733 diff changeset	410 if (! mutable[i])
24120 0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	411 printf (" mark_modified ();\n");
0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	412 printf (" }\n");
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	413 if (mode[i])
24120 0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	414 printf (" else\n set_%smode (\"manual\");\n", name[i]);
0d446e938f1f maint: clean up code formatting in generated graphics.h Mike Miller <mtmiller@octave.org> parents: 23709 diff changeset	415 printf (" }\n\n");
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	416 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	417 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	418 printf (";\n\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	419 }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	420
7826 68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	421 if (updater[i] == "extern")
68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	422 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	423 printf (" void update_%s ();\n\n", name[i]);
7826 68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	424 }
68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	425
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	426 ## if (emit_ov_set[i])
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	427 ## {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	428 ## printf (" void set_%s (const octave_value& val)", name[i]);
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	429 ##
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	430 ## if (emit_ov_set[i] == "definition")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	431 ## printf (" { set_%s (%s (val)); }\n\n", name[i], type[i]);
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	432 ## else if (emit_ov_set[i] == "assignment")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	433 ## {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	434 ## printf ("\n {\n %s tmp (%s);\n tmp = val;\n set_%s (tmp);\n };\n\n",
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	435 ## type[i], name[i], name[i], name[i]);
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	436 ## }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	437 ## else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	438 ## printf (";\n");
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	439 ## }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	440 }
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	441
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	442 ## if (idx > 0)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	443 ## print "\nprivate:";
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	444 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	445
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	446 function emit_source ()
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	447 {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	448 if (class_name)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	449 {
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	450 printf ("// ****** %s ******\n\n", class_name);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	451
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	452 ## constructor
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	453
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	454 if (base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	455 printf ("base_properties::base_properties (const std::string& ty, const graphics_handle& mh, const graphics_handle& p)\n : ");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	456 else
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	457 {
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	458 printf ("%s::properties::properties (const graphics_handle& mh, const graphics_handle& p)\n", class_name);
30039 f16cfb2d7d1b maint: rename graphics object class static variable to "s_go_name". Rik <rik@octave.org> parents: 29889 diff changeset	459 printf (" : base_properties (s_go_name, mh, p),\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	460 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	461
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	462 for (i = 1; i <= idx; i++)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	463 {
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	464 if (ptype[i])
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	465 printf (" m_%s (\"%s\", mh, %s)", name[i], name[i], defval[i]);
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	466 else
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	467 printf (" m_%s (%s)", name[i], defval[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	468 if (i < idx)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	469 printf (",");
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	470 printf ("\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	471 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	472
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	473 printf ("{\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	474
7379 a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	475 for (i = 1; i <= idx; i++)
a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	476 {
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	477 if (ptype[i])
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	478 {
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	479 printf (" m_%s.set_id (ID_%s);\n", name[i], toupper(name[i]));
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	480 if (hidden[i])
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	481 printf (" m_%s.set_hidden (true);\n", name[i]);
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	482 }
7379 a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	483 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	484
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	485 printf (" init ();\n}\n\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	486
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	487 ## set method
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	488
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	489 if (base)
9972 d32a6cc0193b unshare dynamic properties John W. Eaton <jwe@octave.org> parents: 9906 diff changeset	490 printf ("void\nbase_properties::set (const caseless_str& pname, const octave_value& val)\n{\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	491 else
9584 0fcbfddaa87f allow abbreviated graphics property names to match, with optional warning John W. Eaton <jwe@octave.org> parents: 9582 diff changeset	492 printf ("void\n%s::properties::set (const caseless_str& pname_arg, const octave_value& val)\n{\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	493 class_name);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	494
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	495 if (! base)
30039 f16cfb2d7d1b maint: rename graphics object class static variable to "s_go_name". Rik <rik@octave.org> parents: 29889 diff changeset	496 printf (" const std::set<std::string>& pnames = all_property_names ();\n\n caseless_str pname = validate_property_name (\"set\", s_go_name, pnames, pname_arg);\n\n if (has_readonly_property (pname))\n {\n error (\"set: \\\"%%s\\\" is read-only\", pname.c_str ());\n return;\n }\n\n");
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	497
7865 b74039822fd2 Add support for hggroup Michael Goffioul <michael.goffioul@gmail.com> parents: 7862 diff changeset	498 first = 1;
b74039822fd2 Add support for hggroup Michael Goffioul <michael.goffioul@gmail.com> parents: 7862 diff changeset	499
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	500 for (i = 1; i <= idx; i++)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	501 {
7403 135c13496faf [project @ 2008-01-19 06:06:46 by jwe] jwe parents: 7397 diff changeset	502 if (! readonly[i])
7865 b74039822fd2 Add support for hggroup Michael Goffioul <michael.goffioul@gmail.com> parents: 7862 diff changeset	503 {
7406 e9b2e44f9341 [project @ 2008-01-19 07:37:56 by jwe] jwe parents: 7403 diff changeset	504 printf (" %sif (pname.compare (\"%s\"))\n set_%s (val);\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	505 (first == 0 ? "else " : ""), name[i], name[i]);
7865 b74039822fd2 Add support for hggroup Michael Goffioul <michael.goffioul@gmail.com> parents: 7862 diff changeset	506 first = 0;
b74039822fd2 Add support for hggroup Michael Goffioul <michael.goffioul@gmail.com> parents: 7862 diff changeset	507 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	508 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	509
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	510 if (base)
9972 d32a6cc0193b unshare dynamic properties John W. Eaton <jwe@octave.org> parents: 9906 diff changeset	511 printf (" else\n set_dynamic (pname, val);\n}\n\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	512 else
9972 d32a6cc0193b unshare dynamic properties John W. Eaton <jwe@octave.org> parents: 9906 diff changeset	513 printf (" else\n base_properties::set (pname, val);\n}\n\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	514
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	515 ## get "all" method
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	516
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	517 if (base)
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	518 {
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	519 printf ("octave_value\nbase_properties::get (bool all) const\n{\n");
11074 8a3b7e8fcbbc graphics.cc, graphics.h.in, genprops.awk: use octave_map and octave_scalar_map instead of Octave_map John W. Eaton <jwe@octave.org> parents: 10709 diff changeset	520 printf (" octave_map m = get_dynamic (all).map_value ();\n\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	521 }
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	522 else
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	523 {
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	524 printf ("octave_value\n%s::properties::get (bool all) const\n{\n", class_name);
11074 8a3b7e8fcbbc graphics.cc, graphics.h.in, genprops.awk: use octave_map and octave_scalar_map instead of Octave_map John W. Eaton <jwe@octave.org> parents: 10709 diff changeset	525 printf (" octave_map m = base_properties::get (all).map_value ();\n\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	526 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	527
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	528 for (i = 1; i <= idx; i++)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	529 {
7379 a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	530 if (hidden[i])
11074 8a3b7e8fcbbc graphics.cc, graphics.h.in, genprops.awk: use octave_map and octave_scalar_map instead of Octave_map John W. Eaton <jwe@octave.org> parents: 10709 diff changeset	531 printf (" if (all)\n m.assign (\"%s\", octave_value (get_%s ()%s));\n", name[i], name[i],
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	532 (type[i] == "handle_property" \|\| type[i] == "graphics_handle" ? ".as_octave_value ()" : ""));
7379 a78c7bccda91 [project @ 2008-01-15 18:42:29 by jwe] jwe parents: 7367 diff changeset	533 else
11074 8a3b7e8fcbbc graphics.cc, graphics.h.in, genprops.awk: use octave_map and octave_scalar_map instead of Octave_map John W. Eaton <jwe@octave.org> parents: 10709 diff changeset	534 printf (" m.assign (\"%s\", octave_value (get_%s ()%s));\n", name[i], name[i],
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	535 (type[i] == "handle_property" \|\| type[i] == "graphics_handle" ? ".as_octave_value ()" : ""));
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	536 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	537
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	538 printf ("\n return m;\n}\n\n");
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	539
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	540 ## get "one" method
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	541
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	542 if (base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	543 printf ("octave_value\nbase_properties::get (const caseless_str& pname) const\n{\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	544 else
9584 0fcbfddaa87f allow abbreviated graphics property names to match, with optional warning John W. Eaton <jwe@octave.org> parents: 9582 diff changeset	545 printf ("octave_value\n%s::properties::get (const caseless_str& pname_arg) const\n{\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	546 class_name);
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	547 printf (" octave_value retval;\n\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	548
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	549 if (! base)
30039 f16cfb2d7d1b maint: rename graphics object class static variable to "s_go_name". Rik <rik@octave.org> parents: 29889 diff changeset	550 printf (" const std::set<std::string>& pnames = all_property_names ();\n\n caseless_str pname = validate_property_name (\"get\", s_go_name, pnames, pname_arg);\n\n");
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	551
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	552 for (i = 1; i<= idx; i++)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	553 {
7406 e9b2e44f9341 [project @ 2008-01-19 07:37:56 by jwe] jwe parents: 7403 diff changeset	554 printf (" %sif (pname.compare (\"%s\"))\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	555 (i > 1 ? "else " : ""), name[i]);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	556 printf (" retval = get_%s ()%s;\n", name[i],
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	557 (type[i] == "handle_property" \|\| type[i] == "graphics_handle" ? ".as_octave_value ()" : ""));
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	558 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	559
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	560 if (base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	561 printf (" else\n retval = get_dynamic (pname);\n\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	562 else
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	563 printf (" else\n retval = base_properties::get (pname);\n\n");
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	564 printf (" return retval;\n}\n\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	565
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	566 ## get_property method
3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	567
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	568 if (base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	569 printf ("property\nbase_properties::get_property (const caseless_str& pname)\n{\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	570 else
9584 0fcbfddaa87f allow abbreviated graphics property names to match, with optional warning John W. Eaton <jwe@octave.org> parents: 9582 diff changeset	571 printf ("property\n%s::properties::get_property (const caseless_str& pname_arg)\n{\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	572 class_name);
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	573
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	574 if (! base)
30039 f16cfb2d7d1b maint: rename graphics object class static variable to "s_go_name". Rik <rik@octave.org> parents: 29889 diff changeset	575 printf (" const std::set<std::string>& pnames = all_property_names ();\n\n caseless_str pname = validate_property_name (\"get\", s_go_name, pnames, pname_arg);\n\n");
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	576
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	577 for (i = 1; i<= idx; i++)
3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	578 {
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	579 if (ptype[i])
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	580 {
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	581 printf (" %sif (pname.compare (\"%s\"))\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	582 (i > 1 ? "else " : ""), name[i]);
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	583 printf (" return property (&m_%s, true);\n", name[i]);
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	584 }
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	585 }
3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	586
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	587 if (base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	588 printf (" else\n return get_property_dynamic (pname);\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	589 else
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	590 printf (" else\n return base_properties::get_property (pname);\n");
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	591 printf ("}\n\n");
7849 3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	592
3249f64f69b2 Initial low-level support for property listeners. Michael Goffioul <michael.goffioul@gmail.com> parents: 7848 diff changeset	593
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	594 ## factory defaults method
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	595
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	596 if (base)
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	597 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	598 printf ("property_list::pval_map_type\nbase_properties::factory_defaults ()\n{\n");
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	599 printf (" property_list::pval_map_type m;\n\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	600 }
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	601 else
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	602 {
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	603 printf ("property_list::pval_map_type\n%s::properties::factory_defaults ()\n{\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	604 class_name);
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	605 printf (" property_list::pval_map_type m = base_properties::factory_defaults ();\n\n");
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	606 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	607
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	608 for (i = 1; i <= idx; i++)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	609 {
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	610 if (factory[i])
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	611 {
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	612 dval = defval[i];
10709 92a85ed5b86e Don't special case color_property type when emitting factory default (bug #30118) David Bateman <dbateman@free.fr> parents: 10317 diff changeset	613 if (type[i] == "radio_property")
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	614 {
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	615 k = index (dval, "{");
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	616 dval = substr (dval, k+1);
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	617 l = index (dval, "}");
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	618 if (k > 0 && l > 0)
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	619 dval = "\"" substr (dval, 1, l-1) "\"";
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	620 else
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	621 dval = "octave_value ()";
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	622 }
7895 f1a1f6dd7fac avoid using gensub in genprops.awk Jaroslav Hajek <highegg@gmail.com> parents: 7865 diff changeset	623
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	624 printf (" m[\"%s\"] = %s%s;\n", name[i], dval,
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	625 (type[i] == "handle_property" \|\| type[i] == "graphics_handle" ? ".as_octave_value ()" : ""));
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	626 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	627 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	628
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	629 printf ("\n return m;\n}\n\n");
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	630
30039 f16cfb2d7d1b maint: rename graphics object class static variable to "s_go_name". Rik <rik@octave.org> parents: 29889 diff changeset	631 ## s_go_name static field
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	632
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	633 if (! base)
30039 f16cfb2d7d1b maint: rename graphics object class static variable to "s_go_name". Rik <rik@octave.org> parents: 29889 diff changeset	634 printf ("std::string %s::properties::s_go_name (\"%s\");\n\n",
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	635 class_name, object_name);
9185 1e5c11890f85 check for invalid property names when setting defaults John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	636
18567 8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	637 ## core_property_names
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	638 printf ("std::set<std::string>\n");
9185 1e5c11890f85 check for invalid property names when setting defaults John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	639 if (base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	640 printf ("base_properties");
9185 1e5c11890f85 check for invalid property names when setting defaults John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	641 else
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	642 printf ("%s::properties", class_name);
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	643 printf ("::core_property_names ()\n{\n static std::set<std::string> all_pnames;\n\n static bool initialized = false;\n\n if (! initialized)\n {\n");
9185 1e5c11890f85 check for invalid property names when setting defaults John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	644 for (i = 1; i <= idx; i++)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	645 printf (" all_pnames.insert (\"%s\");\n", name[i]);
9585 06b8b51dca48 also handle user-defined graphics properties in new property name validation scheme John W. Eaton <jwe@octave.org> parents: 9584 diff changeset	646 if (! base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	647 printf ("\n std::set<std::string> base_pnames = base_properties::core_property_names ();\n all_pnames.insert (base_pnames.begin (), base_pnames.end ());\n");
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	648 printf ("\n initialized = true;\n }\n\n return all_pnames;\n}\n\n");
18567 8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	649 ## has_core_property
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	650 printf ("bool\n");
9185 1e5c11890f85 check for invalid property names when setting defaults John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	651 if (base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	652 printf ("base_properties");
9185 1e5c11890f85 check for invalid property names when setting defaults John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	653 else
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	654 printf ("%s::properties", class_name);
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	655 printf ("::has_core_property (const caseless_str& pname)\n{\n std::set<std::string> pnames = core_property_names ();\n\n return pnames.find (pname) != pnames.end ();\n}\n\n", class_name);
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	656
18567 8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	657 ## readonly_property_names
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	658 printf ("std::set<std::string>\n");
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	659 if (base)
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	660 printf ("base_properties");
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	661 else
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	662 printf ("%s::properties", class_name);
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	663 printf ("::readonly_property_names ()\n{\n static std::set<std::string> all_pnames;\n\n static bool initialized = false;\n\n if (! initialized)\n {\n");
18567 8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	664 for (i = 1; i <= idx; i++)
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	665 if (readonly[i])
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	666 {
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	667 printf (" all_pnames.insert (\"%s\");\n", name[i]);
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	668 }
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	669 if (! base)
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	670 printf ("\n std::set<std::string> base_pnames = base_properties::readonly_property_names ();\n all_pnames.insert (base_pnames.begin (), base_pnames.end ());\n");
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	671 printf ("\n initialized = true;\n }\n\n return all_pnames;\n}\n\n");
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	672 ## has_readonly_property
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	673 printf ("bool\n");
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	674 if (base)
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	675 printf ("base_properties");
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	676 else
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	677 printf ("%s::properties", class_name);
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	678 printf ("::has_readonly_property (const caseless_str& pname)\n{\n std::set<std::string> pnames = readonly_property_names ();\n\n return pnames.find (pname) != pnames.end ();\n}\n\n", class_name);
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	679
8d5cb159fbc7 Add methods to determine if a graphic property is read-only (bug #41629). Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 17744 diff changeset	680 ## all_property_names
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	681 printf ("std::set<std::string>\n");
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	682 if (base)
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	683 printf ("base_properties");
9585 06b8b51dca48 also handle user-defined graphics properties in new property name validation scheme John W. Eaton <jwe@octave.org> parents: 9584 diff changeset	684 else
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	685 printf ("%s::properties", class_name);
31771 21f9b34eb893 maint: Eliminate "(void)" in C++ function prototypes/declarations. Rik <rik@octave.org> parents: 31706 diff changeset	686 printf ("::all_property_names () const\n{\n static std::set<std::string> all_pnames = core_property_names ();\n\n");
9585 06b8b51dca48 also handle user-defined graphics properties in new property name validation scheme John W. Eaton <jwe@octave.org> parents: 9584 diff changeset	687 if (base)
29889 3ab696e02f55 use m_ prefix for data members in graphics objects and properties classes John W. Eaton <jwe@octave.org> parents: 29440 diff changeset	688 printf (" std::set<std::string> retval = all_pnames;\n std::set<std::string> dyn_props = dynamic_property_names ();\n retval.insert (dyn_props.begin (), dyn_props.end ());\n for (std::map<caseless_str, property, cmp_caseless_str>::const_iterator p = m_all_props.begin ();\n p != m_all_props.end (); p++)\n retval.insert (p->first);\n\n return retval;\n}\n\n");
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	689 else
9972 d32a6cc0193b unshare dynamic properties John W. Eaton <jwe@octave.org> parents: 9906 diff changeset	690 printf (" std::set<std::string> retval = all_pnames;\n std::set<std::string> base_props = base_properties::all_property_names ();\n retval.insert (base_props.begin (), base_props.end ());\n\n return retval;\n}\n\n");
9582 bdcfb756d721 improve error messages for ambiguous graphics property names John W. Eaton <jwe@octave.org> parents: 9185 diff changeset	691
9585 06b8b51dca48 also handle user-defined graphics properties in new property name validation scheme John W. Eaton <jwe@octave.org> parents: 9584 diff changeset	692 if (! base)
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	693 printf ("bool\n%s::properties::has_property (const caseless_str& pname) const\n{\n std::set<std::string> pnames = all_property_names ();\n\n return pnames.find (pname) != pnames.end ();\n}\n\n", class_name);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	694 }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	695 }
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	696
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	697 BEGIN {
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	698 printf ("// DO NOT EDIT! Generated automatically by genprops.awk.\n\n")
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	699 pcount = 0;
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	700 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	701
8247 e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	702 /BEGIN_PROPERTIES $.$/ {
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	703 gather = 1;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	704 idx = 0;
7895 f1a1f6dd7fac avoid using gensub in genprops.awk Jaroslav Hajek <highegg@gmail.com> parents: 7865 diff changeset	705 str = $0;
8247 e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	706 beg = index (str, "(") + 1;
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	707 len = index (str, ")") - beg;
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	708 args = substr (str, beg, len);
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	709 n = split (args, arg_list, ",");
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	710 if (n > 0)
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	711 class_name = arg_list[1];
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	712 if (n > 1)
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	713 object_name = arg_list[2];
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	714 else
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	715 object_name = class_name;
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	716 gsub (/ /, "", class_name);
e41f420875db set name of root_figure object to root John W. Eaton <jwe@octave.org> parents: 8139 diff changeset	717 gsub (/ /, "", object_name);
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	718 base = 0;
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	719 next;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	720 }
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	721
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	722 /BEGIN_PROPERTIES/ {
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	723 gather = 1;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	724 idx = 0;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	725 class_name = "";
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	726 base = 0;
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	727 next;
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	728 }
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	729
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	730 /BEGIN_BASE_PROPERTIES/ {
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	731 gather = 1;
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	732 idx = 0;
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	733 class_name = "base";
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	734 base = 1;
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	735 next;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	736 }
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	737
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	738 /END_PROPERTIES/ {
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	739 if (emit_graphics_props)
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	740 emit_source();
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	741 else
8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	742 emit_declarations();
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	743 gather = 0;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	744 next;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	745 }
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	746
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	747 {
94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	748 if (gather)
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	749 {
7403 135c13496faf [project @ 2008-01-19 06:06:46 by jwe] jwe parents: 7397 diff changeset	750 if (NF < 2 \|\| /^[ \t]*\/\//)
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	751 next;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	752
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	753 idx++;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	754
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	755 field = 1;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	756
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	757 if ($field == "mutable")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	758 {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	759 mutable[idx] = 1;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	760 field++;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	761 }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	762 else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	763 mutable[idx] = 0;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	764
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	765 type[idx] = $(field++);
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	766 ptype[idx] = (type[idx] ~ /^.*_property$/);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	767 name[idx] = $(field++);
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	768
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	769 limits[idx] = 0;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	770 mode[idx] = 0;
7403 135c13496faf [project @ 2008-01-19 06:06:46 by jwe] jwe parents: 7397 diff changeset	771 hidden[idx] = 0;
135c13496faf [project @ 2008-01-19 06:06:46 by jwe] jwe parents: 7397 diff changeset	772 readonly[idx] = 0;
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	773 emit_get[idx] = "definition";
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	774 emit_set[idx] = "definition";
7397 26146201e68e [project @ 2008-01-18 05:12:03 by jwe] jwe parents: 7379 diff changeset	775 defval[idx] = "";
7427 65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	776 updater[idx] = "";
23201 239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	777 deprecated[idx] = 0;
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	778 factory[idx] = 1;
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	779 ## if (type[idx] == "octave_value")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	780 ## emit_ov_set[idx] = "";
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	781 ## else
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	782 ## emit_ov_set[idx] = "definition";
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	783
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	784 if (NF >= field)
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	785 {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	786 if ($field != ",")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	787 {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	788 quals = $(field++);
7214 86d0b16f2bb2 [project @ 2007-11-29 03:40:04 by jwe] jwe parents: 7019 diff changeset	789
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	790 if (index (quals, "l"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	791 limits[idx] = 1;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	792
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	793 if (index (quals, "m"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	794 mode[idx] = 1;
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	795
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	796 ## There is a custom inline definition for the get function,
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	797 ## so we don't emit anything.
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	798 if (index (quals, "g"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	799 emit_get[idx] = "";
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	800
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	801 ## There is a custom extern definition for the get function,
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	802 ## but we still emit the declaration.
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	803 if (index (quals, "G"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	804 emit_get[idx] = "declaration";
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	805
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	806 ## There is a custom inline definition for the set function,
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	807 ## so we don't emit anything.
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	808 if (index (quals, "s"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	809 emit_set[idx] = "";
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	810
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	811 ## There is a custom extern definition for the set function,
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	812 ## but we still emit the declaration.
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	813 if (index (quals, "S"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	814 emit_set[idx] = "declaration";
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	815
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	816 ## The property is hidden
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	817 if (index (quals, "h"))
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	818 hidden[idx] = 1;
7403 135c13496faf [project @ 2008-01-19 06:06:46 by jwe] jwe parents: 7397 diff changeset	819
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	820 ## The property is read-only
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	821 if (index (quals, "r"))
42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	822 readonly[idx] = 1;
6904 1758d3d3d266 [project @ 2007-09-14 20:08:56 by jwe] jwe parents: 6883 diff changeset	823
7826 68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	824 ## There is an inline updater method that should be called
7427 65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	825 ## from the set method
65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	826 if (index (quals, "u"))
7826 68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	827 updater[idx] = "inline";
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 17744 diff changeset	828
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	829 ## There is an extern updater method that should be called
7826 68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	830 ## from the set method
68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	831 if (index (quals, "U"))
68550ad9ee9c Add support for extern updaters. Add set_figure_position interface to graphics_backend. Michael Goffioul <michael.goffioul@gmail.com> parents: 7523 diff changeset	832 updater[idx] = "extern";
7427 65f0a8ced9d2 [project @ 2008-01-28 22:42:18 by jwe] jwe parents: 7406 diff changeset	833
23563 614d71cdf614 maint: Strip trailing whitespace from files. John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	834 ## The property is deprecated
23201 239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	835 if (index (quals, "d"))
239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	836 deprecated[idx] = 1;
239a9fed80de New mechanism to deprecate graphics properties (bug #50327) Pantxo Diribarne <pantxo.diribarne@gmail.com> parents: 22755 diff changeset	837
10317 42d098307c30 untabify additional source files John W. Eaton <jwe@octave.org> parents: 10135 diff changeset	838 ## There is not factory default value
8061 f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	839 if (index (quals, "f"))
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	840 factory[idx] = 0;
f819e8992367 Auto-generate base_properties John W. Eaton <jwe@octave.org> parents: 8059 diff changeset	841
27956 2310164737b3 fix many spelling errors (bug #57613) John W. Eaton <jwe@octave.org> parents: 26376 diff changeset	842 ## ## emit an assignment set function
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	843 ## if (index (quals, "a"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	844 ## emit_ov_set[idx] = "assignment";
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	845 ##
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	846 ## if (type[idx] != "octave_value")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	847 ## {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	848 ## ## The 'o' and 'O' qualifiers are only useful when the
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	849 ## ## the property type is something other than an
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	850 ## ## octave_value.
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	851 ##
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	852 ## ## There is a custom inline definition for the
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	853 ## ## octave_value version of the set function, so we
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	854 ## ## don't emit anything.
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	855 ## if (index (quals, "o"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	856 ## emit_ov_set[idx] = "";
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	857 ##
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	858 ## ## There is a custom extern definition for the
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	859 ## ## octave_value version of the set function, but we
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	860 ## ## still emit the declaration.
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	861 ## if (index (quals, "O"))
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	862 ## emit_ov_set[idx] = "declaration";
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	863 ## }
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	864 }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	865
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	866 if (NF > field && $field == ",")
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	867 {
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	868 field++;
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	869
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	870 for (i = field; i <= NF; i++)
7397 26146201e68e [project @ 2008-01-18 05:12:03 by jwe] jwe parents: 7379 diff changeset	871 defval[idx] = (defval[idx] (i > field ? " " : "") $i);
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	872 }
6874 94bda6abc224 [project @ 2007-09-06 21:34:24 by jwe] jwe parents: diff changeset	873 }
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	874
c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	875 }
9906 8d20fb66a0dc more automake fixes John W. Eaton <jwe@octave.org> parents: 9620 diff changeset	876 else if (! emit_graphics_props)
7363 c31e5dab4f85 [project @ 2008-01-12 08:21:57 by jwe] jwe parents: 7225 diff changeset	877 print $0;
6883 037c8b622a01 [project @ 2007-09-10 20:13:27 by jwe] jwe parents: 6875 diff changeset	878 }

Mercurial > octave

annotate libinterp/corefcn/genprops.awk @ 33617:ec2635a02328 bytecode-interpreter tip