function tree_level(varchar) (from OpenACS) no longer work under 7.2

Hi all,


Testing a port from Oracle to PG 7.1.3. onto PG 7.2 has error trying to use the
following function (frop OpenACS, to port connect by Oracle statments under PG):

create function tree_level(varchar) returns integer as '
declare
        inkey     alias for $1;
        cnt       integer default 0;
begin
        for i in 1..length(inkey) LOOP
            if substr(inkey,i,1) = ''/'' then
               cnt := cnt + 1;
            end if;
        end LOOP;

        return cnt;

end;' language 'plpgsql';


example:

dbks=# select tree_level(t01_tree_sortkey) from t01_20011231 limit 10;
ERROR:  SearchSysCache: Bad cache id 27

I found the SearchSysCache() function in tools/cache in the PG srcs. Readding
the code, I tought about corruption problems on the database. I made a
vacuum --analyze dbks, hopping this would "repair" the DB.

But this still not works. So I'm a bit confused. What's wrong?

Thanks in advance and best regards.

--
Jean-Paul ARGUDO