Welcome 微信登录
编程资源 图片资源库 蚂蚁家优选 PDF转换器 软件资源

软件开发、小程序制作、系统集成与运维、空间租用、硬件开发、视频监控、技术咨询与支持——联系电话：0311-88999002/88999003

首页 / 操作系统 / Linux / 改造Lua的debug.traceback（） 让其显示栈上所有的局部变量

  1. function tracebackex（）  
  2. local ret = ""  
  3. local level = 2  
  4. ret = ret .. "stack traceback: "  
  5. while true do  
  6.    --get stack info  
  7.    local info = debug.getinfo（level, "Sln"）  
  8.    if not info then break end  
  9.    if info.what == "C" then                -- C function  
  10.     ret = ret .. tostring（level） .. " C function "  
  11.    else           -- Lua function  
  12.     ret = ret .. string.format（" [%s]:%d in function `%s` ", info.short_src, info.currentline, info.name or ""）  
  13.    end  
  14.    --get local vars  
  15.    local i = 1  
  16.    while true do  
  17.     local name, value = debug.getlocal（level, i）  
  18.     if not name then break end  
  19.     ret = ret .. " " .. name .. " = " .. tostringex（value, 3） .. " "  
  20.     i = i + 1  
  21.    end    
  22.    level = level + 1  
  23. end  
  24. return ret  
  25. end  
  26.   
  27. function tostringex（v, len）  
  28. if len == nil then len = 0 end  
  29. local pre = string.rep（" ", len）  
  30. local ret = ""  
  31. if type（v） == "table" then  
  32.    if len > 5 then return " { ... }" end  
  33.    local t = ""  
  34.    for k, v1 in pairs（v） do  
  35.     t = t .. " " .. pre .. tostring（k） .. ":"  
  36.     t = t .. tostringex（v1, len + 1）  
  37.    end  
  38.    if t == "" then  
  39.     ret = ret .. pre .. "{ } （" .. tostring（v） .. "）"  
  40.    else  
  41.     if len > 0 then  
  42.      ret = ret .. " （" .. tostring（v） .. "） "  
  43.     end  
  44.     ret = ret .. pre .. "{" .. t .. " " .. pre .. "}"  
  45.    end  
  46. else  
  47.    ret = ret .. pre .. tostring（v） .. " （" .. type（v） .. "）"  
  48. end  
  49. return ret  
  50. end  
版权所有©石家庄振强科技有限公司2024 冀ICP备08103738号-5 网站地图