OpenC: list components and their methods

local component = require("component")
local event = require("event")

local function findComps(type)
  local comps = {}
  local compNames = {}

  for cAddress,cType in component.list(type) do
    -- Insert proxy methods table into comps table
    table.insert(comps, component.proxy(cAddress))
	-- Insert component type into compNames table
	table.insert(compNames, cType)
  end
  return comps, compNames
end

local comps, compNames = findComps()
for i=1, #comps do  -- Iterate components
  print("\n"..compNames[i]..":")
  for k,v in pairs(comps[i]) do  -- Iterate methods
    print(k)  -- Print method name
  end
  print(" ")
  os.sleep(0.1)
  print("Press any key to continue")
  local _,_ = event.pull("key")
end