\version "2.19.17"

#(define (defined-all? . l)
   (let ((l (map defined? l)))
     (apply and l)))
sc = foo
ac = bar
% ‘Wrong type argument in position 1: #<primitive-builtin-macro! and>’
#(display (defined-all? 'sc 'ac))