diff --git a/lang/cem/cemcom.ansi/eval.c b/lang/cem/cemcom.ansi/eval.c
index 8c0173c75..3a59b9cc1 100644
--- a/lang/cem/cemcom.ansi/eval.c
+++ b/lang/cem/cemcom.ansi/eval.c
@@ -539,6 +539,9 @@ EVAL(expr, val, code, true_label, false_label)
 				else
 					C_lfr(ATW(tp->tp_size));
 			}
+			if (tp->tp_fund == FLOAT || tp->tp_fund == DOUBLE
+			    || tp->tp_fund == LNGDBL)
+				fp_used = 1;
 			/* ??? set filename and line number ??? */
 			break;
 		}