Fix failure to set one bit in sets larger than machine word.

I introduced the regression not in the original rewrite circa 2010 but in a minor cleanup here in 2012: https://modula3.elegosoft.com/cgi-bin/cvsweb.cgi/cm3/m3-libs/m3core/src/Csupport/Common/hand.c.diff?r1=1.138;r2=1.139;f=u
modula3 · Jun 10, 2015 · 2f2715a · 2f2715a
1 parent e964380
commit 2f2715a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/m3-libs/m3core/src/Csupport/Common/hand.c b/m3-libs/m3core/src/Csupport/Common/hand.c
@@ -236,7 +236,7 @@ void
 __stdcall
 set_range(WORD_T b, WORD_T a, WORD_T* s)
 {
-  if (a >= b) {
+  if (a > b) {
       /* no bits to set */
   } else {
     WORD_T const a_word = a / SET_GRAIN;