Postgresqlで現在のシーケンスの一覧を調べる

うまいやり方を知りたい...

create or replace function func_dump_seq()
returns integer
AS '
DECLARE 
	rec RECORD;
	stmt VARCHAR(200);
	last_value INT;
BEGIN
	FOR rec IN SELECT sequence_name FROM information_schema.sequences ORDER BY sequence_name LOOP
		EXECUTE ''SELECT last_value FROM '' || rec.sequence_name || '';'' INTO last_value;
		RAISE NOTICE ''%->%'', rec.sequence_name, last_value;
	END LOOP;
	RETURN 0;
END;
'
language 'plpgsql';