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秒
是什么阻止你使用作为例如
rule: [to "--" some "-" x:]