quote of large string

Started by ssqq, July 03, 2014, 08:13:12 AM

Previous topic - Next topic

ssqq

> (let (file "temp.txt") (write-file file (append "[text]" (dup "[text]" 5) "[/text]")) (eval-string (read-file "temp.txt")))
"[text][text][text][text][text]"
> (let (file "temp.txt") (write-file file (append "[text]" (dup "[/text]" 5) "[/text]")) (eval-string (read-file "temp.txt")))
nil


quote of large string should allow any word as [begin][/end] border-symbol.