--- gforth/engine/engine.c	2003/01/19 23:35:33	1.56
+++ gforth/engine/engine.c	2003/01/26 20:56:38	1.58
@@ -1,6 +1,6 @@
 /* Gforth virtual machine (aka inner interpreter)
 
-  Copyright (C) 1995-2003 Free Software Foundation, Inc.
+  Copyright (C) 1995,1996,1997,1998,2000 Free Software Foundation, Inc.
 
   This file is part of Gforth.
 
@@ -72,8 +72,6 @@
 #define ftello ftell
 #endif
 
-#define IOR(flag)	((flag)? -512-errno : 0)
-
 struct F83Name {
   struct F83Name *next;  /* the link field for old hands */
   char		countetc;
@@ -82,14 +80,6 @@ struct F83Name {
 
 #define F83NAME_COUNT(np)	((np)->countetc & 0x1f)
 
-struct Longname {
-  struct Longname *next;  /* the link field for old hands */
-  Cell		countetc;
-  char		name[0];
-};
-
-#define LONGNAME_COUNT(np)	((np)->countetc & (((~((UCell)0))<<3)>>3))
-
 #define NULLC '\0'
 
 #ifdef MEMCMP_AS_SUBROUTINE