Question

pascal中如何使用goto

在使用 -Sg 开关情况下，GOTO 和 LABEL 不被支持
什么是sg开关啊

Answer 1

{$goto-} 关闭 goto label 功能，
{$goto+} 打开。

追问

？？

追答

{$goto-} 关闭 goto 功能, 不允许使用 goto 跳转； 编译遇到 goto 报错。

{$goto+} 允许使用 goto.

追问

那怎么办？？

追答

{$goto+} 打开, 不用也无妨。