diff --git a/tests/testthat/test-compare.R b/tests/testthat/test-compare.R
index 9dd56f2..db4ee95 100644
--- a/tests/testthat/test-compare.R
+++ b/tests/testthat/test-compare.R
@@ -308,6 +308,7 @@ test_that("can compare R6 objects", {
 })
 
 test_that("can compare S7 objects", {
+  skip_if_not_installed("S7")
   A <- S7::new_class("A", properties = list(a = S7::class_numeric), package = "waldo")
   B <- S7::new_class("B", parent = A, package = "waldo")