Dropping when-not (because its unless)

test.scm

@@ -30,12 +30,6 @@
   (define-test "test"
     (assert-equal 'a (if-not #f 'a 'b))))
 
-(define-test-suite "when-not"
-  (define-test "positive-case"
-    (assert-equal 'return (when-not #f 'do-some-stuff 'return)))
-  (define-test "negative-case"
-    (assert-unspecified (when-not #t 'do-some-stuff 'return))))
-
 (define-test-suite "for"
   (define-test "permutation"
     (define value (for ([i (iota 2)]