callproc.c-396-  close (2);
callproc.c-397-
callproc.c-398-  dup2 (in, 0);
callproc.c-399-  dup2 (out, 1);
callproc.c-400-  dup2 (err, 2);
callproc.c:401:#ifdef atarist
callproc.c-402-  dup2 (in, -1);		/* Controlling terminal (erlingh)++ */
callproc.c-403-#endif
callproc.c-404-  close (in);
callproc.c-405-  close (out);
callproc.c-406-  close (err);
----------
callproc.c-435-  extern char **environ;
callproc.c-436-  register char **envp;
callproc.c-437-  Lisp_Object execdir;
callproc.c-438-
callproc.c-439-  /* Turn PATH_EXEC into a path.  Don't look at environment.  */
callproc.c:440:#ifndef atarist
callproc.c-441-  Vexec_path = decode_env_path (0, PATH_EXEC);
callproc.c-442-#else
callproc.c-443-  Vexec_path = decode_env_path ("EMACS_EXECPATH", PATH_EXEC);
callproc.c-444-#endif
callproc.c-445-  Vexec_directory = Ffile_name_as_directory (Fcar (Vexec_path));
----------
config.h-28-
config.h-29-/* Include here a s- file that describes the system type you are using.
config.h-30-   See the file ../etc/MACHINES for a list of systems and
config.h-31-   the names of the s- files to use for them.
config.h-32-   See s-template.h for documentation on writing s- files.  */
config.h:33:#include "s-atari.h"
config.h-34-
config.h-35-/* Include here a m- file that describes the machine and system you use.
config.h-36-   See the file ../etc/MACHINES for a list of machines and
config.h-37-   the names of the m- files to use for them.
config.h-38-   See m-template.h for info on what m- files should define.
config.h-39-   */
config.h-40-
config.h:41:#include "m-atari.h"
config.h-42-
config.h-43-/* Load in the conversion definitions if this system
config.h-44-   needs them and the source file being compiled has not
config.h-45-   said to inhibit this.  There should be no need for you
config.h-46-   to alter these lines.  */
----------
dispnew.c-1573-
dispnew.c-1574-  Vwindow_system = Qnil;
dispnew.c-1575-/** 
dispnew.c-1576- ** (sjk)++ We do have an alternate key...
dispnew.c-1577- **/
dispnew.c:1578:#if !defined(atarist)
dispnew.c-1579-  meta_key = 0;
dispnew.c-1580-#else 
dispnew.c-1581-  meta_key = 1;
dispnew.c-1582-#endif
dispnew.c-1583-
----------
emacs.c-76-#ifndef APOLLO_SR10
emacs.c-77-#include <default_acl.h>
emacs.c-78-#endif
emacs.c-79-#endif
emacs.c-80-
emacs.c:81:#ifdef atarist
emacs.c-82-#ifdef SIGIO
emacs.c-83-#undef SIGIO
emacs.c-84-#endif				/* SIGIO */
emacs.c:85:#endif				/* atarist */
emacs.c-86-
emacs.c-87-#ifndef O_RDWR
emacs.c-88-#define O_RDWR 2
emacs.c-89-#endif
emacs.c-90-
----------
fileio.c-89-
fileio.c-90-#ifndef O_WRONLY
fileio.c-91-#define O_WRONLY 1
fileio.c-92-#endif
fileio.c-93-
fileio.c:94:#ifdef atarist
fileio.c-95-#include <limits.h>
fileio.c-96-#endif
fileio.c-97-
fileio.c-98-#define min(a, b) ((a) < (b) ? (a) : (b))
fileio.c-99-#define max(a, b) ((a) > (b) ? (a) : (b))
----------
fileio.c-451-  "Generate temporary name (string) starting with PREFIX (a string).")
fileio.c-452-  (prefix)
fileio.c-453-     Lisp_Object prefix;
fileio.c-454-{
fileio.c-455-  Lisp_Object val;
fileio.c:456:#ifdef atarist
fileio.c-457-  char path[_POSIX_PATH_MAX];
fileio.c-458-  strcpy(path,XSTRING(prefix)->data);
fileio.c-459-  strcat(path,"XXXXXX");
fileio.c-460-  mktemp(path);
fileio.c-461-  val=build_string(path);
----------
fileio.c-1874-    }
fileio.c-1875-
fileio.c-1876-#ifndef USG
fileio.c-1877-#ifndef VMS
fileio.c-1878-#ifndef BSD4_1
fileio.c:1879:#ifndef atarist
fileio.c-1880-  /* Note fsync appears to change the modtime on BSD4.2 (both vax and sun).
fileio.c-1881-     Disk full in NFS may be reported here.  */
fileio.c-1882-  if (fsync (desc) < 0)
fileio.c-1883-    failure = 1, save_errno = errno;
fileio.c-1884-#endif
----------
fileio.c-2004-  if (stat (XSTRING (b->filename)->data, &st) < 0)
fileio.c-2005-    {
fileio.c-2006-      /* If the file doesn't exist now and didn't exist before,
fileio.c-2007-	 we say that it isn't modified, provided the error is a tame
fileio.c-2008-	 one.  */
fileio.c:2009:#ifndef atarist
fileio.c-2010-      if (errno == ENOENT || errno == EACCES || errno == ENOTDIR)
fileio.c-2011-#else
fileio.c-2012-      if (errno == ENOENT || errno == EACCES )
fileio.c-2013-#endif
fileio.c-2014-	st.st_mtime = -1;
----------
m-atari.h-97-
m-atari.h-98-/* #define C_ALLOCA */
m-atari.h-99-#define HAVE_ALLOCA
m-atari.h-100-#define alloca __builtin_alloca
m-atari.h-101-
m-atari.h:102:/* AtariTT has 32-bits memory, and 26 of them are often used... */
m-atari.h-103-
m-atari.h-104-#define VALBITS 26
m-atari.h-105-#define GCTYPEBITS 5
m-atari.h-106-
m-atari.h-107-/* Define NO_REMAP if memory segmentation makes it not work well
----------
process.c-137-/* Define the structure that the wait system call stores.
process.c-138-   On many systems, there is a structure defined for this.
process.c-139-   But on vanilla-ish USG systems there is not.  */
process.c-140-
process.c-141-#ifndef WAITTYPE
process.c:142:#if !defined (BSD) && !defined (UNIPLUS) && !defined (STRIDE) && !(defined (HPUX) && !defined (NOMULTIPLEJOBS)) && !defined (HAVE_WAIT_HEADER) && !defined(atarist)
process.c-143-#define WAITTYPE int
process.c-144-#define WIFSTOPPED(w) ((w&0377) == 0177)
process.c-145-#define WIFSIGNALED(w) ((w&0377) != 0177 && (w&~0377) == 0)
process.c-146-#define WIFEXITED(w) ((w&0377) == 0)
process.c-147-#define WRETCODE(w) (w >> 8)
----------
process.c-399-   The file name of the terminal corresponding to the pty
process.c-400-   is left in the variable pty_name.  */
process.c-401-
process.c-402-char pty_name[24];
process.c-403-
process.c:404:#ifdef atarist			/* Create and allocate pty (erlingh)++ */
process.c-405-#include <osbind.h>
process.c-406-int
process.c-407-allocate_pty()
process.c-408-{
process.c-409-  register c;
----------
process.c-520-	    return fd;
process.c-521-	  }
process.c-522-      }
process.c-523-  return -1;
process.c-524-}
process.c:525:#endif				/* atarist */
process.c-526-#endif /* HAVE_PTYS */
process.c-527-
process.c-528-Lisp_Object
process.c-529-make_process (name)
process.c-530-     Lisp_Object name;
----------
process.c-1895-#ifdef O_NONBLOCK
process.c-1896-	      else if (nread == -1 && errno == EAGAIN)
process.c-1897-		;
process.c-1898-#else
process.c-1899-#ifdef O_NDELAY
process.c:1900:#ifndef atarist
process.c-1901-	      else if (nread == -1 && errno == EAGAIN)
process.c-1902-		;
process.c-1903-#else
process.c-1904-	      else if (nread == -1)
process.c-1905-		;
process.c:1906:#endif				/* atarist */
process.c-1907-	      /* Note that we cannot distinguish between no input
process.c-1908-		 available now and a closed pipe.
process.c-1909-		 With luck, a closed pipe will be accompanied by
process.c-1910-		 subprocess termination and SIGCHLD.  */
process.c-1911-	      else if (nread == 0 && !NETCONN_P (proc))
----------
process.c-1919-		 errno = EIO instead of getting an EOF (0 bytes read).
process.c-1920-		 Therefore, if we get an error reading and errno =
process.c-1921-		 EIO, just continue, because the child process has
process.c-1922-		 exited and should clean itself up soon (e.g. when we
process.c-1923-		 get a SIGCHLD). */
process.c:1924:#ifndef atarist	      
process.c-1925-	      else if (nread == -1 && errno == EIO && !NETCONN_P (proc))
process.c-1926-#else
process.c-1927-	      else if (nread == -1 && !NETCONN_P (proc))
process.c-1928-#endif
process.c-1929-		;
----------
process.c-2309-    {
process.c-2310-      gid = - XFASTINT (p->pid);
process.c-2311-      kill (gid, signo);
process.c-2312-    }
process.c-2313-#else /* no TIOCSIGSEND */
process.c:2314:#if defined(BSD) || defined(atarist) /* (erlingh)++ */
process.c-2315-  /* On bsd, [man says] kill does not accept a negative number to kill a pgrp.
process.c-2316-     Must do that differently.  */
process.c-2317-  killpg (-gid, signo);
process.c-2318-#else /* Not BSD.  */
process.c-2319-  kill (gid, signo);
----------
sysdep.c-18-the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
sysdep.c-19-
sysdep.c-20-/**
sysdep.c-21- **  (sjk)++ include basepage stuff for dumping.
sysdep.c-22- **/
sysdep.c:23:#if defined(atarist)
sysdep.c-24-#include <basepage.h>
sysdep.c-25-#include <ioctl.h>
sysdep.c-26-/* extern long _initial_stack=1024*1024l; */
sysdep.c-27-#ifdef ANYP
sysdep.c-28-#undef ANYP
sysdep.c-29-#define ANYP 0
sysdep.c-30-#endif				/* ANYP */
sysdep.c:31:#endif				/* atarist */
sysdep.c-32-
sysdep.c-33-/* This must precede sys/signal.h on certain machines.  */
sysdep.c-34-#include <sys/types.h>
sysdep.c-35-#include <signal.h>
sysdep.c-36-#include <setjmp.h>
sysdep.c-37-
sysdep.c-38-#include "config.h"
sysdep.c-39-#include "lisp.h"
sysdep.c:40:#ifdef atarist
sysdep.c-41-#include<mintbind.h>
sysdep.c-42-#endif
sysdep.c-43-#undef NULL
sysdep.c-44-
sysdep.c-45-#define min(x,y) ((x) > (y) ? (y) : (x))
----------
sysdep.c-725-      return status;
sysdep.c-726-    }
sysdep.c-727-  return -1;
sysdep.c-728-#else
sysdep.c-729-#ifdef SIGTSTP
sysdep.c:730:#if defined(BSD) || defined(atarist) /* (erlingh)++ */
sysdep.c-731-  killpg (getpgrp (0), SIGTSTP);
sysdep.c-732-#else
sysdep.c-733-  kill (-getpgrp (0), SIGTSTP);
sysdep.c-734-#endif
sysdep.c-735-
----------
sysdep.c-827-}
sysdep.c-828-
sysdep.c-829-/**
sysdep.c-830- **  (sjk)++ a SIGIO will cause a system croak().
sysdep.c-831- **/
sysdep.c:832:#if !defined(atarist)
sysdep.c-833-
sysdep.c-834-#ifdef F_SETFL
sysdep.c-835-
sysdep.c-836-int old_fcntl_flags;
sysdep.c-837-
----------
sysdep.c-900-}
sysdep.c-901- 
sysdep.c-902-#endif /* STRIDE */
sysdep.c-903-#endif /* FASYNC */
sysdep.c-904-#endif /* F_SETFL */
sysdep.c:905:#endif /* !atarist */
sysdep.c-906-
sysdep.c-907-/**
sysdep.c-908- **  (sjk)++ see previous ST comment.
sysdep.c-909- **/
sysdep.c:910:#ifdef atarist
sysdep.c-911-
sysdep.c-912-void syms_of_system () 
sysdep.c-913-{
sysdep.c-914-}
sysdep.c-915-
----------
sysdep.c-926-croak (badfunc)
sysdep.c-927-     char *badfunc;
sysdep.c-928-{
sysdep.c-929-  printf ("%s not yet implemented\r\n", badfunc);
sysdep.c-930-}
sysdep.c:931:#endif  /*  atarist  */
sysdep.c-932-
sysdep.c-933-
sysdep.c-934-TERMINAL old_gtty;		/* The initial tty mode bits */
sysdep.c-935-
sysdep.c-936-int term_initted;		/* 1 if outer tty status has been recorded */
----------
sysdep.c-1175-
sysdep.c-1176-#ifdef BSD4_1
sysdep.c-1177-#define LNOFLSH 0100000
sysdep.c-1178-#endif
sysdep.c-1179-
sysdep.c:1180:#ifdef atarist
sysdep.c-1181-#ifndef LDECCTQ
sysdep.c-1182-#define LDECCTQ 0
sysdep.c-1183-#endif
sysdep.c-1184-#ifndef LNOFLSH
sysdep.c-1185-#define LNOFLSH 0
sysdep.c-1186-#endif
sysdep.c:1187:#endif /* atarist */
sysdep.c-1188-
sysdep.c-1189-      lmode = LDECCTQ | LLITOUT | LPASS8 | LNOFLSH | old_lmode;
sysdep.c-1190-
sysdep.c-1191-      ioctl (0, TIOCSETC, &tchars);
sysdep.c-1192-      ioctl (0, TIOCLSET, &lmode);
----------
sysdep.c-1704-start_of_data ()
sysdep.c-1705-{
sysdep.c-1706-/**
sysdep.c-1707- **  (sjk)++ look up in the basepage 
sysdep.c-1708- **/
sysdep.c:1709:#if defined(atarist)
sysdep.c-1710-  return ((char *) _base->p_dbase);
sysdep.c-1711-#else 
sysdep.c-1712-
sysdep.c-1713-#ifdef DATA_START
sysdep.c-1714-  return ((char *) DATA_START);
sysdep.c-1715-#else
sysdep.c-1716-  extern int data_start;
sysdep.c-1717-  return ((char *) &data_start);
sysdep.c-1718-#endif
sysdep.c:1719:#endif /* atarist */
sysdep.c-1720-}
sysdep.c-1721-#endif /* NEED_STARTS (not CANNOT_DUMP or not SYSTEM_MALLOC) */
sysdep.c-1722-
sysdep.c-1723-#ifndef CANNOT_DUMP
sysdep.c-1724-/* Some systems that cannot dump also cannot implement these.  */
----------
sysdep.c-2242-#endif /* not BSTRING */
sysdep.c-2243-
sysdep.c-2244-/**
sysdep.c-2245- **  (sjk)++ redefine this to make our life easy.
sysdep.c-2246- **/
sysdep.c:2247:#ifdef atarist
sysdep.c-2248-setpriority (int something, int pid, int priority)
sysdep.c-2249-{
sysdep.c-2250-  int current,delta;
sysdep.c-2251-  current=Prenice(pid,0);
sysdep.c-2252-  delta=priority-current;
----------
sysdep.c-2261-srandom (arg)
sysdep.c-2262-     int arg;
sysdep.c-2263-{
sysdep.c-2264-  srand (arg);
sysdep.c-2265-}
sysdep.c:2266:#endif /* atarist */
sysdep.c-2267-
sysdep.c-2268-#ifdef BSD4_1
sysdep.c-2269-long random ()
sysdep.c-2270-{
sysdep.c-2271-  return (rand ());
----------
unexec.c-165-#ifndef CANNOT_DUMP  /* all rest of file!  */
unexec.c-166-
unexec.c-167-#ifndef CANNOT_UNEXEC /* most of rest of file */
unexec.c-168-
unexec.c-169-/**
unexec.c:170: **  (sjk)++ atari st specific dump info
unexec.c-171- **/
unexec.c:172:#ifdef atarist
unexec.c-173-#include <basepage.h>
unexec.c-174-#include <st-out.h>
unexec.c-175-#include <osbind.h>
unexec.c-176-#define exec	aexec
unexec.c-177-#define a_trsize	a_AZero1
----------
unexec.c-184-#include <a.out.h>
unexec.c-185-/* Define getpagesize () if the system does not.
unexec.c-186-   Note that this may depend on symbols defined in a.out.h
unexec.c-187- */
unexec.c-188-#include "getpagesize.h"
unexec.c:189:#endif /* atarist */
unexec.c-190-
unexec.c-191-#ifndef makedev			/* Try to detect types.h already loaded */
unexec.c-192-#include <sys/types.h>
unexec.c-193-#endif
unexec.c-194-#include <stdio.h>
----------
unexec.c-301-#endif /* emacs */
unexec.c-302-
unexec.c-303-/**
unexec.c-304- **  (sjk)++ simple proto's
unexec.c-305- **/
unexec.c:306:#ifdef atarist
unexec.c-307-static int copy_text_and_data ();
unexec.c-308-static int copy_sym ();
unexec.c-309-static int make_hdr ();
unexec.c-310-
unexec.c-311-
----------
unexec.c-335-		cp = cp->next;
unexec.c-336-	}
unexec.c-337-	if(i % 3) fprintf(stderr,"\n");
unexec.c-338-}
unexec.c-339-#endif /* TRACE_MEM */
unexec.c:340:#endif /* atarist */
unexec.c-341-
unexec.c-342-
unexec.c-343-#define ERROR0(msg) report_error_1 (new, msg, 0, 0); return -1
unexec.c-344-#define ERROR1(msg,x) report_error_1 (new, msg, x, 0); return -1
unexec.c-345-#define ERROR2(msg,x,y) report_error_1 (new, msg, x, y); return -1
----------
unexec.c-701-#endif /* ADJUST_EXEC_HEADER */
unexec.c-702-
unexec.c-703-/**
unexec.c-704- **  (sjk)++ Absolutely crucial magic number!
unexec.c-705- **/
unexec.c:706:#if defined(atarist)
unexec.c-707-  hdr.a_magic = 0x4544;
unexec.c-708-  hdr.a_trsize = (unsigned long)_base;
unexec.c-709-#else
unexec.c-710-  hdr.a_trsize = 0;
unexec.c-711-#endif
unexec.c-712-  hdr.a_drsize = 0;
unexec.c-713-  if (entry_address != 0)
unexec.c-714-/**
unexec.c-715- **  (sjk)++ debugging code.
unexec.c-716- **/
unexec.c:717:#ifdef atarist
unexec.c-718-    { ERROR1 ("can't specify new entry address on %s yet", SYSTEM_TYPE); }
unexec.c-719-#else
unexec.c-720-    hdr.a_entry = entry_address;
unexec.c-721-#endif
unexec.c-722-
