RosettaCodeData/Task/Dynamic-variable-names/PicoLisp/dynamic-variable-names.l

7 lines
307 B
Text
Raw Permalink Normal View History

2013-04-10 16:57:12 -07:00
(de userVariable ()
(prin "Enter a variable name: ")
(let Var (line T) # Read transient symbol
(prin "Enter a value: ")
(set Var (read)) # Set symbol's value
(println 'Variable Var 'Value (val Var)) ) ) # Print them