bar "foo" bar
bar"foo"bar
bar "foo foof foofoo other stuff perl style
multi line strings and bar " foo
bar
"foo"


call ensure_(tonto,dim>0,"SYSTEM: dim not greater than zero")

"THAT" and "THAT" _20_
"THAT"

"a"b"c"d"e"f"g"h"i"j"k"l"m"n"o"p"q"r"s"t"u"v"w"x"y"z"a"b"c"d"e"f"g"h"i"j"k"l"m"n"o"p"q"r"s"t"u"v"w"x"y"z"0"AAAAAARGH_1"1"2"3"4"5"6"7"8"9"0""AAAAAA"B"C"D"E"F"G"H"I"J"K"L"M"N"O"P"Q"R"S"T"U"V"W"X"Y"Z"AAAAAA"B"C"D"E"F"G"H"I"J"K"L"M"N"O"P"Q"R"S"T"U"V"W"X"Y"Z"AAAAAARGH_100"101"AAAAAARGH_102"103"AAAAAARGH_104"105"AAAAAARGH_106"107"AAAAAARGH_108"109"AAAAAARGH_1AAAAAARGH_10"
