diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2021-09-01 23:13:17 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2021-09-01 23:13:17 (GMT) |
commit | 166d3a5b6c49ef9433b4e01976d24d25534431fb (patch) | |
tree | 908304349d9451e61944df4f26de72a8bbfa1ede /tests | |
parent | 00b583a57994fe50d0b67f154b398d81b4ab7561 (diff) | |
download | tcl-166d3a5b6c49ef9433b4e01976d24d25534431fb.zip tcl-166d3a5b6c49ef9433b4e01976d24d25534431fb.tar.gz tcl-166d3a5b6c49ef9433b4e01976d24d25534431fb.tar.bz2 |
Fix for [ccc448a6bfd59cbd], namespace ensemble subcommand name prefix matching and a subsequent error results in a segmentation fault
Diffstat (limited to 'tests')
-rw-r--r-- | tests/namespace.test | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/namespace.test b/tests/namespace.test index 2d0c20f..ae233cb 100644 --- a/tests/namespace.test +++ b/tests/namespace.test @@ -1920,6 +1920,24 @@ test namespace-42.10 { unset -nocomplain lst } -returnCodes error -match glob -result {invalid command name *three*} + +test namespace-42.11 { + ensembles: prefix matching segmentation fault + + issue ccc448a6bfd59cbd +} -body { + namespace eval n1 { + namespace ensemble create + namespace export * + proc p1 args {error success} + } + # segmentation fault only occurs in the non-byte-compiled path, so avoid + # byte compilation + set cmd {namespace eva n1 {[namespace parent]::n1 p1}} + {*}$cmd +} -returnCodes error -result success + + test namespace-43.1 {ensembles: dict-driven} { namespace eval ns { namespace export x* |