diff --git a/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl b/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl index dd454e76..901d15cb 100644 --- a/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl +++ b/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl @@ -648,7 +648,17 @@ (error 'notifications "too weak? ~e" count)) (unless (<= 0 count2 (/ N 2)) (error 'notifications "not weak enough? ~e" count2))) - + +;; ---------------------------------------- +;; make sure splitting a large string snip works: + +(void + (send (make-object string-snip% (make-string 100000 #\a)) + split + 50000 + (box #f) + (box #f))) + ;; ---------------------------------------- ;; No # checks on certain class instances