Skip to content
Snippets Groups Projects
Commit d023cd17 authored by dtc's avatar dtc
Browse files

The default-directory function is in the EXTENSIONS package.

parent 393f9ddb
No related branches found
No related tags found
No related merge requests found
...@@ -1050,7 +1050,7 @@ ...@@ -1050,7 +1050,7 @@
"./" "./"
#+:lucid (working-directory) #+:lucid (working-directory)
#+(or :allegro ACLPC) (current-directory) #+(or :allegro ACLPC) (current-directory)
#+:cmu (default-directory) #+:cmu (ext:default-directory)
#+:lispworks #+:lispworks
,(multiple-value-bind (major minor) (system::lispworks-version) ,(multiple-value-bind (major minor) (system::lispworks-version)
(if (or (> major 3) (if (or (> major 3)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment