def checkFrames(frames, level)

  if level <= 0
    frame = frames.shift
    assertEquals("Object", frame.class)
    assertEquals("stack_frames", frame.function)
    assertEquals(self, frame.object)
    assertEquals("stack_frames.test.rb", frame.file)
  end

  if level <= 1
    frame = frames.shift
    assertEquals("StackFramesTest", frame.class)
    assertEquals("test", frame.function)
    assertEquals(self, frame.object)
    assertEquals("stack_frames.test.rb", frame.file)
  end

  if level <= 2
    frame = frames.shift
    assertEquals("Object", frame.class)
    assertEquals("each", frame.function)
    assertNotEquals(self, frame.object)
    assertEquals("stack_frames.test.rb", frame.file)
  end

  if level <= 3
    frame = frames.shift
    assertEquals("StackFramesTest", frame.class)
    assertEquals("test", frame.function)
    assertEquals(self, frame.object)
    assertEquals("./Test.rb", frame.file)
  end

  if level <= 4
    frame = frames.shift
    assertEquals("Object", frame.class)
    assertEquals("call", frame.function)
    assertNotEquals(self, frame.object)
    assertEquals("./Test.rb", frame.file)
  end

  if level <= 5
    frame = frames.shift
    assertEquals("Test", frame.class)
    assertEquals("run", frame.function)
    assertEquals(self, frame.object)
    assertEquals("./Test.rb", frame.file)
  end

  if level <= 6
    frame = frames.shift
    assertEquals("Object", frame.class)
    assertEquals("each", frame.function)
    assertNotEquals(self, frame.object)
    assertEquals("./Test.rb", frame.file)
  end

  if level <= 7
    frame = frames.shift
    assertEquals("Test", frame.class)
    assertEquals("run", frame.function)
    assertEquals(self, frame.object)
    assertEquals("stack_frames.test.rb", frame.file)
    assertEquals($topLine, frame.line)
  end

  assertEquals(frames.length, 0)

end