string - 如何将 Red/Rebol 字符串转换为系列

Question

我想知道是否有办法将字符串转换为系列。我正在尝试使用解析来提取数据，并且我想将一些捕获的数据分解为更小的片段，以便我可以执行 IF、CASE 或 SWITCH 语句。

下面是一些代码。

; A line of text with simple markup
current-line: {[chapter 1] The Wanderer}

; Parse the current line of input
parse current-line [
  "["
  copy tag to "]"
  skip
  copy rest-of-line to end
]

; Just some output to see if i captured data properly
print ["Extracted: " tag]
print ["Rest of line: " rest-of-line]

; The statements below both execute
; but the second one definitely shouldn't execute.
if [find tag  "chapter"] [print "The tag is chapter."]
if [find tag  "list"]    [print "The tag is list."]

据我了解，“find”适用于一系列，这可能是那些 if 语句没有给出我期望的结果的原因。然而变量“tag”只是一个字符串。

有没有办法将字符串转换为系列？或者是否有任何函数可以在字符串上查找子字符串？

Answer 1

The statements below both execute, but the second one definitely shouldn't execute.

if [find tag  "chapter"] [print "The tag is chapter."]
if [find tag  "list"]    [print "The tag is list."]

这是一个非常常见的新用户问题，这是可以理解的。

关于 BLOCK 需要记住的关键一点!一个 block “只是数据”，除非您(或您调用的函数)通过​​使用 DO 执行它来“使该 block 栩栩如生”。查看 IF 的帮助:

>> help if

USAGE:
    if cond then-blk

DESCRIPTION:
    If condition is true, evaluate block; else return NONE.
    if is of type: native!

ARGUMENTS:
    cond [any-type!]
    then-blk [block!]

您必须将 THEN-BLOCK 作为值传入，因为它是否会“生效”并由 IF 运行取决于条件是否为真。 IF 必须决定是否执行该 block 。

但是 IF 的第一个参数是条件。无论条件最终为真还是假，每次命中 IF 语句时都必须运行它。因此，该条件不存在 block 的“样板”。缺乏样板文件意味着，如果您将 block 作为数据传递给它，那么问题就归结为“数据 block 被视为值，是真还是假？”嗯...这是真的:

>> true? [some arbitrary block]
== true

事实上，除了 NONE 之外，所有值都被视为“有条件为真”!值(value)或逻辑!错误的。即使为零也是正确的:

>> if 0 [print "Almost absolutely every value is true!"]

Almost absolutely every value is true! 

因此，您不想将条件放在方括号中。要么保留它，要么您可以使用括号 block “组”。括号确实会计算，但会隔离计算的部分，这可以帮助您隔 ionic 表达式以实现优先级或参数检查等目的。所以:

if find tag "chapter" [print "The tag is chapter."]
if (find tag "list") [print "The tag is list."]

希望这是有道理的，但是您始终必须考虑评估模型才能了解使用或不使用 block 的动机。例如，WHILE 循环与 IF 不同，因为它需要多次运行条件。

>> x: 0
>> while x < 2 [ 
    print x 
    x: x + 1 
]

*** Script error: while does not allow logic for its cond argument

定义 WHILE 时，它必须为条件占用一个 block 。因为否则 WHILE 函数会将其第一个参数计算为 TRUE，然后就不会出现 x < 2每次循环时都要计算的表达式。所以:

>> x: 0
>> while [x < 2] [ 
    print x 
    x: x + 1 
]

0
1

你可能会犯错误；如果将 WHILE 转换为 IF，则特别容易。然而，尽管 IF 可以被设计为在其条件周围强制执行一个样板 block (即使对于一次性评估条件的东西来说没有必要)，系统的目标之一是消除不必要的样板。

好消息是，它背后有一个逻辑和规则......一旦掌握了它，您就可以用来制作自己的循环结构等等。 “疯狂，但有一个方法。” :-)

I would like to know if there is a way to convert a string into a series. I'm trying to extract data using parse, and I want to break some of that captured data down into smaller fragments so that I can do if, case or switch statement.

用现在的术语来说(在其他一些情况下可能会有点困惑)，一个字符串!已经是该系列的成员!排版。也就是说，您可以执行诸如使用 FIRST 或 SECOND 从中选取元素，或者使用 NEXT 遍历它等操作。这就是 SERIES。