File clisp-2.31-personality.patch of Package clisp

--- src/_clisp.c
+++ src/_clisp.c	2003-12-11 22:22:29.000000000 -0800
@@ -45,6 +45,11 @@
 /* Declare stderr. */
 # include <stdio.h>
 
+#if defined(HAS_PERSONALITY) && (HAS_PERSONALITY > 0)
+/* Declare syscall, PER_LINUX32. */
+# include <sys/personality.h>
+#endif
+
 #if defined(WIN32_NATIVE)
 # undef UNICODE
 # include <windows.h>
@@ -347,6 +353,12 @@
       return 1;
     }
 #else
+#if defined(HAS_PERSONALITY) && (HAS_PERSONALITY > 0)
+    if (personality(PER_LINUX32)) {
+      perror(program_name);
+      return 1;
+    }
+#endif /* FEDORA */
     execv(executable,new_argv);
     { /* execv() returns only if there was an error. */
       int saved_errno = errno;
openSUSE Build Service is sponsored by