Next:1.11
Терминология
Up:1
Язык программирования Zonnon
Previous:1.9
Программные единицы
К значениям атрибутов можно получать доступ, используя два вида getAttribute:
getAttribute(construct, var string);
или
string := getAttribute (construct);
Информация возвращается в виде отдельной строки, возможно содержащей
несколько значений атрибутов.
Следующий список определений XML схемы используется для описания
информации, полученной из программы:
<access>public</access>
<access>private</access>
<object>ref</object>
<object>value</object>
<parameter>var</parameter>
<parameter>value</parameter>
<immutable>open</immutable>
<immutable>sealed</immutable>
<priority>3</priority>
<behaviour>passive</behaviour> //neither locked nor concurrent
<behaviour>locked</behaviour>
<behaviour>concurrent</behaviour>
<width>64</width>
<ordinal>7</ordinal>
definition
d;
procedure
p1
(var x: integer {32});
procedure
p2
{ sealed };
var
v:
integer {64};
type
T
= ( one, two, three );
end
d.
object
o
implements d;
procedure
p1
(var x: integer {32}) implements d.p1;
var
attrs1,
attrs2, attrs3, attrs4, attrs5, attrs6: string;
begin
{
locked }
attrs1
:= getAttribute(d);
attrs2
:= getAttribute(d.v);
attrs3
:= getAttribute(p1.x);
attrs4
:= getAttribute(d.T);
attrs5
:= getAttribute(p1);
attrs6
:= getAttribute(d.p2);
end
p1;
begin
end
o.
Когда данная программа исполняется, она производит сообщения о своей
форме через информацию отражения следующим образом:
attrs1(d) contains:
"<attributes> <access>public</access> </attributes>"
attrs2(d.v) contains:
"<attributes> <access>public</access> <implement>open</implement>
<width>64</width> </attributes>"
attrs3(p1.x) contains:
"<attributes> <parameter>var</parameter> <width>32</width>
</attributes>"
attrs4(d.T) contains:
"<attributes> <access>public</access> <width>32</width>
<ordinal>3</ordinal>
</attributes>"
attrs5(p1) contains:
"<attributes> <access>public</access> <implement>sealed</implement>
<behaviour>locked</behaviour> </attributes>"
attrs6(d.p2) contains:
"<attributes> <access>public</access> <implement>sealed</implement>
<behaviour>passive</behaviour> </attributes>"
Next:1.11
Терминология
Up:1
Язык программирования Zonnon
Previous:1.9
Программные единицы