From fcccad19030f421315a145beda45bc4aa68ddab7 Mon Sep 17 00:00:00 2001
From: Paul Smith <psmith@gnu.org>
Date: Mon, 27 May 2013 13:01:48 -0400
Subject: Porting to VMS, from Hartmut Becker.

---
 load.c | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'load.c')

diff --git a/load.c b/load.c
index e93822ec..165153a4 100644
--- a/load.c
+++ b/load.c
@@ -231,11 +231,10 @@ load_file (const gmk_floc *flocp, const char **ldname, int noerror)
   return 0;
 }
 
-int
-unload_file (struct file *file)
+void
+unload_file (const char *name)
 {
-  fatal (flocp, "INTERNAL: Cannot unload when load is not supported!");
-  return 0;
+  fatal (NILF, "INTERNAL: Cannot unload when load is not supported!");
 }
 
 #endif  /* MAKE_LOAD */
-- 
cgit v1.2.1