雷博尔PARSE规则为匹配通至少2位的第一次出现

问题描述 投票:1回答:1

rule: [while [not ["--"] skip] some "-"] parse "a-bc----d" [rule ??]

版画

??: "d"

但我需要(例如使用to #"-")更有效的规则...

编辑:

t: copy "" append/dup t "." 10000 append t "-..---..--" rule: [while [not ["--"] skip] some "-"] print [delta-time [loop 1000 [parse t [rule] ]]]

=>〜15.4秒我的电话上

rule: [any ["--" break | skip] any "-"]

=>〜8.2秒

rule: [to "--" some "-"](@sqlab响应)

=>〜0.3秒

parsing rebol red
1个回答
3
投票

是什么阻止你使用作为例如

rule: [to "--" some "-"  x:]     
© www.soinside.com 2019 - 2024. All rights reserved.