1 files changed, 2 insertions, 1 deletions
diff --git a/c/eval.c b/c/eval.c
index b6dad3a..746bc64 100644
--- a/c/eval.c
+++ b/c/eval.c
@@ -19,7 +19,8 @@ targ2hosttype(enum typetag t)
       S(long long, TYVLONG)
 #undef U
 #undef S
-   } else if (isfltt(t)) return t;
+   } else if (t == TYLDOUBLE) return TYDOUBLE;
+   else if (isfltt(t)) return t;
    return 0;
 }