Add type annotations to remaining untyped spec params

trampoline (eval.sx), signal/deref (signals.sx), aser (adapter-sx.sx).

Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
This commit is contained in:
2026-03-11 22:57:20 +00:00
parent ce7ad125b6
commit a69604acaf
4 changed files with 5 additions and 5 deletions

View File

@@ -42,7 +42,7 @@
;; --------------------------------------------------------------------------
(define signal
(fn (initial-value)
(fn ((initial-value :as any))
(make-signal initial-value)))
@@ -55,7 +55,7 @@
;; the current value — no subscription, no overhead.
(define deref
(fn (s)
(fn ((s :as any))
(if (not (signal? s))
s ;; non-signal values pass through
(let ((ctx (get-tracking-context)))