coop/rose-ash
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
0cae1fbb6bc6ca734b72497f473589e464a5d985
rose-ash/shared/static/wasm/sx/engine.sxbc
giles e0070041d6 Add .sxbc s-expression bytecode format 
Bytecode modules are now serialized as s-expressions (.sxbc) in addition
to JSON (.sxbc.json). The .sxbc format is the canonical representation —
content-addressable, parseable by the SX parser, and suitable for CID
referencing. Annotation layers (source maps, variable names, tests, docs)
can reference the bytecode CID without polluting the bytecode itself.

Format: (sxbc version hash (code :arity N :bytecode (...) :constants (...)))

The browser loader tries .sxbc first (via load-sxbc kernel primitive),
falls back to .sxbc.json. Caddy needs .sxbc MIME type to serve the new
format (currently 404s, JSON fallback works).

Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
2026-03-27 14:16:22 +00:00

658 lines
26 KiB
Plaintext
Raw Blame History

(sxbc 1 "e038227f8fc8f0ad"
(code
:bytecode (1 2 0 1 3 0 1 4 0 1 5 0 1 6 0 52 1 0 5 128 0 0 5 1 8 0 128 7 0 5 51 10 0 128 9 0 5 51 12 0 128 11 0 5 51 14 0 128 13 0 5 51 16 0 128 15 0 5 51 18 0 128 17 0 5 51 20 0 128 19 0 5 51 22 0 128 21 0 5 51 24 0 128 23 0 5 51 26 0 128 25 0 5 51 28 0 128 27 0 5 51 30 0 128 29 0 5 51 32 0 128 31 0 5 51 34 0 128 33 0 5 51 36 0 128 35 0 5 51 38 0 128 37 0 5 51 40 0 128 39 0 5 51 42 0 128 41 0 5 51 44 0 128 43 0 5 51 46 0 128 45 0 5 51 48 0 128 47 0 5 51 50 0 128 49 0 5 51 52 0 128 51 0 5 51 54 0 128 53 0 5 51 56 0 128 55 0 5 1 58 0 128 57 0 5 51 60 0 128 59 0 5 51 62 0 128 61 0 5 51 64 0 128 63 0 5 51 66 0 128 65 0 5 51 68 0 128 67 0 5 51 70 0 128 69 0 50)
:constants (
"ENGINE_VERBS"
"list"
"get"
"post"
"put"
"delete"
"patch"
"DEFAULT_SWAP"
"outerHTML"
"parse-time"
(code :arity 1
:bytecode (16 0 52 0 0 1 33 6 0 1 1 0 32 74 0 16 0 1 3 0 52 2 0 2 33 12 0 16 0 1 1 0 52 4 0 2 32 50 0 16 0 1 5 0 52 2 0 2 33 29 0 16 0 1 5 0 1 8 0 52 7 0 3 1 1 0 52 4 0 2 1 9 0 52 6 0 2 32 9 0 16 0 1 1 0 52 4 0 2 50)
:constants (
"nil?"
0
"ends-with?"
"ms"
"parse-int"
"s"
"*"
"replace"
""
1000))
"parse-trigger-spec"
(code :arity 1
:bytecode (16 0 52 0 0 1 33 4 0 2 32 27 0 16 0 1 2 0 52 1 0 2 17 1 51 4 0 51 6 0 16 1 52 5 0 2 52 3 0 2 50)
:constants (
"nil?"
"split"
","
"filter"
(code :arity 1
:bytecode (16 0 52 1 0 1 52 0 0 1 50)
:constants (
"not"
"nil?"))
"map"
(code :arity 1
:bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 17 1 16 1 52 3 0 1 33 4 0 2 32 111 0 16 1 52 5 0 1 1 6 0 52 4 0 2 6 33 14 0 5 16 1 52 8 0 1 1 9 0 52 7 0 2 33 37 0 1 11 0 1 6 0 1 12 0 1 13 0 20 14 0 16 1 1 16 0 52 15 0 2 48 1 52 10 0 2 52 10 0 4 32 40 0 52 10 0 0 17 2 51 18 0 1 2 16 1 52 19 0 1 52 17 0 2 5 1 11 0 16 1 52 5 0 1 1 12 0 16 2 52 10 0 4 50)
:constants (
"split"
"trim"
" "
"empty?"
"="
"first"
"every"
">="
"len"
2
"dict"
"event"
"modifiers"
"interval"
"parse-time"
"nth"
1
"for-each"
(code :arity 1 :upvalue-count 1
:bytecode (16 0 1 1 0 52 0 0 2 33 13 0 18 0 1 1 0 3 52 2 0 3 32 97 0 16 0 1 3 0 52 0 0 2 33 13 0 18 0 1 3 0 3 52 2 0 3 32 72 0 16 0 1 5 0 52 4 0 2 33 26 0 18 0 1 6 0 20 7 0 16 0 1 9 0 52 8 0 2 48 1 52 2 0 3 32 34 0 16 0 1 10 0 52 4 0 2 33 21 0 18 0 1 11 0 16 0 1 12 0 52 8 0 2 52 2 0 3 32 1 0 2 50)
:constants (
"="
"once"
"dict-set!"
"changed"
"starts-with?"
"delay:"
"delay"
"parse-time"
"slice"
6
"from:"
"from"
5))
"rest"))))
"default-trigger"
(code :arity 1
:bytecode (16 0 1 1 0 52 0 0 2 33 24 0 1 4 0 1 5 0 1 6 0 52 3 0 0 52 3 0 4 52 2 0 1 32 85 0 16 0 1 7 0 52 0 0 2 6 34 24 0 5 16 0 1 8 0 52 0 0 2 6 34 10 0 5 16 0 1 9 0 52 0 0 2 33 24 0 1 4 0 1 10 0 1 6 0 52 3 0 0 52 3 0 4 52 2 0 1 32 21 0 1 4 0 1 11 0 1 6 0 52 3 0 0 52 3 0 4 52 2 0 1 50)
:constants (
"="
"FORM"
"list"
"dict"
"event"
"submit"
"modifiers"
"INPUT"
"SELECT"
"TEXTAREA"
"change"
"click"))
"get-verb-info"
(code :arity 1
:bytecode (51 1 0 1 0 20 2 0 52 0 0 2 50)
:constants (
"some"
(code :arity 1 :upvalue-count 1
:bytecode (20 0 0 18 0 1 2 0 16 0 52 1 0 2 48 2 17 1 16 1 33 21 0 1 4 0 16 0 52 5 0 1 1 6 0 16 1 52 3 0 4 32 1 0 2 50)
:constants (
"dom-get-attr"
"str"
"sx-"
"dict"
"method"
"upper"
"url"))
"ENGINE_VERBS"))
"build-request-headers"
(code :arity 3
:bytecode (1 1 0 1 2 0 1 3 0 20 4 0 48 0 52 0 0 4 17 3 20 5 0 16 0 1 6 0 48 2 17 4 16 4 33 14 0 16 3 1 8 0 16 4 52 7 0 3 32 1 0 2 5 20 5 0 20 9 0 1 10 0 48 1 1 11 0 48 2 17 4 16 4 33 14 0 16 3 1 12 0 16 4 52 7 0 3 32 1 0 2 5 16 2 33 14 0 16 3 1 13 0 16 2 52 7 0 3 32 1 0 2 5 20 5 0 16 0 1 14 0 48 2 17 4 16 4 33 38 0 20 15 0 16 4 48 1 17 5 16 5 33 20 0 51 17 0 1 3 1 5 16 5 52 18 0 1 52 16 0 2 32 1 0 2 32 1 0 2 5 16 3 50)
:constants (
"dict"
"SX-Request"
"true"
"SX-Current-URL"
"browser-location-href"
"dom-get-attr"
"sx-target"
"dict-set!"
"SX-Target"
"dom-query"
"script[data-components][data-hash]"
"data-hash"
"SX-Components-Hash"
"SX-Css"
"sx-headers"
"parse-header-value"
"for-each"
(code :arity 1 :upvalue-count 2
:bytecode (18 0 16 0 18 1 16 0 52 2 0 2 52 1 0 1 52 0 0 3 50)
:constants (
"dict-set!"
"str"
"get"))
"keys"))
"process-response-headers"
(code :arity 1
:bytecode (1 1 0 16 0 1 2 0 48 1 1 3 0 16 0 1 4 0 48 1 1 5 0 16 0 1 6 0 48 1 1 7 0 16 0 1 8 0 48 1 1 9 0 16 0 1 10 0 48 1 1 11 0 16 0 1 12 0 48 1 1 13 0 16 0 1 14 0 48 1 1 15 0 16 0 1 16 0 48 1 1 17 0 16 0 1 18 0 48 1 1 19 0 16 0 1 20 0 48 1 1 21 0 16 0 1 22 0 48 1 1 23 0 16 0 1 24 0 48 1 1 25 0 16 0 1 26 0 48 1 52 0 0 26 50)
:constants (
"dict"
"redirect"
"SX-Redirect"
"refresh"
"SX-Refresh"
"trigger"
"SX-Trigger"
"retarget"
"SX-Retarget"
"reswap"
"SX-Reswap"
"location"
"SX-Location"
"replace-url"
"SX-Replace-Url"
"css-hash"
"SX-Css-Hash"
"trigger-swap"
"SX-Trigger-After-Swap"
"trigger-settle"
"SX-Trigger-After-Settle"
"content-type"
"Content-Type"
"cache-invalidate"
"SX-Cache-Invalidate"
"cache-update"
"SX-Cache-Update"))
"parse-swap-spec"
(code :arity 2
:bytecode (16 0 6 34 4 0 5 20 1 0 1 2 0 52 0 0 2 17 2 16 2 52 3 0 1 17 3 16 1 17 4 51 5 0 1 4 16 2 52 6 0 1 52 4 0 2 5 1 8 0 16 3 1 9 0 16 4 52 7 0 4 50)
:constants (
"split"
"DEFAULT_SWAP"
" "
"first"
"for-each"
(code :arity 1 :upvalue-count 1
:bytecode (16 0 1 1 0 52 0 0 2 33 6 0 3 19 0 32 19 0 16 0 1 2 0 52 0 0 2 33 6 0 4 19 0 32 1 0 2 50)
:constants (
"="
"transition:true"
"transition:false"))
"rest"
"dict"
"style"
"transition"))
"parse-retry-spec"
(code :arity 1
:bytecode (16 0 52 0 0 1 33 4 0 2 32 62 0 16 0 1 2 0 52 1 0 2 17 1 1 4 0 16 1 52 5 0 1 1 6 0 16 1 1 9 0 52 8 0 2 1 10 0 52 7 0 2 1 11 0 16 1 1 12 0 52 8 0 2 1 13 0 52 7 0 2 52 3 0 6 50)
:constants (
"nil?"
"split"
":"
"dict"
"strategy"
"first"
"start-ms"
"parse-int"
"nth"
1
1000
"cap-ms"
2
30000))
"next-retry-ms"
(code :arity 2
:bytecode (16 0 1 2 0 52 1 0 2 16 1 52 0 0 2 50)
:constants (
"min"
"*"
2))
"filter-params"
(code :arity 2
:bytecode (16 0 52 0 0 1 33 5 0 16 1 32 116 0 16 0 1 2 0 52 1 0 2 33 7 0 52 3 0 0 32 97 0 16 0 1 4 0 52 1 0 2 33 5 0 16 1 32 80 0 16 0 1 6 0 52 5 0 2 33 39 0 20 8 0 16 0 1 11 0 52 10 0 2 1 12 0 52 9 0 2 52 7 0 2 17 2 51 14 0 1 2 16 1 52 13 0 2 32 29 0 20 8 0 16 0 1 12 0 52 9 0 2 52 7 0 2 17 2 51 15 0 1 2 16 1 52 13 0 2 50)
:constants (
"nil?"
"="
"none"
"list"
"*"
"starts-with?"
"not "
"map"
"trim"
"split"
"slice"
4
","
"filter"
(code :arity 1 :upvalue-count 1
:bytecode (18 0 16 0 52 2 0 1 52 1 0 2 52 0 0 1 50)
:constants (
"not"
"contains?"
"first"))
(code :arity 1 :upvalue-count 1
:bytecode (18 0 16 0 52 1 0 1 52 0 0 2 50)
:constants (
"contains?"
"first"))))
"resolve-target"
(code :arity 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 52 2 0 1 6 34 10 0 5 16 1 1 4 0 52 3 0 2 33 5 0 16 0 32 29 0 16 1 1 5 0 52 3 0 2 33 10 0 20 6 0 16 0 49 1 32 7 0 20 7 0 16 1 49 1 50)
:constants (
"dom-get-attr"
"sx-target"
"nil?"
"="
"this"
"closest"
"dom-parent"
"dom-query"))
"apply-optimistic"
(code :arity 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 52 2 0 1 33 4 0 2 32 191 0 20 3 0 16 0 48 1 6 34 3 0 5 16 0 17 2 1 5 0 16 2 1 6 0 16 1 52 4 0 4 17 3 16 1 1 8 0 52 7 0 2 33 50 0 16 3 1 10 0 20 11 0 16 2 1 10 0 48 2 52 9 0 3 5 20 12 0 16 2 1 10 0 1 13 0 48 3 5 20 12 0 16 2 1 14 0 1 15 0 48 3 32 94 0 16 1 1 16 0 52 7 0 2 33 34 0 16 3 1 17 0 20 18 0 16 2 1 17 0 48 2 52 9 0 3 5 20 19 0 16 2 1 17 0 3 48 3 32 48 0 16 1 1 21 0 52 20 0 2 33 35 0 16 1 1 23 0 52 22 0 2 17 4 16 3 1 24 0 16 4 52 9 0 3 5 20 25 0 16 2 16 4 48 2 32 1 0 2 5 16 3 50)
:constants (
"dom-get-attr"
"sx-optimistic"
"nil?"
"resolve-target"
"dict"
"target"
"directive"
"="
"remove"
"dict-set!"
"opacity"
"dom-get-style"
"dom-set-style"
"0"
"pointer-events"
"none"
"disable"
"disabled"
"dom-get-prop"
"dom-set-prop"
"starts-with?"
"add-class:"
"slice"
10
"add-class"
"dom-add-class"))
"revert-optimistic"
(code :arity 1
:bytecode (16 0 33 153 0 16 0 1 1 0 52 0 0 2 17 1 16 0 1 2 0 52 0 0 2 17 2 16 2 1 4 0 52 3 0 2 33 44 0 20 5 0 16 1 1 6 0 16 0 1 6 0 52 0 0 2 6 34 4 0 5 1 7 0 48 3 5 20 5 0 16 1 1 8 0 1 7 0 49 3 32 72 0 16 2 1 9 0 52 3 0 2 33 28 0 20 10 0 16 1 1 11 0 16 0 1 11 0 52 0 0 2 6 34 2 0 5 4 49 3 32 32 0 16 0 1 12 0 52 0 0 2 33 19 0 20 13 0 16 1 16 0 1 12 0 52 0 0 2 49 2 32 1 0 2 32 1 0 2 50)
:constants (
"get"
"target"
"directive"
"="
"remove"
"dom-set-style"
"opacity"
""
"pointer-events"
"disable"
"dom-set-prop"
"disabled"
"add-class"
"dom-remove-class"))
"find-oob-swaps"
(code :arity 1
:bytecode (52 0 0 0 17 1 51 2 0 1 0 1 1 1 3 0 1 4 0 52 0 0 2 52 1 0 2 5 16 1 50)
:constants (
"list"
"for-each"
(code :arity 1 :upvalue-count 2
:bytecode (20 0 0 18 0 1 2 0 16 0 1 3 0 52 1 0 3 48 2 17 1 51 5 0 1 0 0 1 16 1 52 4 0 2 50)
:constants (
"dom-query-all"
"str"
"["
"]"
"for-each"
(code :arity 1 :upvalue-count 2
:bytecode (20 0 0 16 0 18 0 48 2 6 34 4 0 5 1 1 0 17 1 20 2 0 16 0 48 1 17 2 20 3 0 16 0 18 0 48 2 5 16 2 33 29 0 20 4 0 18 1 1 6 0 16 0 1 7 0 16 1 1 8 0 16 2 52 5 0 6 49 2 32 1 0 2 50)
:constants (
"dom-get-attr"
"outerHTML"
"dom-id"
"dom-remove-attr"
"append!"
"dict"
"element"
"swap-type"
"target-id"))))
"sx-swap-oob"
"hx-swap-oob"))
"morph-node"
(code :arity 2
:bytecode (20 0 0 16 0 1 1 0 48 2 6 34 11 0 5 20 0 0 16 0 1 2 0 48 2 33 4 0 2 32 137 1 20 0 0 16 0 1 3 0 48 2 6 33 55 0 5 20 4 0 16 0 1 5 0 48 2 6 33 40 0 5 20 0 0 16 1 1 3 0 48 2 6 33 25 0 5 20 7 0 16 0 1 3 0 48 2 20 7 0 16 1 1 3 0 48 2 52 6 0 2 33 12 0 20 8 0 16 0 16 1 49 2 32 53 1 20 10 0 16 0 48 1 20 10 0 16 1 48 1 52 6 0 2 52 9 0 1 6 34 23 0 5 20 11 0 16 0 48 1 20 11 0 16 1 48 1 52 6 0 2 52 9 0 1 33 24 0 20 12 0 20 13 0 16 0 48 1 20 14 0 16 1 48 1 16 0 49 3 32 233 0 20 10 0 16 0 48 1 1 15 0 52 6 0 2 6 34 15 0 5 20 10 0 16 0 48 1 1 16 0 52 6 0 2 33 46 0 20 17 0 16 0 48 1 20 17 0 16 1 48 1 52 6 0 2 52 9 0 1 33 17 0 20 18 0 16 0 20 17 0 16 1 48 1 49 2 32 1 0 2 32 151 0 20 10 0 16 0 48 1 1 19 0 52 6 0 2 33 133 0 20 0 0 16 0 1 3 0 48 2 6 33 44 0 5 20 0 0 16 1 1 3 0 48 2 6 33 29 0 5 20 7 0 16 0 1 3 0 48 2 20 7 0 16 1 1 3 0 48 2 52 6 0 2 52 9 0 1 33 18 0 20 20 0 16 0 48 1 5 20 21 0 16 0 48 1 32 1 0 2 5 20 22 0 16 0 16 1 48 2 5 20 23 0 16 0 48 1 6 33 8 0 5 20 24 0 16 0 48 1 52 9 0 1 33 12 0 20 25 0 16 0 16 1 49 2 32 1 0 2 32 1 0 2 50)
:constants (
"dom-has-attr?"
"sx-preserve"
"sx-ignore"
"data-sx-island"
"is-processed?"
"island-hydrated"
"="
"dom-get-attr"
"morph-island-children"
"not"
"dom-node-type"
"dom-node-name"
"dom-replace-child"
"dom-parent"
"dom-clone"
3
8
"dom-text-content"
"dom-set-text-content"
1
"dispose-island"
"dispose-islands-in"
"sync-attrs"
"dom-is-active-element?"
"dom-is-input-element?"
"morph-children"))
"sync-attrs"
(code :arity 2
:bytecode (20 0 0 16 0 1 1 0 48 2 6 34 4 0 5 1 2 0 17 2 16 2 52 3 0 1 33 7 0 52 4 0 0 32 9 0 16 2 1 6 0 52 5 0 2 17 3 51 8 0 1 0 1 3 20 9 0 16 1 48 1 52 7 0 2 5 51 10 0 1 1 1 3 1 0 20 9 0 16 0 48 1 52 7 0 2 50)
:constants (
"dom-get-attr"
"data-sx-reactive-attrs"
""
"empty?"
"list"
"split"
","
"for-each"
(code :arity 1 :upvalue-count 2
:bytecode (16 0 52 0 0 1 17 1 16 0 1 2 0 52 1 0 2 17 2 20 5 0 18 0 16 1 48 2 16 2 52 4 0 2 52 3 0 1 6 33 13 0 5 18 1 16 1 52 6 0 2 52 3 0 1 33 14 0 20 7 0 18 0 16 1 16 2 49 3 32 1 0 2 50)
:constants (
"first"
"nth"
1
"not"
"="
"dom-get-attr"
"contains?"
"dom-set-attr"))
"dom-attr-list"
(code :arity 1 :upvalue-count 3
:bytecode (16 0 52 0 0 1 17 1 20 2 0 18 0 16 1 48 2 52 1 0 1 6 33 31 0 5 18 1 16 1 52 3 0 2 52 1 0 1 6 33 14 0 5 16 1 1 5 0 52 4 0 2 52 1 0 1 33 12 0 20 6 0 18 2 16 1 49 2 32 1 0 2 50)
:constants (
"first"
"not"
"dom-has-attr?"
"contains?"
"="
"data-sx-reactive-attrs"
"dom-remove-attr"))))
"morph-children"
(code :arity 2
:bytecode (20 0 0 16 0 48 1 17 2 20 0 0 16 1 48 1 17 3 51 2 0 52 3 0 0 16 2 52 1 0 3 17 4 1 4 0 17 5 51 6 0 1 4 1 5 1 2 1 0 16 3 52 5 0 2 5 51 7 0 1 5 1 2 1 0 16 5 16 2 52 9 0 1 52 8 0 2 52 5 0 2 50)
:constants (
"dom-child-list"
"reduce"
(code :arity 2
:bytecode (20 0 0 16 1 48 1 17 2 16 2 33 16 0 16 0 16 2 16 1 52 1 0 3 5 16 0 32 2 0 16 0 50)
:constants (
"dom-id"
"dict-set!"))
"dict"
0
"for-each"
(code :arity 1 :upvalue-count 4
:bytecode (20 0 0 16 0 48 1 17 1 16 1 33 11 0 18 0 16 1 52 1 0 2 32 1 0 2 17 2 16 2 6 33 11 0 5 16 2 52 3 0 1 52 2 0 1 33 100 0 18 1 18 2 52 5 0 1 52 4 0 2 6 33 19 0 5 16 2 18 2 18 1 52 7 0 2 52 6 0 2 52 2 0 1 33 39 0 20 8 0 18 3 16 2 18 1 18 2 52 5 0 1 52 4 0 2 33 11 0 18 2 18 1 52 7 0 2 32 1 0 2 48 3 32 1 0 2 5 20 9 0 16 2 16 0 48 2 5 18 1 52 10 0 1 19 1 32 100 0 18 1 18 2 52 5 0 1 52 4 0 2 33 71 0 18 2 18 1 52 7 0 2 17 3 20 0 0 16 3 48 1 6 33 7 0 5 16 1 52 2 0 1 33 19 0 20 8 0 18 3 20 11 0 16 0 48 1 16 3 49 3 32 18 0 20 9 0 16 3 16 0 48 2 5 18 1 52 10 0 1 19 1 32 14 0 20 12 0 18 3 20 11 0 16 0 48 1 49 2 50)
:constants (
"dom-id"
"dict-get"
"not"
"nil?"
"<"
"len"
"="
"nth"
"dom-insert-before"
"morph-node"
"inc"
"dom-clone"
"dom-append"))
(code :arity 1 :upvalue-count 3
:bytecode (16 0 18 0 52 0 0 2 33 76 0 18 1 16 0 52 1 0 2 17 1 20 2 0 16 1 18 2 48 2 6 33 34 0 5 20 4 0 16 1 1 5 0 48 2 52 3 0 1 6 33 15 0 5 20 4 0 16 1 1 6 0 48 2 52 3 0 1 33 12 0 20 7 0 18 2 16 1 49 2 32 1 0 2 32 1 0 2 50)
:constants (
">="
"nth"
"dom-is-child-of?"
"not"
"dom-has-attr?"
"sx-preserve"
"sx-ignore"
"dom-remove-child"))
"range"
"len"))
"morph-island-children"
(code :arity 2
:bytecode (20 0 0 16 0 1 1 0 48 2 17 2 20 0 0 16 1 1 1 0 48 2 17 3 20 0 0 16 0 1 2 0 48 2 17 4 20 0 0 16 1 1 2 0 48 2 17 5 52 3 0 0 17 6 52 3 0 0 17 7 51 5 0 1 6 16 3 52 4 0 2 5 51 6 0 1 7 16 5 52 4 0 2 5 51 7 0 1 6 16 2 52 4 0 2 5 51 8 0 1 7 1 0 16 4 52 4 0 2 5 20 9 0 16 1 49 1 50)
:constants (
"dom-query-all"
"[data-sx-lake]"
"[data-sx-marsh]"
"dict"
"for-each"
(code :arity 1 :upvalue-count 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 33 13 0 18 0 16 1 16 0 52 2 0 3 32 1 0 2 50)
:constants (
"dom-get-attr"
"data-sx-lake"
"dict-set!"))
(code :arity 1 :upvalue-count 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 33 13 0 18 0 16 1 16 0 52 2 0 3 32 1 0 2 50)
:constants (
"dom-get-attr"
"data-sx-marsh"
"dict-set!"))
(code :arity 1 :upvalue-count 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 18 0 16 1 52 2 0 2 17 2 16 2 33 22 0 20 3 0 16 0 16 2 48 2 5 20 4 0 16 0 16 2 49 2 32 1 0 2 50)
:constants (
"dom-get-attr"
"data-sx-lake"
"dict-get"
"sync-attrs"
"morph-children"))
(code :arity 1 :upvalue-count 2
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 18 0 16 1 52 2 0 2 17 2 16 2 33 14 0 20 3 0 16 0 16 2 18 1 49 3 32 1 0 2 50)
:constants (
"dom-get-attr"
"data-sx-marsh"
"dict-get"
"morph-marsh"))
"process-signal-updates"))
"morph-marsh"
(code :arity 3
:bytecode (20 0 0 16 0 1 1 0 48 2 17 3 20 0 0 16 0 1 2 0 48 2 17 4 20 3 0 16 1 48 1 17 5 16 4 6 33 18 0 5 16 5 6 33 11 0 5 16 5 52 5 0 1 52 4 0 1 33 61 0 20 6 0 16 5 48 1 17 6 16 3 33 16 0 20 7 0 16 3 16 6 52 8 0 1 48 2 32 2 0 16 6 17 7 20 9 0 16 0 48 1 5 20 10 0 16 0 51 11 0 1 7 1 4 1 0 49 2 32 19 0 20 12 0 16 0 16 1 48 2 5 20 13 0 16 0 16 1 49 2 50)
:constants (
"dom-get-data"
"sx-marsh-transform"
"sx-marsh-env"
"dom-inner-html"
"not"
"empty?"
"parse"
"cek-call"
"list"
"dispose-marsh-scope"
"with-marsh-scope"
(code :upvalue-count 3
:bytecode (20 0 0 18 0 18 1 2 48 3 17 0 20 1 0 18 2 2 48 2 5 20 2 0 18 2 16 0 49 2 50)
:constants (
"render-to-dom"
"dom-remove-children-after"
"dom-append"))
"sync-attrs"
"morph-children"))
"process-signal-updates"
(code :arity 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 51 3 0 16 1 52 2 0 2 50)
:constants (
"dom-query-all"
"[data-sx-signal]"
"for-each"
(code :arity 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 33 94 0 16 1 1 3 0 52 2 0 2 17 2 16 2 1 5 0 52 4 0 2 33 67 0 16 1 1 5 0 16 2 52 6 0 3 17 3 16 1 16 2 1 8 0 52 7 0 2 52 6 0 2 17 4 20 9 0 16 4 48 1 17 5 20 10 0 20 11 0 16 3 48 1 16 5 48 2 5 20 12 0 16 0 1 1 0 49 2 32 1 0 2 32 1 0 2 50)
:constants (
"dom-get-attr"
"data-sx-signal"
"index-of"
":"
">"
0
"slice"
"+"
1
"json-parse"
"reset!"
"use-store"
"dom-remove-attr"))))
"swap-dom-nodes"
(code :arity 3
:bytecode (16 2 6 1 0 0 52 1 0 2 33 56 0 5 20 2 0 16 1 48 1 33 12 0 20 3 0 16 0 16 1 49 2 32 30 0 20 4 0 1 5 0 2 48 2 17 3 20 6 0 16 3 16 1 48 2 5 20 3 0 16 0 16 3 49 2 32 73 1 6 1 7 0 52 1 0 2 33 117 0 5 20 8 0 16 0 48 1 17 3 20 9 0 16 1 48 1 17 4 20 2 0 16 1 48 1 33 71 0 20 10 0 16 1 48 1 17 5 16 5 33 45 0 20 9 0 16 5 48 1 17 4 5 20 11 0 16 3 16 4 16 0 48 3 5 20 12 0 16 5 48 1 17 6 20 13 0 16 3 16 4 16 6 48 3 32 9 0 20 14 0 16 3 16 0 48 2 32 11 0 20 11 0 16 3 16 4 16 0 48 3 5 16 4 32 201 0 6 1 15 0 52 1 0 2 33 13 0 5 20 16 0 16 0 16 1 49 2 32 177 0 6 1 17 0 52 1 0 2 33 13 0 5 20 6 0 16 0 16 1 49 2 32 153 0 6 1 18 0 52 1 0 2 33 13 0 5 20 19 0 16 0 16 1 49 2 32 129 0 6 1 20 0 52 1 0 2 33 20 0 5 20 21 0 20 8 0 16 0 48 1 16 1 16 0 49 3 32 98 0 6 1 22 0 52 1 0 2 33 18 0 5 20 14 0 20 8 0 16 0 48 1 16 0 49 2 32 69 0 6 1 23 0 52 1 0 2 33 5 0 5 2 32 53 0 5 20 2 0 16 1 48 1 33 12 0 20 3 0 16 0 16 1 49 2 32 30 0 20 4 0 1 5 0 2 48 2 17 3 20 6 0 16 3 16 1 48 2 5 20 3 0 16 0 16 3 49 2 50)
:constants (
"innerHTML"
"="
"dom-is-fragment?"
"morph-children"
"dom-create-element"
"div"
"dom-append"
"outerHTML"
"dom-parent"
"dom-clone"
"dom-first-child"
"dom-replace-child"
"dom-next-sibling"
"insert-remaining-siblings"
"dom-remove-child"
"afterend"
"dom-insert-after"
"beforeend"
"afterbegin"
"dom-prepend"
"beforebegin"
"dom-insert-before"
"delete"
"none"))
"insert-remaining-siblings"
(code :arity 3
:bytecode (16 2 33 33 0 20 0 0 16 2 48 1 17 3 20 1 0 16 1 16 2 48 2 5 20 2 0 16 0 16 2 16 3 49 3 32 1 0 2 50)
:constants (
"dom-next-sibling"
"dom-insert-after"
"insert-remaining-siblings"))
"swap-html-string"
(code :arity 3
:bytecode (16 2 6 1 0 0 52 1 0 2 33 13 0 5 20 2 0 16 0 16 1 49 2 32 212 0 6 1 3 0 52 1 0 2 33 38 0 5 20 4 0 16 0 48 1 17 3 20 5 0 16 0 1 6 0 16 1 48 3 5 20 7 0 16 3 16 0 48 2 5 16 3 32 163 0 6 1 6 0 52 1 0 2 33 16 0 5 20 5 0 16 0 1 6 0 16 1 49 3 32 136 0 6 1 8 0 52 1 0 2 33 16 0 5 20 5 0 16 0 1 8 0 16 1 49 3 32 109 0 6 1 9 0 52 1 0 2 33 16 0 5 20 5 0 16 0 1 9 0 16 1 49 3 32 82 0 6 1 10 0 52 1 0 2 33 16 0 5 20 5 0 16 0 1 10 0 16 1 49 3 32 55 0 6 1 11 0 52 1 0 2 33 18 0 5 20 7 0 20 4 0 16 0 48 1 16 0 49 2 32 26 0 6 1 12 0 52 1 0 2 33 5 0 5 2 32 10 0 5 20 2 0 16 0 16 1 49 2 50)
:constants (
"innerHTML"
"="
"dom-set-inner-html"
"outerHTML"
"dom-parent"
"dom-insert-adjacent-html"
"afterend"
"dom-remove-child"
"beforeend"
"afterbegin"
"beforebegin"
"delete"
"none"))
"handle-history"
(code :arity 3
:bytecode (20 0 0 16 0 1 1 0 48 2 17 3 20 0 0 16 0 1 2 0 48 2 17 4 16 2 1 4 0 52 3 0 2 17 5 16 5 33 10 0 20 5 0 16 5 49 1 32 101 0 16 3 6 33 14 0 5 16 3 1 8 0 52 7 0 2 52 6 0 1 33 27 0 20 9 0 16 3 1 10 0 52 7 0 2 33 5 0 16 1 32 2 0 16 3 49 1 32 51 0 16 4 6 33 14 0 5 16 4 1 8 0 52 7 0 2 52 6 0 1 33 27 0 20 5 0 16 4 1 10 0 52 7 0 2 33 5 0 16 1 32 2 0 16 4 49 1 32 1 0 2 50)
:constants (
"dom-get-attr"
"sx-push-url"
"sx-replace-url"
"get"
"replace-url"
"browser-replace-state"
"not"
"="
"false"
"browser-push-state"
"true"))
"PRELOAD_TTL"
30000
"preload-cache-get"
(code :arity 2
:bytecode (16 0 16 1 52 0 0 2 17 2 16 2 52 1 0 1 33 4 0 2 32 52 0 20 4 0 48 0 16 2 1 6 0 52 5 0 2 52 3 0 2 20 7 0 52 2 0 2 33 13 0 16 0 16 1 52 8 0 2 5 2 32 11 0 16 0 16 1 52 8 0 2 5 16 2 50)
:constants (
"dict-get"
"nil?"
">"
"-"
"now-ms"
"get"
"timestamp"
"PRELOAD_TTL"
"dict-delete!"))
"preload-cache-set"
(code :arity 4
:bytecode (16 0 16 1 1 2 0 16 2 1 3 0 16 3 1 4 0 20 5 0 48 0 52 1 0 6 52 0 0 3 50)
:constants (
"dict-set!"
"dict"
"text"
"content-type"
"timestamp"
"now-ms"))
"classify-trigger"
(code :arity 1
:bytecode (16 0 1 1 0 52 0 0 2 17 1 16 1 1 3 0 52 2 0 2 33 6 0 1 4 0 32 57 0 16 1 1 5 0 52 2 0 2 33 6 0 1 5 0 32 39 0 16 1 1 6 0 52 2 0 2 33 6 0 1 6 0 32 21 0 16 1 1 7 0 52 2 0 2 33 6 0 1 7 0 32 3 0 1 1 0 50)
:constants (
"get"
"event"
"="
"every"
"poll"
"intersect"
"load"
"revealed"))
"should-boost-link?"
(code :arity 1
:bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 6 33 119 0 5 16 1 1 4 0 52 3 0 2 52 2 0 1 6 33 101 0 5 16 1 1 5 0 52 3 0 2 52 2 0 1 6 33 83 0 5 16 1 1 6 0 52 3 0 2 52 2 0 1 6 33 65 0 5 20 7 0 16 1 48 1 6 33 53 0 5 20 8 0 16 0 1 9 0 48 2 52 2 0 1 6 33 34 0 5 20 8 0 16 0 1 10 0 48 2 52 2 0 1 6 33 15 0 5 20 8 0 16 0 1 11 0 48 2 52 2 0 1 50)
:constants (
"dom-get-attr"
"href"
"not"
"starts-with?"
"#"
"javascript:"
"mailto:"
"browser-same-origin?"
"dom-has-attr?"
"sx-get"
"sx-post"
"sx-disable"))
"should-boost-form?"
(code :arity 1
:bytecode (20 1 0 16 0 1 2 0 48 2 52 0 0 1 6 33 34 0 5 20 1 0 16 0 1 3 0 48 2 52 0 0 1 6 33 15 0 5 20 1 0 16 0 1 4 0 48 2 52 0 0 1 50)
:constants (
"not"
"dom-has-attr?"
"sx-get"
"sx-post"
"sx-disable"))
"parse-sse-swap"
(code :arity 1
:bytecode (20 0 0 16 0 1 1 0 48 2 6 34 4 0 5 1 2 0 50)
:constants (
"dom-get-attr"
"sx-sse-swap"
"message")))))
Reference in New Issue View Git Blame Copy Permalink