Hello everyone! I'm back hacking on Scheme Mosaic.

The following code no longer works, what is the correct thing to do?

;;; Assertion facility from Snd docs.

(define *debugging* #t)

(define-expansion (assert assertion)
  (if *debugging*
      `(unless ,assertion
         (format *stderr* "~A: ~A failed~%" __func__ ',assertion))
      (values)))
_______________________________________________
Cmdist mailing list
[email protected]
https://cm-mail.stanford.edu/mailman/listinfo/cmdist

Reply via email to