[project @ 1996-03-22 09:24:22 by partain]

[ghc-hetmet.git] / ghc / compiler / yaccParser / finfot.c

diff --git a/ghc/compiler/yaccParser/finfot.c b/ghc/compiler/yaccParser/finfot.c
index d155b2b..504d5c9 100644 (file)
--- a/ghc/compiler/yaccParser/finfot.c
+++ b/ghc/compiler/yaccParser/finfot.c
@@ -10,16 +10,6 @@ Tfinfot tfinfot(t)
 }
 
 
-/************** nofinfo ******************/
-
-finfot mknofinfo()
-{
-       register struct Snofinfo *pp =
-               (struct Snofinfo *) malloc(sizeof(struct Snofinfo));
-       pp -> tag = nofinfo;
-       return((finfot)pp);
-}
-
 /************** finfo ******************/
 
 finfot mkfinfo(PPfi1, PPfi2)