2015-12-16 00:07:31 -05:00
|
|
|
# frozen_string_literal: false
|
2013-03-26 10:55:04 -04:00
|
|
|
require_relative 'helper'
|
2010-03-28 17:49:37 -04:00
|
|
|
|
|
|
|
module Psych
|
|
|
|
class TestArray < TestCase
|
2012-01-17 20:44:21 -05:00
|
|
|
class X < Array
|
|
|
|
end
|
|
|
|
|
|
|
|
class Y < Array
|
|
|
|
attr_accessor :val
|
|
|
|
end
|
|
|
|
|
2010-03-28 17:49:37 -04:00
|
|
|
def setup
|
|
|
|
super
|
|
|
|
@list = [{ :a => 'b' }, 'foo']
|
|
|
|
end
|
|
|
|
|
2012-05-15 16:13:21 -04:00
|
|
|
def test_another_subclass_with_attributes
|
|
|
|
y = Y.new.tap {|y| y.val = 1}
|
|
|
|
y << "foo" << "bar"
|
|
|
|
y = Psych.load Psych.dump y
|
|
|
|
|
|
|
|
assert_equal %w{foo bar}, y
|
|
|
|
assert_equal Y, y.class
|
|
|
|
assert_equal 1, y.val
|
|
|
|
end
|
|
|
|
|
2012-01-17 20:44:21 -05:00
|
|
|
def test_subclass
|
|
|
|
yaml = Psych.dump X.new
|
|
|
|
assert_match X.name, yaml
|
|
|
|
|
|
|
|
list = X.new
|
|
|
|
list << 1
|
|
|
|
assert_equal X, list.class
|
|
|
|
assert_equal 1, list.first
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_subclass_with_attributes
|
|
|
|
y = Psych.load Psych.dump Y.new.tap {|y| y.val = 1}
|
|
|
|
assert_equal Y, y.class
|
|
|
|
assert_equal 1, y.val
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_backwards_with_syck
|
|
|
|
x = Psych.load "--- !seq:#{X.name} []\n\n"
|
|
|
|
assert_equal X, x.class
|
|
|
|
end
|
|
|
|
|
2010-03-28 17:49:37 -04:00
|
|
|
def test_self_referential
|
|
|
|
@list << @list
|
|
|
|
assert_cycle(@list)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_cycle
|
|
|
|
assert_cycle(@list)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|