;;; syd-prelude.el -*- lexical-binding: t; -*-

(eval-when-compile (require 'cl-lib))

(require 'syd-constants)

(cl-defmacro syd-define-stub
    (name &key (desc "implement me!") interactive)
  (let ((todo (format "%s: TODO: %s" name desc)))
    `(defun ,name (&rest _)
       ,@(if interactive (list '(interactive)) nil)
       ,todo
       (error ,todo))))

(provide 'syd-prelude)