(sxbc 1 "57726b5b82c1a3cb" (code :bytecode (51 1 0 128 0 0 5 51 3 0 128 2 0 5 51 5 0 128 4 0 5 51 7 0 128 6 0 5 51 9 0 128 8 0 5 51 11 0 128 10 0 5 51 13 0 128 12 0 5 51 15 0 128 14 0 5 51 17 0 128 16 0 5 51 19 0 128 18 0 5 51 21 0 128 20 0 50) :constants ( "assert-signal-value" (code :arity 2 :bytecode (20 0 0 16 0 48 1 17 2 20 1 0 16 2 16 1 1 3 0 16 1 1 4 0 16 2 52 2 0 4 49 3 50) :constants ( "deref" "assert=" "str" "Expected signal value " ", got ")) "assert-signal-has-subscribers" (code :arity 1 :bytecode (20 0 0 20 3 0 16 0 48 1 52 2 0 1 1 4 0 52 1 0 2 1 5 0 49 2 50) :constants ( "assert" ">" "len" "signal-subscribers" 0 "Expected signal to have subscribers")) "assert-signal-no-subscribers" (code :arity 1 :bytecode (20 0 0 20 3 0 16 0 48 1 52 2 0 1 1 4 0 52 1 0 2 1 5 0 49 2 50) :constants ( "assert" "=" "len" "signal-subscribers" 0 "Expected signal to have no subscribers")) "assert-signal-subscriber-count" (code :arity 2 :bytecode (20 1 0 16 0 48 1 52 0 0 1 17 2 20 2 0 16 2 16 1 1 4 0 16 1 1 5 0 16 2 52 3 0 4 49 3 50) :constants ( "len" "signal-subscribers" "assert=" "str" "Expected " " subscribers, got ")) "simulate-signal-set!" (code :arity 2 :bytecode (20 0 0 16 0 16 1 49 2 50) :constants ( "reset!")) "simulate-signal-swap!" (code :arity 2 :bytecode (20 0 0 16 0 16 1 49 2 50) :constants ( "swap!")) "assert-computed-dep-count" (code :arity 2 :bytecode (20 1 0 16 0 48 1 52 0 0 1 17 2 20 2 0 16 2 16 1 1 4 0 16 1 1 5 0 16 2 52 3 0 4 49 3 50) :constants ( "len" "signal-deps" "assert=" "str" "Expected " " deps, got ")) "assert-computed-depends-on" (code :arity 2 :bytecode (20 0 0 20 2 0 16 0 48 1 16 1 52 1 0 2 1 3 0 49 2 50) :constants ( "assert" "contains?" "signal-deps" "Expected computed to depend on the given signal")) "count-effect-runs" (code :arity 1 :bytecode (20 0 0 1 1 0 48 1 17 1 20 2 0 51 3 0 1 1 48 1 5 1 1 0 17 2 20 2 0 51 4 0 1 2 1 0 48 1 17 3 16 2 50) :constants ( "signal" 0 "effect" (code :upvalue-count 1 :bytecode (20 0 0 18 0 49 1 50) :constants ( "deref")) (code :upvalue-count 2 :bytecode (18 0 1 1 0 52 0 0 2 19 0 5 20 2 0 18 1 2 49 2 50) :constants ( "+" 1 "cek-call")))) "make-test-signal" (code :arity 1 :bytecode (20 0 0 16 0 48 1 17 1 52 1 0 0 17 2 20 2 0 51 3 0 1 2 1 1 48 1 5 1 0 0 16 1 1 4 0 16 2 65 2 0 50) :constants ( "signal" "list" "effect" (code :upvalue-count 2 :bytecode (20 0 0 18 0 20 1 0 18 1 48 1 49 2 50) :constants ( "append!" "deref")) "history")) "assert-batch-coalesces" (code :arity 2 :bytecode (1 0 0 17 2 20 1 0 1 0 0 48 1 17 3 20 2 0 51 3 0 1 3 1 2 48 1 5 1 0 0 17 2 5 20 4 0 16 0 48 1 5 20 5 0 16 2 16 1 1 7 0 16 1 1 8 0 16 2 52 6 0 4 49 3 50) :constants ( 0 "signal" "effect" (code :upvalue-count 2 :bytecode (20 0 0 18 0 48 1 5 18 1 1 2 0 52 1 0 2 19 1 50) :constants ( "deref" "+" 1)) "batch" "assert=" "str" "Expected " " notifications, got ")))))