From 4268c65edf378d296f8c2a0bec1d3b3ee4059d5a Mon Sep 17 00:00:00 2001 From: slava Date: Wed, 29 Nov 2006 21:11:43 +0000 Subject: [PATCH] Add unit tests that fail on x86 --- TODO.txt | 1 + core/test/math/float.factor | 6 ++++++ 2 files changed, 7 insertions(+) diff --git a/TODO.txt b/TODO.txt index 6fa46b41d7..8750945396 100644 --- a/TODO.txt +++ b/TODO.txt @@ -31,6 +31,7 @@ - 10000 [ dup number>string ] map describe in the UI - available-modules - :trace + - string-lines - auto-update browser and help when sources reload - mac intel: struct returns from objc methods - new windows don't always have focus, eg focus follows mouse diff --git a/core/test/math/float.factor b/core/test/math/float.factor index fa3d8b5f5d..43ebd4eccc 100644 --- a/core/test/math/float.factor +++ b/core/test/math/float.factor @@ -19,6 +19,12 @@ USE: test [ t ] [ 134.3 >fixnum 134 = ] unit-test +[ 3 ] [ 3.5 >bignum ] unit-test +[ -3 ] [ -3.5 >bignum ] unit-test + +[ 3 ] [ 3.5 >fixnum ] unit-test +[ -3 ] [ -3.5 >fixnum ] unit-test + [ 2.1 ] [ -2.1 neg ] unit-test [ 1 ] [ 0.5 1/2 + ] unit-test