decimals: fix stack effect for decimal>float.

factor · Apr 19, 2018 · 2a8e8ba · 2a8e8ba
1 parent 9b2eac2
commit 2a8e8ba
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/extra/decimals/decimals.factor b/extra/decimals/decimals.factor
@@ -23,7 +23,7 @@ SYNTAX: DECIMAL: parse-decimal suffix! ;
 
 : decimal>ratio ( decimal -- ratio ) >decimal< 10^ * ;
 
-: decimal>float ( decimal -- ratio ) decimal>ratio >float ;
+: decimal>float ( decimal -- float ) decimal>ratio >float ;
 
 : scale-mantissas ( D1 D2 -- m1 m2 exp )
     [ [ mantissa>> ] bi@ ]