1 files changed, 6 insertions, 0 deletions
diff --git a/tests/dict.test b/tests/dict.test
index 3d86668..f8d62f1 100644
--- a/tests/dict.test
+++ b/tests/dict.test
@@ -1887,6 +1887,12 @@ test dict-23.6 {CompileWord OBOE} {
 	} [return [incr n -[linenumber]]]
     }} [linenumber]
 } 1
+test dict-23.7 {CompileWord OBOE} {
+    apply {n {
+	dict for {a b} [return [incr n -[linenumber]]] {*}{
+	} {}
+    }} [linenumber]
+} 2
 
 rename linenumber {}
 test dict-24.22 {dict map results (non-compiled)} {