diff options
Diffstat (limited to 'tests/syntax-tests/highlighted/Tcl/test.tcl')
-rw-r--r-- | tests/syntax-tests/highlighted/Tcl/test.tcl | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/tests/syntax-tests/highlighted/Tcl/test.tcl b/tests/syntax-tests/highlighted/Tcl/test.tcl new file mode 100644 index 00000000..8c87e2c7 --- /dev/null +++ b/tests/syntax-tests/highlighted/Tcl/test.tcl @@ -0,0 +1,22 @@ +[38;2;249;38;114mset[0m[38;2;248;248;242m part1 hello[0m +[38;2;249;38;114mset[0m[38;2;248;248;242m part2 how[0m[38;2;248;248;242m;[0m[38;2;248;248;242m [0m[38;2;249;38;114mset[0m[38;2;248;248;242m part3 are[0m +[38;2;249;38;114mset[0m[38;2;248;248;242m part4 you[0m + +[38;2;249;38;114mset[0m[38;2;248;248;242m part2[0m[38;2;248;248;242m;[0m + +[38;2;249;38;114mset[0m[38;2;248;248;242m greeting [0m[38;2;255;255;255m$[0m[38;2;255;255;255mpart1[0m[38;2;255;255;255m$[0m[38;2;255;255;255mpart2[0m[38;2;255;255;255m$[0m[38;2;255;255;255mpart3[0m[38;2;255;255;255m$[0m[38;2;255;255;255mpart4[0m + +[38;2;249;38;114mset[0m[38;2;248;248;242m somevar [0m[38;2;248;248;242m{[0m +[38;2;248;248;242m [0m[38;2;248;248;242mThis[0m[38;2;248;248;242m is a literal $ sign, and this [0m[38;2;190;132;255m\}[0m[38;2;248;248;242m escaped[0m +[38;2;248;248;242m [0m[38;2;248;248;242mbrace[0m[38;2;248;248;242m remains uninterpreted[0m +[38;2;248;248;242m}[0m + +[38;2;249;38;114mset[0m[38;2;248;248;242m name Neo[0m +[38;2;249;38;114mset[0m[38;2;248;248;242m greeting [0m[38;2;230;219;116m"[0m[38;2;230;219;116mHello, [0m[38;2;255;255;255m$[0m[38;2;255;255;255mname[0m[38;2;230;219;116m"[0m + +[38;2;249;38;114mvariable[0m[38;2;248;248;242m name NotNeo[0m + +[38;2;249;38;114mnamespace[0m[38;2;248;248;242m eval [0m[38;2;166;226;46mpeople[0m[38;2;248;248;242m [0m[38;2;248;248;242m{[0m +[38;2;248;248;242m [0m[38;2;249;38;114mset[0m[38;2;248;248;242m name NeoAgain[0m +[38;2;248;248;242m}[0m + |