blob: 2022ba97d90987f46d2c3b425a8dc6f329232d96 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
$NetBSD: patch-ab,v 1.2 2001/02/24 15:45:52 jtb Exp $
--- include.h.orig Fri Jan 27 07:38:48 1995
+++ include.h
@@ -21,6 +21,7 @@
#include <stdio.h>
#include <math.h>
+#include <sys/param.h>
/* CPUTIME : print CPU time for UNIX 4.2 BSD
* if your system has times() function #define CPUTIME 60
@@ -28,7 +29,11 @@
* else #define CPUTIME 0
*/
+#if (defined(BSD) && BSD >= 199306)
+#define CPUTIME 60
+#else
#define SUN4 1
+#endif
#define KANJI 1 /* 1: allow EUC Kanji for str functions */
/* Tee print macro */
@@ -135,8 +140,13 @@
#define head_of_list(Term) (((struct clause *)Term)->c_form)
#define tail_of_list(Term) ((struct term *)((struct clause *)Term)->c_link)
+#if (defined(BSD) && BSD >= 199306)
+#define is_readable(FP) (FP->_flags & __SRD)
+#define is_writable(FP) (FP->_flags & __SWR)
+#else
#define is_readable(FP) (FP->_flag & _IOREAD)
#define is_writable(FP) (FP->_flag & _IOWRT)
+#endif
#define is_functor(Term) ((Term)->type.ident > CONST_LIST_TYPE)
#define isconst_functor(Term) ((Term)->t_arity <= 0)
|
