create type my_record_type as (
         oid oid,
         relname name,
         attname name,
         attype  text
);
create type my_small_record as (
         oid oid,
         relname name
);
create or replace function silly_question () returns setof 
my_record_type as $$
declare _r my_small_record;
         _r2 my_record_type;
begin
         for _r in select oid, relname from pg_class  where relkind = 
'r' loop
                 for _r2 in select _r.*, attname, format_type(atttypid, 
atttypmod) as attype from pg_attribute where attrelid = _r.oid and not 
attisdropped and attnum >  0  loop
                 return next _r2;
                 end loop;
         end loop;
         return;
end
$$ language 'plpgsql';