Remove RISCOS platform support. (#39)

src/dir.c

@@ -33,11 +33,6 @@ static char *id = "$Id: dir.c,v 1.4 2001/12/26 22:17:01 sybalsky Exp $ Copyright
 #include <string.h>
 #endif /* LINUX */
 
-#ifdef RISCOS
-#include <dirent.h>
-#define direct dirent
-#endif /* RISCOS */
-
 #ifdef ISC
 #include <dirent.h>
 #include <unistd.h>

src/dsk.c

@@ -55,13 +55,6 @@ static char *id = "$Id: dsk.c,v 1.4 2001/12/24 01:09:01 sybalsky Exp $ Copyright
 #define alarm(x) 0
 #endif /* DOS */
 
-#ifdef RISCOS
-#include <dirent.h>
-#include <unistd.h>
-#define direct dirent
-#define d_namlen d_reclen
-#endif /* RISCOS */
-
 #ifdef OS5
 #define index strchr
 #define rindex strrchr

src/ldsout.c

@@ -58,10 +58,10 @@ extern int errno;
   is going to expand or not */
 int Storage_expanded; /*  T or NIL */
 
-/* RISCOS doesn't have valloc, and malloc works OK there. */
-#if defined(SYSVONLY) || defined(RISCOS)
+/* This used to be ifdef for RISCOS and OSF/1. */
+#if defined(SYSVONLY)
 #define valloc malloc
-#endif /* SYSVONLY || RISCOS */
+#endif /* SYSVONLY */
 
 /************************************************************************/
 /*									*/

src/main.c

@@ -63,10 +63,6 @@ static char *id = "$Id: main.c,v 1.4 2001/12/26 22:17:03 sybalsky Exp $ Copyrigh
 #include <pwd.h>
 #endif /* DOS */
 
-#ifdef RISCOS
-#include <unistd.h>
-#endif /* RISCOS */
-
 #ifdef ISC
 #include <unistd.h>
 #include <sys/dirent.h>

src/mkvdate.c

@@ -33,15 +33,13 @@ static char *id = "$Id: mkvdate.c,v 1.5 2001/12/26 22:17:03 sybalsky Exp $ Copyr
 #endif
 
 #include <stdio.h>
-#ifdef USETIMEFN
-#include <time.h>
-#elif DOS
+#ifdef DOS
 #include <time.h>
 #else
 #include <sys/time.h>
-#endif /* USETIMEFN */
+#endif /* DOS */
 
-#ifdef USETIMEFN
+#ifdef DOS
 /* RISCOS doesn't have the BSD time functions */
 int main(void) {
   long dtime;

src/unixcomm.c

@@ -936,16 +936,13 @@ LispPTR Unix_handlecomm(LispPTR *args) {
     case 10: /* Change window */
     {
       int rows, cols, pgrp, pty;
-#if !defined(RISCOS)
       struct winsize w;
-#endif /* !RISCOS */
 
       /* Get job #, rows, columns */
       N_GETNUMBER(args[1], slot, bad);
       N_GETNUMBER(args[2], rows, bad);
       N_GETNUMBER(args[3], cols, bad);
 
-#if !defined(RISCOS)
       if (valid_slot(slot) && (UJ[slot].type == UJSHELL) && (UJ[slot].status == -1)) {
         w.ws_row = rows;
         w.ws_col = cols;
@@ -965,12 +962,11 @@ LispPTR Unix_handlecomm(LispPTR *args) {
             (kill(-pgrp, SIGWINCH) >= 0))
 #else
             (killpg(pgrp, SIGWINCH) >= 0))
-#endif /* RISCOS */
+#endif /* SYSVONLY */
 
           return (ATOM_T);
         return (GetSmallp(errno));
       }
-#endif /* !RISCOS */
 
       return (NIL);
     }

src/unixfork.c

@@ -59,11 +59,6 @@ static char *id = "$Id: unixfork.c,v 1.6 2001/12/26 22:17:05 sybalsky Exp $ Copy
 
 #include <sys/un.h>
 
-#ifdef RISCOS
-/* #include <sys/un.h> */
-#include <sgtty.h>
-#endif /* RISCOS */
-
 #include "unixfork.h"
 
 #ifdef DEBUG

src/uutils.c

@@ -239,8 +239,6 @@ LispPTR unix_getparm(LispPTR *args) {
     envvalue = "rs/6000";
 #elif defined(ISC)
     envvalue = "i386";
-#elif defined(RISCOS)
-    envvalue = "mips";
 #elif defined(DOS)
     envvalue = "386";
 #elif defined(MACOSX)
@@ -258,8 +256,6 @@ LispPTR unix_getparm(LispPTR *args) {
     envvalue = "rs/6000";
 #elif defined(ISC)
     envvalue = "i386";
-#elif defined(RISCOS)
-    envvalue = "mips";
 #elif defined(DOS)
     envvalue = "dos";
 #elif defined(MACOSX)