aboutsummaryrefslogtreecommitdiff
path: root/compile.c
diff options
context:
space:
mode:
Diffstat (limited to 'compile.c')
-rw-r--r--compile.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/compile.c b/compile.c
index 8f796bb2..77157d43 100644
--- a/compile.c
+++ b/compile.c
@@ -36,6 +36,11 @@ static bool promote(env_t *env, CORD *code, type_t *actual, type_t *needed)
return true;
}
+ if (actual->tag == IntType && Match(actual, IntType)->bits == 0 && needed->tag == NumType) {
+ *code = CORD_all("Int$as_num(", *code, ")");
+ return true;
+ }
+
if (actual->tag == IntType || actual->tag == NumType)
return true;