diff --git a/tests/runtime/cases/norm_bool.bas b/tests/runtime/cases/norm_bool.bas
new file mode 100644
index 000000000..2e8279255
--- /dev/null
+++ b/tests/runtime/cases/norm_bool.bas
@@ -0,0 +1,21 @@
+#include "lib/tst_framework.bas"
+
+INIT("Test BOOL Normalization")
+
+DIM a as UByte
+
+PRINT "PRINT: "; a = a
+PRINT "SHL: "; (a = a) SHL 1; " "; 1 SHL (a = a); " "; (a = a) SHL (a = a)
+PRINT "SHR: "; (a = a) SHR 1; " "; 1 SHR (a = a); " "; (a = a) SHR (a = a)
+PRINT "ADD: "; (a = a) + (a = a)
+PRINT "SUB: "; (a = a) - (a = a)
+PRINT "MUL: "; (a = a) * (a = a)
+PRINT "DIV: "; (a = a) / (a = a)
+PRINT "LET: ";: LET a = (a = a): PRINT a
+PRINT "OR: "; (a = a) OR (a = a)
+PRINT "AND: "; (a = a) AND (a = a)
+PRINT "XOR: "; (a = a) XOR (a = a)
+
+
+FINISH
+
diff --git a/tests/runtime/expected/norm_bool.tzx.scr b/tests/runtime/expected/norm_bool.tzx.scr
new file mode 100644
index 000000000..db05453cc
Binary files /dev/null and b/tests/runtime/expected/norm_bool.tzx.scr differ