Récupère une valeur du registre. Si la clé est absente, initialise et renvoie la valeur par défaut.

DECLARE
        p_key           alias for $1;
        p_default       alias for $2;
        v_value         int4;
BEGIN
        select reg_int4 into v_value from sl_registry
                        where reg_key = p_key;
        if not found then 
                v_value = p_default;
                if p_default notnull then
                        perform registry_set_int4(p_key, p_default);
                end if;
        else
                if v_value is null then
                        raise exception 'Slony-I: registry key % is not an int4 value',
                                        p_key;
                end if;
        end if;
        return v_value;
END;