library/test/format.factor

   1 IN: scratchpad
   2 USE: format
   3 USE: test
   4
   5 [ "123" ] [ "123" 2 decimal-places ] unit-test
   6 [ "123.12" ] [ "123.12" 2 decimal-places ] unit-test
   7 [ "123.123" ] [ "123.123" 5 decimal-places ] unit-test
   8 [ "123" ] [ "123.123" 0 decimal-places ] unit-test
   9 [ "05" ] [ "5" 2 digits ] unit-test
  10 [ "666" ] [ "666" 2 digits ] unit-test