1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
# frozen_string_literal: true
require 'test/unit'
class TestWarning < Test::Unit::TestCase
def test_warn_called_only_when_category_enabled
# Assert that warn is called when the category is enabled
assert_separately([], "#{<<~"begin;"}\n#{<<~'end;'}")
begin;
Warning[:deprecated] = true
$warnings = []
def Warning.warn(msg, category:)
$warnings << [msg, category]
end
assert_equal(0, $warnings.length)
"" << 12
assert_equal(1, $warnings.length)
end;
assert_separately([], "#{<<~"begin;"}\n#{<<~'end;'}")
begin;
Warning[:deprecated] = false
$warnings = []
def Warning.warn(msg, category:)
$warnings << [msg, category]
end
assert_equal(0, $warnings.length)
"" << 12
assert_equal(0, $warnings.length, $warnings.join)
end;
end
end
|
