From e7c1918ba0cf595fbf7ed83f04f92c895f41ceb6 Mon Sep 17 00:00:00 2001 From: Marshall Lochbaum Date: Wed, 9 Nov 2022 12:19:02 -0500 Subject: [PATCH] Native <` implementation using addition --- src/builtins/md1.c | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/src/builtins/md1.c b/src/builtins/md1.c index b2e57601..4b3c4d9b 100644 --- a/src/builtins/md1.c +++ b/src/builtins/md1.c @@ -206,6 +206,17 @@ B scan_c1(Md1D* d, B x) { B f = d->f; if (rtid==n_or | rtid==n_ceil ) { bit_or:; u64* rp; B r=m_bitarrv(&rp,ia); usz n=BIT_N(ia); u64 xi; usz i=0; while(i>63); + rp[i] = p = x & (m10 ^ (x + c)); + } + decG(x); return r; + } goto base; } if (rtid==n_add) { // +