  	register int fd;
  #ifdef CHDIR
  	register char *dir;
-@@ -538,4 +542,479 @@
+@@ -538,4 +542,396 @@
  	return;
  }
  

+        AT(M3_COVETOUS, "FlCovetous");
+        if (hates_silver(pm)) fprintf(f, ", FlHatesSilver");
+        if (passes_bars(pm)) fprintf(f, ", FlPassesBars");
+#undef AT
+        fprintf(f, "]), ");
+        fprintf(f, "moColor = ");

+    /* We want to import everything in this module. */
+    fprintf(f, "-- Automatically generated --\n");
+    fprintf(f, "{-# LANGUAGE OverloadedStrings #-}\n");
+    fprintf(f, "module NetHack.Imported.ReplaceThisName where\n\n");
+    fprintf(f, "import qualified Data.Text as T\n");
+    fprintf(f, "import qualified NetHack.Data.Dice as D\n");
+    fprintf(f, "import NetHack.Data.Monster\n\n");
+
+    fprintf(f, "monster :: T.Text -> Maybe Monster\n");
+    fprintf(f, "monster name\n");
