diff --git a/src/os/posix/system.c b/src/os/posix/system.c
index 474891c5..9bb991ce 100644
--- a/src/os/posix/system.c
+++ b/src/os/posix/system.c
@@ -131,12 +131,17 @@ SgObject Sg_GetLastErrorMessage()
 
 SgObject Sg_GetDefaultLoadPath()
 {
-  SgObject env = Sg_Getenv(UC("SAGITTARIUS_LOADPATH"));
+  SgObject env = Sg_Getenv(UC("R7RS_LIBRARY_PATH"));
   SgObject h = SG_NIL, t = SG_NIL;
   if (!SG_FALSEP(env) && SG_STRING_SIZE(env) != 0) {
     SG_APPEND(h, t, Sg_StringSplitChar(SG_STRING(env), ':'));
   }
 
+  env = Sg_Getenv(UC("SAGITTARIUS_LOADPATH"));
+  if (!SG_FALSEP(env) && SG_STRING_SIZE(env) != 0) {
+    SG_APPEND(h, t, Sg_StringSplitChar(SG_STRING(env), ':'));
+  }
+
   SG_APPEND1(h, t, Sg_SitelibPath());
   SG_APPEND1(h, t, SG_MAKE_STRING(SAGITTARIUS_SHARE_SITE_LIB_PATH));
   SG_APPEND1(h, t, SG_MAKE_STRING(SAGITTARIUS_SHARE_LIB_PATH));