diff --git a/src/c/main.d b/src/c/main.d
index 58ed18089..f6f3414b7 100644
--- a/src/c/main.d
+++ b/src/c/main.d
@@ -250,7 +250,13 @@ cl_boot(int argc, char **argv)
 	ECL_SET(@'*print-case*', @':upcase');
 
 	cl_core.pathname_translations = Cnil;
+#if 0
 	ECL_SET(@'*default-pathname-defaults*', si_getcwd());
+#else
+	ECL_SET(@'*default-pathname-defaults*',
+		make_pathname(Cnil, Cnil, Cnil, Cnil, Cnil, Cnil));
+#endif
+
 	@si::pathname-translations(2,make_simple_string("SYS"),
 				   cl_list(1,cl_list(2,make_simple_string("*.*"),
 						     make_simple_string("./*.*"))));