diff --git a/core/math/parser/parser.factor b/core/math/parser/parser.factor
index 0aac50e70f..7d6d3c2a3e 100644
--- a/core/math/parser/parser.factor
+++ b/core/math/parser/parser.factor
@@ -311,11 +311,21 @@ PRIVATE>
 
 <PRIVATE
 
-CONSTANT: TENS
-"0000000000111111111122222222223333333333444444444455555555556666666666777777777788888888889999999999"
+CONSTANT: TENS B{
+    48 48 48 48 48 48 48 48 48 48 49 49 49 49 49 49 49 49 49 49
+    50 50 50 50 50 50 50 50 50 50 51 51 51 51 51 51 51 51 51 51
+    52 52 52 52 52 52 52 52 52 52 53 53 53 53 53 53 53 53 53 53
+    54 54 54 54 54 54 54 54 54 54 55 55 55 55 55 55 55 55 55 55
+    56 56 56 56 56 56 56 56 56 56 57 57 57 57 57 57 57 57 57 57
+}
 
-CONSTANT: ONES
-"0123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789"
+CONSTANT: ONES B{
+    48 49 50 51 52 53 54 55 56 57 48 49 50 51 52 53 54 55 56 57
+    48 49 50 51 52 53 54 55 56 57 48 49 50 51 52 53 54 55 56 57
+    48 49 50 51 52 53 54 55 56 57 48 49 50 51 52 53 54 55 56 57
+    48 49 50 51 52 53 54 55 56 57 48 49 50 51 52 53 54 55 56 57
+    48 49 50 51 52 53 54 55 56 57 48 49 50 51 52 53 54 55 56 57
+}
 
 : (two-digit) ( num accum -- num' accum )
     [