From 9de6c42b216e084c9a3d8000532bac893f917913 Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sun, 17 Nov 2019 15:08:30 +0100
Subject: [PATCH] debugging: C

---
 src/eval-apply.c | 2 +-
 src/module.c     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/eval-apply.c b/src/eval-apply.c
index 5d2a2d70..f7c27783 100644
--- a/src/eval-apply.c
+++ b/src/eval-apply.c
@@ -673,7 +673,7 @@ eval:
                 else if (global_p != 0)
                   {
                     handle = lookup_handle (name, cell_f);
-                    if (g_debug > 2)
+                    if (g_debug > 4)
                       {
                         eputs ("global set: ");
                         write_error_ (name);
diff --git a/src/module.c b/src/module.c
index 8c020682..fd076c7d 100644
--- a/src/module.c
+++ b/src/module.c
@@ -68,7 +68,7 @@ module_handle (struct scm *module, struct scm *name)     /*:((internal)) */
 {
   /* 1. Check module defines.  */
   struct scm *table = module_defines (module);
-  if (g_debug > 2)
+  if (g_debug > 4)
     {
       eputs ("module_handle:");
       eputs (" name = ");