(getcwd) => reports too many allocated blocks ?? NOTE that the following workaround does work, however: (getcwd (make-array 256 :element-type 'string-char :fill-pointer t :static t))