require_relative "../helper"

class Padded
  include Padding
end

class TestPadding < MiniTest::Test

  def setup
    @pad = Padded.new
  end
  def test_small
    [6,20,23,24].each do |p|
      assert_equal 32 , @pad.padded(p) , "Expecting 32 for #{p}"
    end
  end
  def test_large
    [26,40,53,56].each do |p|
      assert_equal 64 , @pad.padded(p) , "Expecting 64 for #{p}"
    end
  end
end

class TestPositioning < MiniTest::Test
  def test_list1
    list = Virtual.new_list([1])
    assert_equal 32 , list.mem_length
  end
  def test_list5
    list = Virtual.new_list([1,2,3,4,5])
    assert_equal 32 , list.mem_length
  end
  def test_layout
    layout = Parfait::Layout.new Object
    layout.push 5
    assert_equal 32 , layout.mem_length
  end
end