aboutsummaryrefslogtreecommitdiff
path: root/src/builtin_OP-OP.inc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/builtin_OP-OP.inc.c')
-rw-r--r--src/builtin_OP-OP.inc.c2
1 files changed, 1 insertions, 1 deletions
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) {