diff --git a/core/src/ledger_cleanup_service.rs b/core/src/ledger_cleanup_service.rs
index f7dafe4dc5..3f72f5ae62 100644
--- a/core/src/ledger_cleanup_service.rs
+++ b/core/src/ledger_cleanup_service.rs
@@ -119,7 +119,7 @@ impl LedgerCleanupService {
         (cur_shreds, lowest_slot_to_clean, first_slot)
     }
 
-    fn cleanup_ledger(
+    pub fn cleanup_ledger(
         new_root_receiver: &Receiver<Slot>,
         blockstore: &Arc<Blockstore>,
         max_ledger_shreds: u64,
@@ -283,51 +283,4 @@ mod tests {
         drop(blockstore);
         Blockstore::destroy(&blockstore_path).expect("Expected successful database destruction");
     }
-
-    #[test]
-    fn test_compaction() {
-        let blockstore_path = get_tmp_ledger_path!();
-        let blockstore = Arc::new(Blockstore::open(&blockstore_path).unwrap());
-
-        let n = 10_000;
-        let batch_size = 100;
-        let batches = n / batch_size;
-        let max_ledger_shreds = 100;
-
-        for i in 0..batches {
-            let (shreds, _) = make_many_slot_entries(i * batch_size, batch_size, 1);
-            blockstore.insert_shreds(shreds, None, false).unwrap();
-        }
-
-        let u1 = blockstore.storage_size().unwrap() as f64;
-
-        // send signal to cleanup slots
-        let (sender, receiver) = channel();
-        sender.send(n).unwrap();
-        let mut next_purge_batch = 0;
-        LedgerCleanupService::cleanup_ledger(
-            &receiver,
-            &blockstore,
-            max_ledger_shreds,
-            &mut next_purge_batch,
-            10,
-        )
-        .unwrap();
-
-        thread::sleep(Duration::from_secs(2));
-
-        let u2 = blockstore.storage_size().unwrap() as f64;
-
-        assert!(u2 < u1, "insufficient compaction! pre={},post={}", u1, u2,);
-
-        // check that early slots don't exist
-        let max_slot = n - max_ledger_shreds - 1;
-        blockstore
-            .slot_meta_iterator(0)
-            .unwrap()
-            .for_each(|(slot, _)| assert!(slot > max_slot));
-
-        drop(blockstore);
-        Blockstore::destroy(&blockstore_path).expect("Expected successful database destruction");
-    }
 }
diff --git a/core/tests/ledger_cleanup.rs b/core/tests/ledger_cleanup.rs
index c6c07aa657..c91880ce4b 100644
--- a/core/tests/ledger_cleanup.rs
+++ b/core/tests/ledger_cleanup.rs
@@ -11,7 +11,7 @@ mod tests {
     use std::sync::atomic::{AtomicBool, Ordering};
     use std::sync::mpsc::channel;
     use std::sync::{Arc, RwLock};
-    use std::thread::{Builder, JoinHandle};
+    use std::thread::{self, Builder, JoinHandle};
     use std::time::{Duration, Instant};
     use systemstat::{CPULoad, Platform, System};
 
@@ -356,4 +356,51 @@ mod tests {
                 .expect("Expected successful database destruction");
         }
     }
+
+    #[test]
+    fn test_compaction() {
+        let blockstore_path = get_tmp_ledger_path!();
+        let blockstore = Arc::new(Blockstore::open(&blockstore_path).unwrap());
+
+        let n = 10_000;
+        let batch_size = 100;
+        let batches = n / batch_size;
+        let max_ledger_shreds = 100;
+
+        for i in 0..batches {
+            let (shreds, _) = make_many_slot_entries(i * batch_size, batch_size, 1);
+            blockstore.insert_shreds(shreds, None, false).unwrap();
+        }
+
+        let u1 = blockstore.storage_size().unwrap() as f64;
+
+        // send signal to cleanup slots
+        let (sender, receiver) = channel();
+        sender.send(n).unwrap();
+        let mut next_purge_batch = 0;
+        LedgerCleanupService::cleanup_ledger(
+            &receiver,
+            &blockstore,
+            max_ledger_shreds,
+            &mut next_purge_batch,
+            10,
+        )
+        .unwrap();
+
+        thread::sleep(Duration::from_secs(2));
+
+        let u2 = blockstore.storage_size().unwrap() as f64;
+
+        assert!(u2 < u1, "insufficient compaction! pre={},post={}", u1, u2,);
+
+        // check that early slots don't exist
+        let max_slot = n - max_ledger_shreds - 1;
+        blockstore
+            .slot_meta_iterator(0)
+            .unwrap()
+            .for_each(|(slot, _)| assert!(slot > max_slot));
+
+        drop(blockstore);
+        Blockstore::destroy(&blockstore_path).expect("Expected successful database destruction");
+    }
 }