attempt to run dbg when entery a given function

Author: ldeniau

src/madl_dbg.lua

@@ -497,7 +497,7 @@ end
 dbg = setmetatable({}, {
   __call = function(_, condition, top_offset, source)
     if condition then return end
-    
+
     top_offset = (top_offset or 0)
     stack_inspect_offset = top_offset
     stack_top = top_offset
@@ -675,6 +675,20 @@ else
   dbg_writeln("Please send me feedback!")
 end
 
+-- mad extension (doesn't work with dbg) ---------------------------------------
+
+local function dbgfun (fun, typ_)
+  local function hook (event)
+    local info = debug.getinfo(2,'n')
+    if info.name == fun then
+      io.write("dbgfun-", event, ": ", info.name, "\n")
+      return debug.debug()
+--      return dbg()
+    end
+  end
+  debug.sethook(hook, typ_ or "call")
+end
+
 -- end -------------------------------------------------------------------------
 return { dbg = dbg } -- MAD: replace debugger.lua by dbg