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>
16 lines
424 B
Plaintext
16 lines
424 B
Plaintext
(defcomp
|
|
(&key refs)
|
|
(div
|
|
(~tw :tokens "mt-2")
|
|
(span (~tw :tokens "text-xs font-medium text-stone-500") "References")
|
|
(div
|
|
(~tw :tokens "flex flex-wrap gap-1 mt-1")
|
|
(map
|
|
(fn
|
|
(ref)
|
|
(a
|
|
:href (str "#fn-" ref)
|
|
(~tw :tokens "text-xs px-1.5 py-0.5 rounded bg-stone-100 text-stone-600 font-mono hover:bg-stone-200")
|
|
ref))
|
|
refs))))
|