diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-06-21 11:02:52 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-06-21 11:02:52 (GMT) |
| commit | efccf3e3bbe798b822e81296462802f3aae96a0d (patch) | |
| tree | 15a7a0f70ec0c45c272f6df1fa8c04e12d6205ff /tests/registry.test | |
| parent | 6f7aaeb8e62672aaba75334987f581da92e16607 (diff) | |
| parent | e06ad27aa954e1d75f2ec38a9d6289e82b1ce974 (diff) | |
| download | tcl-efccf3e3bbe798b822e81296462802f3aae96a0d.zip tcl-efccf3e3bbe798b822e81296462802f3aae96a0d.tar.gz tcl-efccf3e3bbe798b822e81296462802f3aae96a0d.tar.bz2 | |
[Bug 3362446]: possible allocation error when using UNICODE
Diffstat (limited to 'tests/registry.test')
| -rw-r--r-- | tests/registry.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/registry.test b/tests/registry.test index bd91911..f90f602 100644 --- a/tests/registry.test +++ b/tests/registry.test @@ -461,11 +461,11 @@ test registry-6.20 {GetValue: values with Unicode strings with embedded nulls} { 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 set HKEY_CURRENT_USER\\TclFoobar [string repeat k 199] [string repeat x 199] multi_sz + set result [registry get HKEY_CURRENT_USER\\TclFoobar [string repeat k 199]] registry delete HKEY_CURRENT_USER\\TclFoobar set result -} [string repeat x 16383] +} [string repeat x 199] test registry-7.1 {GetValueNames: bad key} {win reg english} { registry delete HKEY_CURRENT_USER\\TclFoobar |