Pop.Box/util.moon

--- Utility functions, intended for internal use only.
--- @module util
--- @copyright Paul Liverman III (2015-2016)
--- @license The MIT License (MIT)

--- @function inheritsFromElement
--- @tparam table object MoonScript object to be checked for inheritence from
--- the "element" element.
--- @treturn boolean Is the table an object inherting from "element"?
--- @raise Can error if the table has a similar structure to a MoonScript object
--- without being the same structure.
--- @see Element

inheritsFromElement = (object) ->
  if object and type(object) == "table" and object.__class
    cls = object.__class

    if cls.__name == "element"
      return true

    while cls.__parent
      cls = cls.__parent
      if cls.__name == "element"
        return true

  return false

return {
  :inheritsFromElement
}