Code: Select all
objectdef Test
{
variable persistentref M_MySet
method SetMySet(persistentref MySet)
{
M_MySet:Set[MySet]
echo ${M_MySet.Used}
}
}
function main()
{
variable set MySet
variable Test MyTest
echo ${MySet.Used}
MyTest:SetMySet[MySet]
}
Code: Select all
0
NULL
Code: Select all
objectdef Test
{
variable string M_Name
method Initialize(string Name)
{
M_Name:Set[${Name}]
}
member ToText()
{
return ${M_Name}
}
}
function main()
{
variable collection:Test MyCollection
MyCollection:Set["key1","value1"]
MyCollection:Set["key2","value2"]
variable persistentref MyTestRef
MyTestRef:Set[MyCollection.Element["key2"]]
echo ${MyTestRef}
echo ${MyCollection.Element["key2"]}
}
Code: Select all
NULL
value2