summaryrefslogtreecommitdiffstats
path: root/tests/registry.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-06-21 09:34:53 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-06-21 09:34:53 (GMT)
commitcf052af7a9a777686a38795916133d12e938984e (patch)
tree3f65ca039f88a530f9cea51cbee2a60eb8af78c0 /tests/registry.test
parentf9037344f87d9722ef8152dd4c5b404cdd7ba983 (diff)
parentaf21439b8bdd0c25c86c7da8c35b704514557dcc (diff)
downloadtcl-cf052af7a9a777686a38795916133d12e938984e.zip
tcl-cf052af7a9a777686a38795916133d12e938984e.tar.gz
tcl-cf052af7a9a777686a38795916133d12e938984e.tar.bz2
[Bug #3362446]: registry keys command fails with 8.5/8.6
update registry version to 1.2.2
Diffstat (limited to 'tests/registry.test')
-rw-r--r--tests/registry.test6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/registry.test b/tests/registry.test
index 2a38f2a..bd91911 100644
--- a/tests/registry.test
+++ b/tests/registry.test
@@ -460,6 +460,12 @@ test registry-6.20 {GetValue: values with Unicode strings with embedded nulls} {
registry delete HKEY_CURRENT_USER\\TclFoobar
set result
} "foo ba r baz"
+test registry-6.21 {GetValue: very long value names and values} {pcOnly} {
+ registry set HKEY_CURRENT_USER\\TclFoobar [string repeat k 16383] [string repeat x 16383] multi_sz
+ set result [registry get HKEY_CURRENT_USER\\TclFoobar [string repeat k 16383]]
+ registry delete HKEY_CURRENT_USER\\TclFoobar
+ set result
+} [string repeat x 16383]
test registry-7.1 {GetValueNames: bad key} {win reg english} {
registry delete HKEY_CURRENT_USER\\TclFoobar