;;; bend-macros.lsp -- (bend ...) / (bend! ...) macros.
;;;
;;; Loaded only by tiers that support define-syntax (Python, C).
;;; Asm tier callers use bend-call / bend!-call from bend.lsp directly.

(define-syntax bend
  (syntax-rules ()
    ((_ expr) (bend-dispatch (lambda () expr) 'expr #f))))

(define-syntax bend!
  (syntax-rules ()
    ((_ expr) (bend-dispatch (lambda () expr) 'expr #t))))
