打印Forth中的双引号

Question

单词."打印一个字符串。更准确地说，它编译(.")和字符串，直到当前编译字中的下一个"。

但是我怎么打印

这就是问题所在

出来吗?

Answer 1

在Forth-2012系统(例如Gforth)中，您可以使用通过单词s"转义的字符串字面值:

: foo ( -- ) s" That's the "question"." type ;

在Forth-94系统(大多数标准系统)中，您可以使用任意解析和单词sliteral作为:

: foo ( -- ) [ char | parse That's the "question".| ] sliteral type ;

也可以提取到行尾的字符串(不带可打印分隔符);也可以提取多行字符串

可以很容易地为特定情况定义特定的帮助程序。例如，请参阅单词s$，查看由任意可打印字符分隔的字符串字面值，例如:

s$ `"test" 'passed'` type

Answer 2

老派:

34 emit

输出:

"

使用gforth:

: d 34 emit ;
cr ." That's the " d ." question" d ." ." cr 

输出:

That's the "question".