diff --git a/lang/cem/libcc/stdio/fltpr.c b/lang/cem/libcc/stdio/fltpr.c
index fbfdaa72..7d45a2f9 100644
--- a/lang/cem/libcc/stdio/fltpr.c
+++ b/lang/cem/libcc/stdio/fltpr.c
@@ -57,6 +57,10 @@ char *_pscien(r,s,n,b) float r; register char *s; {
 	} else {
 		*s++ = '+' ;
 	}
+	if (dp >= 100) {
+		*s++ = '0' + (dp / 100);
+		dp %= 100;
+	}
 	*s++ = '0' + (dp/10);
 	*s++ = '0' + (dp%10);
 	return(s);