Index: /trunk/ccl/lisp-kernel/pmcl-kernel.c
===================================================================
--- /trunk/ccl/lisp-kernel/pmcl-kernel.c	(revision 5633)
+++ /trunk/ccl/lisp-kernel/pmcl-kernel.c	(revision 5634)
@@ -1188,7 +1188,7 @@
 #ifdef DARWIN
 #ifdef PPC64
-#define min_os_version "8.0"
+#define min_os_version "8.0"    /* aka Tiger */
 #else
-#define min_os_version "6.0"
+#define min_os_version "7.0"    /* aka Panther */
 #endif
 #endif
@@ -1597,4 +1597,5 @@
 xGetSharedLibrary(char *path, int *resultType)
 {
+#if WORD_SIZE == 32
   NSObjectFileImageReturnCode code;
   NSObjectFileImage	         moduleImage;
@@ -1682,4 +1683,18 @@
     }
   return result;
+#else
+  const char *                   error;
+  void *                         result;
+
+  result = dlopen(path, RTLD_NOW | RTLD_GLOBAL);
+  
+  if (result == NULL) {
+    error = dlerror();
+    *resultType = 0;
+    return error;
+  }
+  *resultType = 1;
+  return result;
+#endif
 }
 #endif