python - MicroFocus Cobol 可以设置系统跟踪功能吗？

Question

MicroFocus Cobol 或任何其他功能是否具有与 Python 的sys.settrace()等效的功能？作为参数传递给此类跟踪函数的函数将在源代码的每一行执行后调用。

Answer 1

OpenCOBOL 支持

-ftrace               Generate trace code
                    - Executed SECTION/PARAGRAPH
-ftraceall            Generate trace code
                    - Executed SECTION/PARAGRAPH/STATEMENTS
                    - Turned on by -debug

cobc 命令行选项。这与 Python 的观点并不完全相同，但在启用时会在进入部分、段落和句子时输出一个跟踪轮。毫无疑问，其他编译器也会有类似的东西。除了 READY TRACE、调试和 >>D 其他调试功能，如 DECLARATIVES 允许的那些。 http://opencobol.add1tocobol.com/#declaratives

procedure division.
declaratives.
handle-errors section.
    use after standard error procedure on filename-1.
handle-error.
    display "Something bad happened with " filename-1 end-display.
.
helpful-debug section.
    use for debugging on main-file.
help-me.
    display "Just touched " main-file end-display.
.
end declaratives.

Answer 2

它不是完全等价的，但您可以使用READY TRACE进行调试。使用 TRACE 编译器指令启用它。