diff options
| author | Heiko Schlittermann (HS12) <hs@schlittermann.de> | 2015-04-09 21:49:47 +0200 |
|---|---|---|
| committer | Jeremy Harris <jgh146exb@wizmail.org> | 2015-04-13 18:40:25 +0100 |
| commit | 9d85e46af45bc9bbe55705195a814e5497ecd4ee (patch) | |
| tree | a559e101571c434f00cea205087e73c96b50767b /test/scripts/3000-Perl | |
| parent | 13510a2575ce7d149b0a1fda78b13fce12b3faa5 (diff) | |
Stabilize test 3000 - Perl hash
A Perl hash in scalar context returns a true value. Nothing else.
Currently it's information about the internal storage, something like
n/m, used buckets/allocated buckets. But this seems to change from run
to run between 1/8 and 2/8.
Diffstat (limited to 'test/scripts/3000-Perl')
| -rw-r--r-- | test/scripts/3000-Perl/3000 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/scripts/3000-Perl/3000 b/test/scripts/3000-Perl/3000 index fc5002012..30ac29eb3 100644 --- a/test/scripts/3000-Perl/3000 +++ b/test/scripts/3000-Perl/3000 @@ -16,7 +16,7 @@ ${perl{foo}{1}{2}{3}{4}{5}{6}{7}{8}{9}} ${perl{return_scalar}} ${perl{return_list}} ${perl{return_variable_vector}} -${perl{return_hash}} +${sg{${perl{return_hash}}}{\\d+}{X}} $tod_full // ${perl{change_locale}} // $tod_full **** |