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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
# frozen_string_literal: false
require 'test/unit'
require '-test-/string'
require_relative '../symbol/noninterned_name'
class Test_String_Fstring < Test::Unit::TestCase
include Test_Symbol::NonInterned
def assert_fstring(str)
fstr = Bug::String.fstring(str)
yield str
yield fstr
end
def test_rb_enc_interned_str_autoloaded_encoding
assert_separately([], <<~RUBY)
require '-test-/string'
assert_include(Encoding::CESU_8.inspect, 'autoload')
Bug::String.rb_enc_interned_str(Encoding::CESU_8)
RUBY
end
def test_rb_enc_interned_str_null_encoding
assert_equal Encoding::ASCII_8BIT, Bug::String.rb_enc_interned_str(nil).encoding
end
def test_rb_enc_str_new_autoloaded_encoding
assert_separately([], <<~RUBY)
require '-test-/string'
assert_include(Encoding::CESU_8.inspect, 'autoload')
Bug::String.rb_enc_str_new(Encoding::CESU_8)
RUBY
end
def test_rb_enc_str_new_null_encoding
assert_equal Encoding::ASCII_8BIT, Bug::String.rb_enc_str_new(nil).encoding
end
def test_instance_variable
str = __method__.to_s * 3
str.instance_variable_set(:@test, 42)
str.freeze
assert_fstring(str) {|s| assert_send([s, :instance_variable_defined?, :@test])}
end
def test_singleton_method
str = __method__.to_s * 3
def str.foo
end
str.freeze
assert_fstring(str) {|s| assert_send([s, :respond_to?, :foo])}
end
def test_singleton_class
str = noninterned_name
fstr = Bug::String.fstring(str)
assert_raise(TypeError) {fstr.singleton_class}
end
def test_fake_str
assert_equal([*"a".."z"].join(""), Bug::String.fstring_fake_str)
end
class S < String
end
def test_subclass
str = S.new(__method__.to_s * 3)
str.freeze
assert_fstring(str) {|s| assert_instance_of(S, s)}
end
end
|