X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=tests%2Fautomated%2Fbyte-compiler-tests.el;h=e4b2520a1a95bcbc3603144b75fab5b9ef94a9fb;hb=02f4d2761a98c5cb9d5b423d2361160a5d8c9ee4;hp=11f355aed3df46a871ef16a5d9052af0e07ad228;hpb=98a6e4055a1fa624c592ac06f79287d55196ca37;p=chise%2Fxemacs-chise.git.1

diff --git a/tests/automated/byte-compiler-tests.el b/tests/automated/byte-compiler-tests.el
index 11f355a..e4b2520 100644
--- a/tests/automated/byte-compiler-tests.el
+++ b/tests/automated/byte-compiler-tests.el
@@ -119,6 +119,8 @@
 (before-and-after-compile-equal (- simplyamarker 1))
 (before-and-after-compile-equal (- simplyamarker))
 
+(before-and-after-compile-equal (let ((z 1)) (or (setq z 42)) z))
+
 ;; byte-after-unbind-ops
 
 ;; byte-constant