Last change
on this file since 270 was 270, checked in by coas-nagasima, 7 years ago |
mruby版ECNLプロトタイピング・ツールを追加
|
-
Property svn:eol-style
set to
native
-
Property svn:mime-type
set to
text/x-ruby
|
File size:
809 bytes
|
Rev | Line | |
---|
[270] | 1 | ##
|
---|
| 2 | # Numeric ISO Test
|
---|
| 3 |
|
---|
| 4 | assert('Numeric', '15.2.7') do
|
---|
| 5 | assert_equal Class, Numeric.class
|
---|
| 6 | end
|
---|
| 7 |
|
---|
| 8 | assert('Numeric#+@', '15.2.7.4.1') do
|
---|
| 9 | assert_equal(+1, +1)
|
---|
| 10 | end
|
---|
| 11 |
|
---|
| 12 | assert('Numeric#-@', '15.2.7.4.2') do
|
---|
| 13 | assert_equal(-1, -1)
|
---|
| 14 | end
|
---|
| 15 |
|
---|
| 16 | assert('Numeric#abs', '15.2.7.4.3') do
|
---|
| 17 | assert_equal(1, 1.abs)
|
---|
| 18 | assert_equal(1.0, -1.abs)
|
---|
| 19 | end
|
---|
| 20 |
|
---|
| 21 | assert('Numeric#pow') do
|
---|
| 22 | assert_equal(8, 2 ** 3)
|
---|
| 23 | assert_equal(-8, -2 ** 3)
|
---|
| 24 | assert_equal(1, 2 ** 0)
|
---|
| 25 | assert_equal(1, 2.2 ** 0)
|
---|
| 26 | assert_equal(0.5, 2 ** -1)
|
---|
| 27 | end
|
---|
| 28 |
|
---|
| 29 | assert('Numeric#/', '15.2.8.3.4') do
|
---|
| 30 | n = Class.new(Numeric){ def /(x); 15.1;end }.new
|
---|
| 31 |
|
---|
| 32 | assert_equal(2, 10/5)
|
---|
| 33 | assert_equal(0.0625, 1/16)
|
---|
| 34 | assert_equal(15.1, n/10)
|
---|
| 35 | assert_raise(TypeError){ 1/n }
|
---|
| 36 | assert_raise(TypeError){ 1/nil }
|
---|
| 37 | end
|
---|
| 38 |
|
---|
| 39 | # Not ISO specified
|
---|
| 40 |
|
---|
| 41 | assert('Numeric#**') do
|
---|
| 42 | assert_equal 8.0, 2.0**3
|
---|
| 43 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.