From bbacbcb6666cda222527a170bc474ad1e3b6a0ed Mon Sep 17 00:00:00 2001 From: Joseph Ferano Date: Sun, 20 Sep 2026 19:27:06 +0700 Subject: [PATCH] dead-beef's byte arm learns arity's new ctx argument --- lib/check.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/check.ml b/lib/check.ml index 79d28f2..329b970 100644 --- a/lib/check.ml +++ b/lib/check.ml @@ -5550,7 +5550,7 @@ and named_call ctx ~want loc name args = mechanism behind it, since neither backend needs the number early. *) | "filled" | "dead-beef" -> let is_byte = String.equal name "filled" in - if is_byte then arity loc name 1 args + if is_byte then arity ctx loc name 1 args else if List.length args > 1 then fail loc "%s takes the pattern or nothing at all, given %d arguments" name (List.length args);