-- string samples in lieu of automatic testing PUBLIC DOMAIN 2008,2011
-- note: does not test newlines other than LF
-- note: does not comprehensively test delimiter switching
--
-- empty strings
local a=""
local a=''
-- simple string
local a="foo bar BAZ 123"
-- alphanumeric characters
local a="abcdefghijklmnopqrstuvxyz0123456789"
-- punctuation
local a="~`!@#$%^&*()-_=+|[]{};:,.<>/?"
-- \a\b\f\n\r\t\v -- no change
local a="\a\b\f\n\r\t\v"
-- \\ -- no change
local a="\\"
local a='\\'
-- \"\' -- depends on delim, other can remove \
local a="'\""
local a='\'"'
-- \<eol> -- normalize the EOL only
local a="\
"
local a="foo\
bar"
local a="foo\
\
bar"
-- \ddd -- if \a\b\f\n\r\t\v, change to latter
local a="\a\b\t\n\v\f\r"
-- \ddd -- if other < ascii 32, keep ddd but zap leading zeros
local a="\0\1\2\3\4\5\6\14\15"
local a="\16\17\18\19\20\21\22\23\24\25\26\27\28\29\30\31"
local a="\0\1\4\15"
-- bug fixed: but if there is following digits, don't shorten
local a="\00123\01623"
-- \ddd -- if >= ascii 32, translate into literal, check \\,\",\' cases
local a=" Aa¤"
local a="\\"
local a="'\""
local a='\'"'
-- switch delimiters if string becomes shorter
local a='\'""""""\''
local a="\"''''''\""