(xdef 'eval (lambda (e)
              (eval (ac (ac-denil e) '()) (interaction-environment))))

From ac.scm ©