source: EcnlProtoTool/trunk/mruby-1.2.0/mrbgems/mruby-kernel-ext/test/kernel.rb@ 270

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: 1.4 KB
Line 
1assert('Kernel.fail, Kernel#fail') do
2 assert_raise(RuntimeError) { fail }
3 assert_raise(RuntimeError) { Kernel.fail }
4end
5
6assert('Kernel#__method__') do
7 assert_equal(:m, Class.new {def m; __method__; end}.new.m)
8 assert_equal(:m, Class.new {define_method(:m) {__method__}}.new.m)
9 c = Class.new do
10 [:m1, :m2].each do |m|
11 define_method(m) do
12 __method__
13 end
14 end
15 end
16 assert_equal(:m1, c.new.m1)
17 assert_equal(:m2, c.new.m2)
18end
19
20assert('Kernel#Integer') do
21 assert_equal(123, Integer(123.999))
22 assert_equal(26, Integer("0x1a"))
23 assert_equal(930, Integer("0930", 10))
24 assert_equal(7, Integer("111", 2))
25 assert_raise(TypeError) { Integer(nil) }
26end
27
28assert('Kernel#Float') do
29 assert_equal(1.0, Float(1))
30 assert_equal(123.456, Float(123.456))
31 assert_equal(123.456, Float("123.456"))
32 assert_raise(TypeError) { Float(nil) }
33end
34
35assert('Kernel#String') do
36 assert_equal("main", String(self))
37 assert_equal("Object", String(self.class))
38 assert_equal("123456", String(123456))
39end
40
41assert('Kernel#Array') do
42 assert_equal([1], Kernel.Array(1))
43 assert_equal([1, 2, 3, 4, 5], Kernel.Array([1, 2, 3, 4, 5]))
44 assert_equal([1, 2, 3, 4, 5], Kernel.Array(1..5))
45 assert_equal([[:a, 1], [:b, 2], [:c, 3]], Kernel.Array({a:1, b:2, c:3}))
46end
47
48assert('Kernel#Hash') do
49 assert_equal({}, Hash([]))
50 assert_equal({}, Hash(nil))
51 assert_equal({:key => :value}, Hash(key: :value))
52 assert_raise(TypeError) { Hash([1, 2, 3]) }
53end
Note: See TracBrowser for help on using the repository browser.