quote of large string

For the Compleat Fan
Post Reply
ssqq
Posts: 88
Joined: Sun May 04, 2014 12:49 pm

quote of large string

Post by ssqq »

Code: Select all

> (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.

Post Reply