--- gforth/test/float.fs 2002/12/15 17:38:52 1.2 +++ gforth/test/float.fs 2006/01/15 19:50:26 1.3 @@ -42,4 +42,10 @@ decimal { -4503599627370495. d>f 0.5e f+ fround -4503599627370494. d>f f= -> true } { -4503599627370497. d>f fdup fround f= -> true } { -9007199254740991. d>f fdup fround f= -> true } -{ 1.49999e fround 1e f= -> true } \ No newline at end of file +{ 1.49999e fround 1e f= -> true } + +\ >float (very incomplete, just a regression test) +{ s" -" >float -> false } +{ s" +" >float -> false } +{ s" " >float 0e f= -> true true } +