HS parser: fix number+comparison keyword collision, eval-hs uses hs-compile

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>

spec/tests/test-hyperscript-behavioral.sx

@@ -20,7 +20,7 @@
 ;; Compiles the expression, wraps in a thunk, evaluates, returns result.
 (define eval-hs
   (fn (src)
-    (let ((sx (hs-to-sx-from-source (str "return " src))))
+    (let ((sx (hs-to-sx (hs-compile src))))
       (let ((handler (eval-expr-cek
               (list (quote fn) (list (quote me)) (list (quote let) (list (list (quote it) nil) (list (quote event) nil)) sx)))))
         (handler nil)))))