diff -c -r --ignore-space-change dgd-1.0.a7.1/src/comp/codegenc.c dgdamiga/src/comp/codegenc.c
*** dgd-1.0.a7.1/src/comp/codegenc.c    Sat May 21 23:58:54 1994
--- dgdamiga/src/comp/codegenc.c        Fri Jun 03 02:38:08 1994
***************
*** 55,61 ****
  static void kfun(n)
  int n;
  {
!     output("call_kfun(%d/*%s*/)", n, KFUN(n).name);
  }

  /*
--- 55,61 ----
  static void kfun(n)
  int n;
  {
!     output("call_kfun(%d/* %s */)", n, KFUN(n).name);
  }

  /*
***************
*** 66,72 ****
  int n;
  char *arg;
  {
!     output("call_kfun_arg(%d/*%s*/, %s)", n, KFUN(n).name, arg);
  }

  /*
--- 66,72 ----
  int n;
  char *arg;
  {
!     output("call_kfun_arg(%d/* %s */, %s)", n, KFUN(n).name, arg);
  }

  /*
***************
*** 1289,1295 ****
      case N_XOR_EQ:
        if (n->r.right->type == N_INT && n->r.right->l.number == -1) {
            cg_fetch(n->l.left);
!           kfun(KF_NEG, 0);
            store();
        } else {
            cg_asgnop(n, KF_XOR);
--- 1289,1295 ----
      case N_XOR_EQ:
          if (n->r.right->type == N_INT && n->r.right->l.number == -1) {
              cg_fetch(n->l.left);
!             kfun(KF_NEG);
              store();
          } else {
              cg_asgnop(n, KF_XOR);
diff -c -r --ignore-space-change dgd-1.0.a7.1/src/config.h dgdamiga/src/config.h
*** dgd-1.0.a7.1/src/config.h   Wed May 04 17:30:40 1994
--- dgdamiga/src/config.h       Fri Jun 03 01:06:08 1994
***************
*** 42,48 ****

  /* editor */
  # define NR_EDBUFS    3       /* # buffers in editor cache (>= 3) */
! /*# define TMPFILE_SIZE       2097152 /* max. editor tmpfile size */

  /* lexical scanner */
  # define MACTABSZ     256     /* macro hash table size */
--- 42,48 ----

  /* editor */
  # define NR_EDBUFS      3       /* # buffers in editor cache (>= 3) */
! /* # define TMPFILE_SIZE 2097152 */ /* max. editor tmpfile size */

  /* lexical scanner */
  # define MACTABSZ       256     /* macro hash table size */
diff -c -r --ignore-space-change dgd-1.0.a7.1/src/host.h dgdamiga/src/host.h
*** dgd-1.0.a7.1/src/host.h     Sun May 29 18:15:18 1994
--- dgdamiga/src/host.h Fri Jun 03 01:18:59 1994
***************
*** 18,27 ****
  # include <setjmp.h>
  # include <stdio.h>

! /* # define UCHAR(c)  ((char) (c))                    /* unsigned character */
  # define UCHAR(c)     ((int) ((c) & 0xff))            /* unsigned character */
  # define SCHAR(c)     ((char) (c))                    /* signed character */
! /* # define SCHAR(c)  ((((char) (c)) - 128) ^ -128)   /* signed character */

  typedef long Int;
  typedef unsigned long Uint;
--- 18,27 ----
  # include <setjmp.h>
  # include <stdio.h>

! /* # define UCHAR(c)    ((char) (c)) */                    /* unsigned character */
  # define UCHAR(c)       ((int) ((c) & 0xff))            /* unsigned character */
  # define SCHAR(c)       ((char) (c))                    /* signed character */
! /* # define SCHAR(c)    ((((char) (c)) - 128) ^ -128) */   /* signed character */

  typedef long Int;
  typedef unsigned long Uint;
***************
*** 123,129 ****
  # define GENERIC_SYSV
  # endif

-
  # ifdef GENERIC_BSD

  # include <limits.h>
--- 123,128 ----
***************
*** 197,202 ****
--- 196,250 ----
  # endif /* GENERIC_SYSV */


+ # ifdef AMIGA
+
+ # include <sys/types.h>
+
+ # ifdef INCLUDE_FILE_IO
+ # include <fcntl.h>
+ # include <sys/stat.h>
+ # ifdef __SASC
+ # include <stat.h>
+ # endif
+ # endif
+
+ # ifdef INCLUDE_TELNET
+ # include "host/telnet.h"
+ # endif
+
+ # ifndef __SASC
+ # include <alloca.h>
+ # endif
+ # include <stdlib.h>
+ # include <string.h>
+ # include <setjmp.h>
+ # include <stdio.h>
+ # include <limits.h>
+
+ # define STRUCT_AL      4               /* define this if align(struct) > 2 */
+ # define UCHAR(c)       (int)((c)&0xFF) /* unsigned character */
+ # define SCHAR(c)       (c)             /* signed character */
+
+ typedef int Int;
+ typedef unsigned long Uint;
+
+ # ifndef __SASC
+ # define ALLOCA(type, size)     ((type *) alloca(sizeof(type) * \
+                                                  (unsigned int) (size)))
+ # define AFREE(ptr)             /* on function return */
+ # else
+ # define ALLOCA(type, size)     ALLOC(type, size)
+ # define AFREE(ptr)             FREE(ptr)
+ # endif
+
+ # define FS_BLOCK_SIZE          512  /* valid for FFS */
+
+ extern char *crypt              P((char*, char*));
+ extern void P_finish P((void));
+
+ # endif /* AMIGA */
+
+
  extern void  P_getevent P((void));
  extern void  P_message  P((char*));