Remove unused core_fmt()

2 files changed, 1 insertions, 34 deletions

diff --git a/src/z-form.c b/src/z-form.c
index 7fec68e8..af254ef7 100644
--- a/src/z-form.c
+++ b/src/z-form.c
@@ -723,28 +723,3 @@ void quit_fmt(cptr fmt, ...)
 	/* Call quit() */
 	quit(res);
 }
-
-
-
-/*
- * Vararg interface to core()
- */
-void core_fmt(cptr fmt, ...)
-{
-	char *res;
-	va_list vp;
-
-	/* Begin the Varargs Stuff */
-	va_start(vp, fmt);
-
-	/* If requested, Do a virtual fprintf to stderr */
-	res = vformat(fmt, vp);
-
-	/* End the Varargs Stuff */
-	va_end(vp);
-
-	/* Call core() */
-	core(res);
-}
-
-
diff --git a/src/z-form.h b/src/z-form.h
index 752cf249..c7582831 100644
--- a/src/z-form.h
+++ b/src/z-form.h
@@ -1,7 +1,4 @@
-/* File z-form.h */
-
-#ifndef INCLUDED_Z_FORM_H
-#define INCLUDED_Z_FORM_H
+#pragma once
 
 #ifdef __cplusplus
 extern "C" {
@@ -41,11 +38,6 @@ extern void plog_fmt(cptr fmt, ...);
 /* Vararg interface to "quit()", using "format()" */
 extern void quit_fmt(cptr fmt, ...);
 
-/* Vararg interface to "core()", using "format()" */
-extern void core_fmt(cptr fmt, ...);
-
 #ifdef __cplusplus
 } /* extern "C" */
 #endif
-
-#endif