diff --git a/src/builtins/md1.c b/src/builtins/md1.c index 5b523b43..c160d3a8 100644 --- a/src/builtins/md1.c +++ b/src/builtins/md1.c @@ -260,14 +260,14 @@ B fold_c1(Md1D* d, B x) { B f = d->f; if (xe==el_i8 ) { i8* xp = i8any_ptr (x); i64 c=0; for (usz i=0; i>6); i++) if (~xp[i]){r=0;break;} if(~bitp_l1(xp,ia))r=0; decG(x);return m_i32(r); } if (xe==el_i8 ) { i8* xp = i8any_ptr (x); i32 c=1; for (usz i=0; i