FIX: issue #28

red · May 5, 2011 · 4b9004d · 4b9004d
1 parent 93aedeb
commit 4b9004d
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/red-system/targets/IA32.r b/red-system/targets/IA32.r
@@ -534,7 +534,10 @@ make target-class [
 			* [
 				switch b [
 					imm [
-						either c: power-of-2? arg2 [	;-- trivial optimization for b=2^n
+						either all [
+							not zero? arg2
+							c: power-of-2? arg2			;-- trivial optimization for b=2^n
+						][
 							either width = 1 [
 								emit #{C0E0}			;-- SHL al, log2(b)	; 8-bit unsigned
 							][