giles
7b4c918773
All 26 browser modules recompiled with define-library/import forms. Compilation works without vm-compile-adapter (JIT pre-compilation hangs with library wrappers in some JIT paths — skipped for now, CEK compilation is ~34s total). Key fixes: - eval command: import-aware loop that handles define-library/import locally without touching the Python bridge pipe (avoids deadlock) - compile-modules.js: skip vm-compile-adapter, bump timeout 2621/2621 OCaml tests passing. Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
4 lines
7.3 KiB
Plaintext
4 lines
7.3 KiB
Plaintext
(sxbc 1 "a46bdc825a390880"
|
|
(code
|
|
:constants ("define-library" "sx" "harness" "export" "assert" "assert=" "default-platform" "make-harness" "harness-reset!" "harness-log" "harness-get" "harness-set!" "make-interceptor" "install-interceptors" "io-calls" "io-call-count" "io-call-nth" "io-call-args" "io-call-result" "assert-io-called" "assert-no-io" "assert-io-count" "assert-io-args" "assert-io-result" "assert-state" {:upvalue-count 0 :arity 2 :constants ("not" "error" "Assertion failed") :bytecode (16 0 52 0 0 1 33 17 0 16 1 6 34 4 0 5 1 2 0 52 1 0 1 32 1 0 2 50)} {:upvalue-count 0 :arity 3 :constants ("not" "=" "error" "str" "Expected " ", got ") :bytecode (16 0 16 1 52 1 0 2 52 0 0 1 33 28 0 16 2 6 34 15 0 5 1 4 0 16 1 1 5 0 16 0 52 3 0 4 52 2 0 1 32 1 0 2 50)} "current-user" {:upvalue-count 0 :arity 0 :constants () :bytecode (2 50)} "csrf-token" {:upvalue-count 0 :arity 0 :constants ("test-csrf-token") :bytecode (1 0 0 50)} "app-url" {:upvalue-count 0 :arity 2 :constants ("/mock-app-url") :bytecode (1 0 0 50)} "frag" {:upvalue-count 0 :arity 3 :constants ("") :bytecode (1 0 0 50)} "sleep" {:upvalue-count 0 :arity 1 :constants () :bytecode (2 50)} "local-storage-set" {:upvalue-count 0 :arity 2 :constants () :bytecode (2 50)} "set-cookie" {:upvalue-count 0 :arity 3 :constants () :bytecode (2 50)} "url-for" {:upvalue-count 0 :arity 2 :constants ("/mock-url") :bytecode (1 0 0 50)} "create-element" "request-path" {:upvalue-count 0 :arity 0 :constants ("/") :bytecode (1 0 0 50)} "config" "set-attr" "set-text" "remove-child" "fetch" {:upvalue-count 0 :arity 2 :constants ("status" 200 "body" "" "ok") :bytecode (1 0 0 1 1 0 1 2 0 1 3 0 1 4 0 3 65 3 0 50)} "query" {:upvalue-count 0 :arity 3 :constants ("list") :bytecode (52 0 0 0 50)} "add-class" "get-element" "now" {:upvalue-count 0 :arity 0 :constants (0) :bytecode (1 0 0 50)} "abort" "action" {:upvalue-count 0 :arity 3 :constants ("ok") :bytecode (1 0 0 3 65 1 0 50)} "remove-class" "append-child" "request-arg" "emit-dom" "local-storage-get" "get-cookie" {:upvalue-count 0 :arity 1 :constants ("nil?" "default-platform" "merge" "log" "list" "platform" "state" "cookies" "storage" "dom") :bytecode (16 0 52 0 0 1 33 6 0 20 1 0 32 9 0 20 1 0 16 0 52 2 0 2 17 1 1 3 0 52 4 0 0 1 5 0 16 1 1 6 0 1 7 0 65 0 0 1 8 0 65 0 0 1 9 0 2 65 3 0 65 3 0 50)} {:upvalue-count 0 :arity 1 :constants ("dict-set!" "log" "list" "state" "cookies" "storage" "dom") :bytecode (16 0 1 1 0 52 2 0 0 52 0 0 3 5 16 0 1 3 0 1 4 0 65 0 0 1 5 0 65 0 0 1 6 0 2 65 3 0 52 0 0 3 5 16 0 50)} {:upvalue-count 0 :arity 2 :constants ("get" "log" "nil?" "filter" {:upvalue-count 1 :arity 1 :constants ("=" "get" "op") :bytecode (16 0 1 2 0 52 1 0 2 18 0 52 0 0 2 50)}) :bytecode (16 0 1 1 0 52 0 0 2 17 2 16 1 52 2 0 1 33 5 0 16 2 32 11 0 51 4 0 1 1 16 2 52 3 0 2 50)} {:upvalue-count 0 :arity 2 :constants ("get" "state") :bytecode (16 0 1 1 0 52 0 0 2 16 1 52 0 0 2 50)} {:upvalue-count 0 :arity 3 :constants ("dict-set!" "get" "state") :bytecode (16 0 1 2 0 52 1 0 2 16 1 16 2 52 0 0 3 5 2 50)} {:upvalue-count 0 :arity 3 :constants ({:upvalue-count 3 :arity 1 :constants ("empty?" "=" 1 "len" "first" 2 "nth" 3 "apply" "get" "log" "append!" "args" "result" "op") :bytecode (16 0 52 0 0 1 33 7 0 18 0 48 0 32 122 0 1 2 0 16 0 52 3 0 1 52 1 0 2 33 13 0 18 0 16 0 52 4 0 1 48 1 32 93 0 1 5 0 16 0 52 3 0 1 52 1 0 2 33 22 0 18 0 16 0 52 4 0 1 16 0 1 2 0 52 6 0 2 48 2 32 55 0 1 7 0 16 0 52 3 0 1 52 1 0 2 33 31 0 18 0 16 0 52 4 0 1 16 0 1 2 0 52 6 0 2 16 0 1 5 0 52 6 0 2 48 3 32 8 0 18 0 16 0 52 8 0 2 17 1 18 1 1 10 0 52 9 0 2 17 2 16 2 1 12 0 16 0 1 13 0 16 1 1 14 0 18 2 65 3 0 52 11 0 2 5 16 1 50)}) :bytecode (51 0 0 1 2 1 0 1 1 50)} {:upvalue-count 0 :arity 2 :constants ("for-each" {:upvalue-count 2 :arity 1 :constants ("get" "platform" "make-interceptor" "env-bind!") :bytecode (18 0 1 1 0 52 0 0 2 16 0 52 0 0 2 17 1 20 2 0 18 0 16 0 16 1 48 3 17 2 18 1 16 0 16 2 52 3 0 3 50)} "keys" "get" "platform") :bytecode (51 1 0 1 0 1 1 16 0 1 4 0 52 3 0 2 52 2 0 1 52 0 0 2 5 16 1 50)} {:upvalue-count 0 :arity 2 :constants ("filter" {:upvalue-count 1 :arity 1 :constants ("=" "get" "op") :bytecode (16 0 1 2 0 52 1 0 2 18 0 52 0 0 2 50)} "get" "log") :bytecode (51 1 0 1 1 16 0 1 3 0 52 2 0 2 52 0 0 2 50)} {:upvalue-count 0 :arity 2 :constants ("len" "io-calls") :bytecode (20 1 0 16 0 16 1 48 2 52 0 0 1 50)} {:upvalue-count 0 :arity 3 :constants ("io-calls" "<" "len" "nth") :bytecode (20 0 0 16 0 16 1 48 2 17 3 16 2 16 3 52 2 0 1 52 1 0 2 33 11 0 16 3 16 2 52 3 0 2 32 1 0 2 50)} {:upvalue-count 0 :arity 3 :constants ("io-call-nth" "nil?" "get" "args") :bytecode (20 0 0 16 0 16 1 16 2 48 3 17 3 16 3 52 1 0 1 33 4 0 2 32 9 0 16 3 1 3 0 52 2 0 2 50)} {:upvalue-count 0 :arity 3 :constants ("io-call-nth" "nil?" "get" "result") :bytecode (20 0 0 16 0 16 1 16 2 48 3 17 3 16 3 52 1 0 1 33 4 0 2 32 9 0 16 3 1 3 0 52 2 0 2 50)} {:upvalue-count 0 :arity 2 :constants ("assert" ">" "io-call-count" 0 "str" "Expected IO operation " " to be called but it was not") :bytecode (20 0 0 20 2 0 16 0 16 1 48 2 1 3 0 52 1 0 2 1 5 0 16 1 1 6 0 52 4 0 3 49 2 50)} {:upvalue-count 0 :arity 2 :constants ("assert" "=" "io-call-count" 0 "str" "Expected IO operation " " not to be called but it was called " " time(s)") :bytecode (20 0 0 20 2 0 16 0 16 1 48 2 1 3 0 52 1 0 2 1 5 0 16 1 1 6 0 20 2 0 16 0 16 1 48 2 1 7 0 52 4 0 5 49 2 50)} {:upvalue-count 0 :arity 3 :constants ("io-call-count" "assert" "=" "str" "Expected " " to be called " " time(s) but was called " " time(s)") :bytecode (20 0 0 16 0 16 1 48 2 17 3 20 1 0 16 3 16 2 52 2 0 2 1 4 0 16 1 1 5 0 16 2 1 6 0 16 3 1 7 0 52 3 0 7 49 2 50)} {:upvalue-count 0 :arity 4 :constants ("io-call-args" "assert" "equal?" "str" "Expected call " " to " " with args " " but got ") :bytecode (20 0 0 16 0 16 1 16 2 48 3 17 4 20 1 0 16 4 16 3 52 2 0 2 1 4 0 16 2 1 5 0 16 1 1 6 0 16 3 52 3 0 1 1 7 0 16 4 52 3 0 1 52 3 0 8 49 2 50)} {:upvalue-count 0 :arity 4 :constants ("io-call-result" "assert" "equal?" "str" "Expected call " " to " " to return " " but got ") :bytecode (20 0 0 16 0 16 1 16 2 48 3 17 4 20 1 0 16 4 16 3 52 2 0 2 1 4 0 16 2 1 5 0 16 1 1 6 0 16 3 52 3 0 1 1 7 0 16 4 52 3 0 1 52 3 0 8 49 2 50)} {:upvalue-count 0 :arity 3 :constants ("harness-get" "assert" "equal?" "str" "Expected state " " to be " " but got ") :bytecode (20 0 0 16 0 16 1 48 2 17 3 20 1 0 16 3 16 2 52 2 0 2 1 4 0 16 1 1 5 0 16 2 52 3 0 1 1 6 0 16 3 52 3 0 1 52 3 0 6 49 2 50)} "import") :bytecode (20 0 0 20 1 0 20 2 0 48 1 20 3 0 20 4 0 20 5 0 20 6 0 20 7 0 20 8 0 20 9 0 20 10 0 20 11 0 20 12 0 20 13 0 20 14 0 20 15 0 20 16 0 20 17 0 20 18 0 20 19 0 20 20 0 20 21 0 20 22 0 20 23 0 20 24 0 48 21 51 25 0 128 4 0 5 51 26 0 128 5 0 5 1 27 0 51 28 0 1 29 0 51 30 0 1 31 0 51 32 0 1 33 0 51 34 0 1 35 0 51 36 0 1 37 0 51 38 0 1 39 0 51 40 0 1 41 0 51 42 0 1 43 0 51 36 0 1 44 0 51 45 0 1 46 0 51 36 0 1 47 0 51 40 0 1 48 0 51 38 0 1 49 0 51 38 0 1 50 0 51 51 0 1 52 0 51 53 0 1 54 0 51 38 0 1 55 0 51 36 0 1 56 0 51 57 0 1 58 0 51 36 0 1 59 0 51 60 0 1 61 0 51 38 0 1 62 0 51 38 0 1 63 0 51 36 0 1 64 0 51 38 0 1 65 0 51 36 0 1 66 0 51 36 0 65 27 0 128 6 0 5 51 67 0 128 7 0 5 51 68 0 128 8 0 5 51 69 0 128 9 0 5 51 70 0 128 10 0 5 51 71 0 128 11 0 5 51 72 0 128 12 0 5 51 73 0 128 13 0 5 51 74 0 128 14 0 5 51 75 0 128 15 0 5 51 76 0 128 16 0 5 51 77 0 128 17 0 5 51 78 0 128 18 0 5 51 79 0 128 19 0 5 51 80 0 128 20 0 5 51 81 0 128 21 0 5 51 82 0 128 22 0 5 51 83 0 128 23 0 5 51 84 0 128 24 0 48 3 5 20 85 0 20 1 0 20 2 0 48 1 48 1 50)))
|