giles
4f02f82f4e
Parser: skip unit suffix when next ident is a comparison keyword (starts, ends, contains, matches, is, does, in, precedes, follows). Fixes "123 starts with '12'" returning "123starts" instead of true. eval-hs: use hs-compile directly instead of hs-to-sx-from-source with "return " prefix, which was causing the parser to consume the comparison as a string suffix. Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
44 lines
859 B
Plaintext
44 lines
859 B
Plaintext
(define streaming-demo-data
|
|
(fn
|
|
()
|
|
(list
|
|
(dict
|
|
"stream-id"
|
|
"stream-fast"
|
|
"delay"
|
|
1000
|
|
"stream_label"
|
|
"Fast source"
|
|
"stream_color"
|
|
"emerald"
|
|
"stream_message"
|
|
"Resolved in ~1s (async IO)"
|
|
"stream_time"
|
|
"~1s")
|
|
(dict
|
|
"stream-id"
|
|
"stream-medium"
|
|
"delay"
|
|
3000
|
|
"stream_label"
|
|
"Medium source"
|
|
"stream_color"
|
|
"amber"
|
|
"stream_message"
|
|
"Resolved in ~3s (async IO)"
|
|
"stream_time"
|
|
"~3s")
|
|
(dict
|
|
"stream-id"
|
|
"stream-slow"
|
|
"delay"
|
|
5000
|
|
"stream_label"
|
|
"Slow source"
|
|
"stream_color"
|
|
"violet"
|
|
"stream_message"
|
|
"Resolved in ~5s (async IO)"
|
|
"stream_time"
|
|
"~5s"))))
|