diff --git a/pkgs/gui-pkgs/gui-test/tests/gracket/dc.rktl b/pkgs/gui-pkgs/gui-test/tests/gracket/dc.rktl
index 2ea5e800..da20a6d6 100644
--- a/pkgs/gui-pkgs/gui-test/tests/gracket/dc.rktl
+++ b/pkgs/gui-pkgs/gui-test/tests/gracket/dc.rktl
@@ -843,6 +843,13 @@
 
 (st #f (make-bitmap 1000000 1000000) ok?)
 
+;; ----------------------------------------
+;; No #<unsafe-undefined> checks on certain class instances
+
+(test #f 'undef-pen (impersonator? (new pen%)))
+(test #f 'undef-brush (impersonator? (new brush%)))
+(test #f 'undef-color (impersonator? (new color%)))
+
 ;; ----------------------------------------
 
 (report-errs)
diff --git a/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl b/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl
index bdfaf93d..dd454e76 100644
--- a/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl
+++ b/pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl
@@ -649,6 +649,16 @@
   (unless (<= 0 count2 (/ N 2))
     (error 'notifications "not weak enough? ~e" count2)))
   
+;; ----------------------------------------
+;; No #<unsafe-undefined> checks on certain class instances
+
+(test #f 'undef-snip (impersonator? (new snip%)))
+(test #f 'undef-string-snip% (impersonator? (new string-snip%)))
+(test #f 'undef-tab-snip% (impersonator? (new tab-snip%)))
+(test #f 'undef-image-snip% (impersonator? (new image-snip%)))
+(test #f 'undef-style-delta% (impersonator? (new style-delta%)))
+(test #f 'undef-style<%> (impersonator? (send (new style-list%) basic-style)))
+
 ;; ----------------------------------------
 
 (report-errs)