aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

September 2017 Update

Browse source
This commit is contained in:
Ingy döt Net 2017-09-23 10:01:46 +02:00
parent bba7bfd280
commit ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions
Download patch file Download diff file Expand all files Collapse all files

23
Task/Dynamic-variable-names/Elena/dynamic-variable-names.elena
View file

@ -1,25 +1,24 @@
#import system.
#import system'dynamic.
#import extensions.
import system'dynamic.
import extensions.
#class TestClass
class TestClass
{
#field theVariables.
object theVariables.
#constructor new
constructor new
[
theVariables := DynamicStruct new.
]
#method eval
eval
[
#var(type:subject) varRef := Signature new &literal:(console write:"Enter the variable name:" readLine).
theVariables::varRef set:42.
subject varRef := Signature new literal:(console write:"Enter the variable name:"; readLine).
theVariables~varRef set:42.
#var v := theVariables::varRef get.
var v := theVariables~varRef get.
console writeLine:(varRef name):"=":(theVariables::varRef get).
console printLine(varRef literal,"=",theVariables~varRef get); readChar.
]
}
#symbol program = TestClass new.
program = TestClass new.