This commit is contained in:
Ian Keane 2020-02-18 14:21:14 -05:00
parent 276853ba84
commit 1cb167b597
361 changed files with 77302 additions and 4 deletions

View file

@ -0,0 +1,11 @@
(in-package :de.anvi.croatoan)
(defun alert (&optional (type :beep))
(case type
(:beep (%beep))
(:flash (%flash))
(otherwise (error "Available alert types: :beep :flash"))))
;;; TODOs
;; [ ] Return values, errors.