From ba5c7dacb5ae838da74200b5363ef89b7677ce01 Mon Sep 17 00:00:00 2001
From: "Eric S. Raymond" <esr@thyrsus.com>
Date: Sun, 18 Jun 2017 13:20:04 -0400
Subject: [PATCH] Remove unused code.

---
 advent.h |  2 --
 misc.c   | 42 ++++--------------------------------------
 2 files changed, 4 insertions(+), 40 deletions(-)

diff --git a/advent.h b/advent.h
index ce5e7c5..77c8079 100644
--- a/advent.h
+++ b/advent.h
@@ -93,7 +93,6 @@ extern bool GETIN(FILE *,token_t*,token_t*,token_t*,token_t*);
 extern long YES(FILE *,vocab_t,vocab_t,vocab_t);
 extern long GETTXT(bool,bool,bool);
 extern token_t MAKEWD(long);
-extern void TYPE0(void);
 extern long VOCAB(long,long);
 extern void JUGGLE(long);
 extern void MOVE(long,long);
@@ -106,7 +105,6 @@ extern bool TSTBIT(long,int);
 extern long RNDVOC(long,long);
 extern void BUG(long) __attribute__((noreturn));
 extern bool MAPLIN(FILE *);
-extern void TYPE(void);
 extern void DATIME(long*, long*);
 
 enum termination {endgame, quitgame, scoregame};
diff --git a/misc.c b/misc.c
index 3eda32a..410dfd8 100644
--- a/misc.c
+++ b/misc.c
@@ -162,7 +162,7 @@ bool GETIN(FILE *input,
 
     for (;;) {
         if (game.blklin)
-            TYPE0();
+            fputc('\n', stdout);;
         if (!MAPLIN(input))
             return false;
         *pword1 = GETTXT(true, true, true);
@@ -206,7 +206,7 @@ long YES(FILE *input, vocab_t x, vocab_t y, vocab_t z)
     }
 }
 
-/*  Line-parsing routines (GETTXT, MAKEWD, PUTTXT, SHFTXT, TYPE0) */
+/*  Line-parsing routines (GETTXT, MAKEWD, PUTTXT, SHFTXT) */
 
 long GETTXT(bool skip, bool onewrd, bool upper)
 /*  Take characters from an input line and pack them into 30-bit words.
@@ -278,19 +278,6 @@ token_t MAKEWD(long letters)
     return word;
 }
 
-void TYPE0(void)
-/*  Type a blank line.  This procedure is provided as a convenience for callers
- *  who otherwise have no use for MAPCOM. */
-{
-    long temp;
-
-    temp = LNLENG;
-    LNLENG = 0;
-    TYPE();
-    LNLENG = temp;
-    return;
-}
-
 /*  Data structure  routines */
 
 long VOCAB(long id, long init)
@@ -514,7 +501,7 @@ void BUG(long num)
     exit(0);
 }
 
-/*  Machine dependent routines (MAPLIN, TYPE, SAVEIO) */
+/*  Machine dependent routines (MAPLIN, SAVEIO) */
 
 bool MAPLIN(FILE *fp)
 {
@@ -585,8 +572,7 @@ bool MAPLIN(FILE *fp)
          *    63   = percent (%) [ASCII 45 octal, 37 decimal]
          *   64-73 = digits, 0 through 9
          *  Remaining characters can be translated any way that is convenient;
-         *  The "TYPE" routine below is used to map them back to characters when
-         *  necessary.  The above mappings are required so that certain special
+         *  The above mappings are required so that certain special
          *  characters are known to fit in 6 bits and/or can be easily spotted.
          *  Array elements beyond the end of the line should be filled with 0,
          *  and LNLENG should be set to the index of the last character.
@@ -610,26 +596,6 @@ bool MAPLIN(FILE *fp)
     }
 }
 
-void TYPE(void)
-/*  Type the first "LNLENG" characters stored in inline, mapping them
- *  from integers to text per the rules described above.  INLINE
- *  may be changed by this routine. */
-{
-    long i;
-
-    if (LNLENG == 0) {
-        printf("\n");
-        return;
-    }
-
-    for (i = 1; i <= LNLENG; i++) {
-        INLINE[i] = advent_to_ascii[(int) INLINE[i]];
-    }
-    INLINE[LNLENG + 1] = 0;
-    printf("%s\n", INLINE + 1);
-    return;
-}
-
 void DATIME(long* d, long* t)
 {
     struct timeval tv;
-- 
2.31.1