RosettaCodeData/Task/Copy-a-string/PicoLisp/copy-a-string.l

mirror of https://github.com/acmeism/RosettaCodeData.git
(setq Str1 "abcdef")
(setq Str2 Str1)                       # Create a reference to that symbol
(setq Str3 (name Str1))                # Create new symbol with name "abcdef"
	`(setq Str1 "abcdef")`
	`(setq Str2 Str1) # Create a reference to that symbol`
	`(setq Str3 (name Str1)) # Create new symbol with name "abcdef"`