Context Navigation

Ticket #626: swipl-6.0.2.patch

File swipl-6.0.2.patch, 2.0 KB (added by munchausen, 3 years ago)

diff -Naur pl-6.0.2/src/configure.in pl-6.0.2-haiku/src/configure.in

-                      old
+                      new
         AC_DEFINE(_THREAD_SAFE, 1,
                   [Required in FreeBSD for compiling thread-safe code])
         ;;
+    *haiku*)
+        pthread_ok=true
+        CFLAGS="$CFLAGS -lroot"
+        ;;
     *-win32|*-win64)
         pthread_ok=true
         AC_CHECK_LIB(pthreadGC2, pthread_create)

diff -Naur pl-6.0.2/src/os/pl-files.c pl-6.0.2-haiku/src/os/pl-files.c

-                      old
+                      new
       return TRUE;
+  }
 #ifdef __unix__                         /* doesn't work on most not Unix's */
+#if defined(__unix__) || defined(__HAIKU__) /* doesn't work on most not Unix's */
   { statstruct buf1;
     statstruct buf2;
     char tmp[MAXPATHLEN];

diff -Naur pl-6.0.2/src/os/pl-os.c pl-6.0.2-haiku/src/os/pl-os.c

-                      old
+                      new
+  }
 retry:
 #ifdef __unix__
+#if defined(__unix__) || defined(__HAIKU__)
 { static int MTOK_temp_counter = 0;
   const char *sep = id[0] ? "_" : "";
 …
+}
 #endif /* O_HPFS */
 #ifdef __unix__
+#if defined(__unix__) || defined(__HAIKU__)
 char *
 PrologPath(const char *p, char *buf, size_t len)
 { strncpy(buf, p, len);
 …
   return strcpy(buffer, file ? file : buf);
+}
 #ifdef __unix__
+#if defined(__unix__) || defined(__HAIKU__)
 static char *
 okToExec(const char *s)
 { statstruct stbuff;

diff -Naur pl-6.0.2/src/pl-term.c pl-6.0.2-haiku/src/pl-term.c

-                      old
+                      new
   term_t r = A1;
   term_t c = A2;
 #ifdef __unix__
+#if defined(__unix__) || defined(__HAIKU__)
   int iorval;
 #ifdef TIOCGSIZE