+ (oos 'load-op 'sb-aclrepl-tests)
+ (oos 'test-op 'sb-aclrepl-tests))
+
+(defsystem sb-aclrepl-tests
+ :depends-on (sb-rt)
+ :components ((:file "tests")))
+
+(defmethod perform ((o test-op) (c (eql (find-system :sb-aclrepl-tests))))
+ (or (funcall (intern "DO-TESTS" (find-package "SB-RT")))
+ (error "test-op failed")))