From f110951172e38f685e43aea5125cd6e05b47bde3 Mon Sep 17 00:00:00 2001
From: Nick Briggs <nicholas.h.briggs@gmail.com>
Date: Sat, 5 Sep 2020 16:15:22 -0700
Subject: [PATCH] Remove obsolete and unused gcscan.h        Predates BIGVM
 changes and has been incorporated into gcscan.c        with backward
 compatability.

	deleted:    gcscan.h
---
 inc/gcscan.h | 47 -----------------------------------------------
 1 file changed, 47 deletions(-)
 delete mode 100755 inc/gcscan.h

diff --git a/inc/gcscan.h b/inc/gcscan.h
deleted file mode 100755
index 7526a84..0000000
--- a/inc/gcscan.h
+++ /dev/null
@@ -1,47 +0,0 @@
-/* $Id: gcscan.h,v 1.2 1999/01/03 02:06:01 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved  */
-
-
-
-
-/************************************************************************/
-/*									*/
-/*	(C) Copyright 1989-92 Venue. All Rights Reserved.		*/
-/*	Manufactured in the United States of America.			*/
-/*									*/
-/************************************************************************/
-
-
-
-#define HTSTKBIT 		0x200		/* = 512 */
-#define HTENDS 			((struct hashentry *) htlptr)
-#define GetStkCnt(entry1)	(entry1 >> 9)
-
-/* extern DLword *HTmain;  -- this is real method */
-
-
-const inline extern DLword gcscan1 (probe)
-register int 	probe;				/* probe is offset */
-  { register struct htlinkptr *htlptr;		/* overlay access method */ 
-    register int contents;
-    while (--probe >= 0)			/* End of HTmain Table ? */
-	{ 
-					/* Start addr. of scanning */	
-   	  htlptr = (struct htlinkptr *)(HTmain+probe);
-	  contents = ((struct htlinkptr *)WORDPTR(htlptr))->contents;
-	  if (contents && (((struct hashentry *)WORDPTR(HTENDS))->collision || (GetStkCnt(contents) == 0)))
-		 return(probe);
-	}
-    return(NIL);
-   }
-
-const inline extern DLword gcscan2 (probe)
-register int 	probe;				/* probe is offset */
-   {register struct htlinkptr *htlptr;		/* overlay access method */ 
-	while (--probe >= 0)			/* End of HTmain Table ? */
-	 { htlptr = (struct htlinkptr *)(HTmain+probe);
-						/* Start addr. of scanning */
-	   if (((HTSTKBIT | 1) & ((struct htlinkptr *)WORDPTR(htlptr))->contents) != 0)
-			return(probe);		/* stackref or collision ON */
-	 }
-	return(NIL);
-   }