From 4e0182ec2e93cfa512ef7de0a511d60a859e9e55 Mon Sep 17 00:00:00 2001 From: dzaima Date: Fri, 21 May 2021 17:09:15 +0300 Subject: [PATCH] =?UTF-8?q?=E2=89=A0`i32arr?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/md1.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/md1.c b/src/md1.c index 1be07e1a..2fbb53ef 100644 --- a/src/md1.c +++ b/src/md1.c @@ -130,6 +130,13 @@ B scan_c1(B d, B x) { B f = c(Md1D,d)->f; dec(x); return r; } + if (rtid==14) { + i32* rp; B r = m_i32arrv(&rp, ia); + i32 c = 0; + for (usz i = 0; i < ia; i++) rp[i] = c = c!=xp[i]; + dec(x); + return r; + } } base:;