;;; -*- lexical-binding: t -*- (let ((foo--var nil)) (defun foo () (interactive) foo--var)) (byte-compile 'foo)