Author: coke
Date: Wed Aug 3 12:00:23 2005
New Revision: 8789
Modified:
trunk/languages/tcl/t/tcl_backslash.t
Log:
Note the bug number for these failing tests.
Modified: trunk/languages/tcl/t/tcl_backslash.t
==============================================================================
--- trunk/languages/tcl/t/tcl_backslash.t (original)
+++ trunk/languages/tcl/t/tcl_backslash.t Wed Aug 3 12:00:23 2005
@@ -214,7 +214,7 @@ binmode *STDOUT, ':utf8';
TODO: {
-local $TODO = "These four tests tickle a seg-fault in parrot";
+local $TODO = "These four tests tickle a seg-fault in parrot: [#36794]";
language_output_is("tcl",<<'TCL',<<OUT,"unicode three chars");
set a \u666
