From 1505848425bf149f864ea106bce71447f739012d Mon Sep 17 00:00:00 2001
From: =?utf8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Fri, 28 Aug 2009 01:16:49 +0200
Subject: [PATCH] Add missing `FUNC_NAME' definition.

* libguile/load.c (scm_sys_warn_autocompilation_enabled): Define
  `FUNC_NAME'.
---
 libguile/load.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/libguile/load.c b/libguile/load.c
index e2c0dbf99..29ef74a6c 100644
--- a/libguile/load.c
+++ b/libguile/load.c
@@ -650,9 +650,10 @@ autocompile_catch_handler (void *data, SCM tag, SCM throw_args)
 
 SCM_DEFINE (scm_sys_warn_autocompilation_enabled, "%warn-autocompilation-enabled", 0, 0, 0,
 	    (void), "")
+#define FUNC_NAME s_scm_sys_warn_autocompilation_enabled
 {
   static int message_shown = 0;
-  
+
   if (!message_shown)
     {
       scm_puts (";;; note: autocompilation is enabled, set GUILE_AUTO_COMPILE=0\n"
@@ -663,8 +664,8 @@ SCM_DEFINE (scm_sys_warn_autocompilation_enabled, "%warn-autocompilation-enabled
 
   return SCM_UNSPECIFIED;
 }
+#undef FUNC_NAME
 
-  
 static SCM
 scm_try_autocompile (SCM source)
 {
-- 
2.20.1