(defun push-library-path (path)
"Adds the pathspec PATH \(which should denote a directory) to
the list *FOREIGN-LIBRARY-SEARCH-PATHS*."
- (push path *foreign-library-search-paths*))
\ No newline at end of file
+ (pushnew path *foreign-library-search-paths* :test #'equal))