For functions returning booleans, there's 'tnil:
(xdef 'exact (lambda (x) (tnil (and (integer? x) (exact? x)))))
(xdef 'system (wrapnil system))
(define (expand-ssyntax sym) (ac-denil ((eval '__ssexpand) sym)))