I always use
?- absolute_file_name(pack('.'), Dir).
Dir = '/home/janw/.local/share/swi-prolog/pack'.
Note that if you use absolute_file_name/3, we can use this to enumerate all possible locations for the packs:
?- absolute_file_name(pack('.'), Dir, [file_type(directory), access(write), solutions(all)]).