Fix RUN-TIME-SYMBOL-READER under *READ-SUPPRESS*
Fix test of PATHNAME-THIS-DIRECTORY