From 47d6cc352e11130646220381820555eac47ba088 Mon Sep 17 00:00:00 2001 From: mirenn Date: Fri, 13 Mar 2026 16:25:39 +0100 Subject: added flag to suppress unimportat output --- src/builtin_OP-OP.inc.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/builtin_OP-OP.inc.c') diff --git a/src/builtin_OP-OP.inc.c b/src/builtin_OP-OP.inc.c index f95ab1e..0b9f761 100644 --- a/src/builtin_OP-OP.inc.c +++ b/src/builtin_OP-OP.inc.c @@ -760,7 +760,7 @@ if (BASIC(a2)->id == ID_TUPLE2) { // %foo >< @(args, s) - int percented_id = FIX2INT(AGENT(a1)->port[0]); + double percented_id = FIX2FLOAT(AGENT(a1)->port[0]); int arity = IdTable_get_arity(percented_id); if (arity < 1) { -- cgit v1.2.3