Forth中有条件退出的说法吗？

有一个普遍实现的词叫做“?exit”，如果不是零，它就会退出。你将不得不做：

0= ?exit

去得到你想要的。如果你的 Forth 缺少这个，你可以自己定义，但是严格来说需要了解 Forth 的实现细节才能正确实现。然而，在大多数 Forth 上，以下代码将起作用：

   : ?exit if rdrop exit then ;
   : ?exit if r> drop exit then ; ( if "rdrop" is not available )
   : -?exit 0= if rdrop exit then ; ( what you want )

大多数 Forth 实现只有一个值用于每个函数调用，因此这将适用于其中的大多数。

还有一个更便携的版本：

: ?exit postpone if postpone exit postpone then ; immediate
: -?exit postpone 0= postpone if postpone exit postpone then ; immediate

尽管我注意到并非所有 Forth 实现都实现了“推迟”，而是可能使用“[编译]”之类的词。