view src/s/sunos4-1.h @ 1919:51be204d02a0

* fns.c (Fequal): Call internal_equal to recurse on elements of lists and vectors, not Fequal.

#include "sunos4-0.h"

/* 4.1.1 makes these system calls interruptable.  */

#define read sys_read
#define write sys_write
#define open sys_open
#define close sys_close

#define INTERRUPTIBLE_OPEN
#define INTERRUPTIBLE_CLOSE
#define INTERRUPTIBLE_IO