`type`这个词怎么做?

时间:2018-04-05 16:36:37

标签: forth gforth

给出以下功能,(借鉴Rosetta Code

: (echo) ( sock buf -- sock buf )
  begin
    cr ." waiting..."
    2dup 2dup size read-socket nip
    dup 0>
  while
    ."  got: " 2dup type ( <-- HERE )
    rot write-socket
  repeat
  drop drop drop ;

type做什么,

."  got: " 2dup type

1 个答案:

答案 0 :(得分:4)

type is a word。您可以找到单词here

的列表
type       c-addr u –         core       “type”
     

如果u> 0,则显示以c-addr中存储的字符开头的字符串中的u个字符。

在这种情况下你有

128 constant size
create buf size allot

然后将buf设为read-socket。这个type到字符串并将其打印出来。

返回字符串的内存地址和大小。

cr s" foo bar " .s

输出:

<2> 94085808947584 8  ok

在这里,我们为type提供内存地址和大小,并获取&#34; foo bar&#34;

cr 94085808947584 8 type

输出:

foo bar  ok