diff --git a/shared/static/wasm/sx/hs-compiler.sx b/shared/static/wasm/sx/hs-compiler.sx index 3ae4c062..4d19ce05 100644 --- a/shared/static/wasm/sx/hs-compiler.sx +++ b/shared/static/wasm/sx/hs-compiler.sx @@ -110,47 +110,32 @@ (let ((target (if source (hs-to-sx source) (quote me)))) (let - ((compiled-body (hs-to-sx body)) - (wrapped-body - (if - catch-info + ((event-refs (if (and (list? body) (= (first body) (quote do))) (filter (fn (x) (and (list? x) (= (first x) (quote ref)))) (rest body)) (list)))) + (let + ((stripped-body (if (> (len event-refs) 0) (let ((remaining (filter (fn (x) (not (and (list? x) (= (first x) (quote ref))))) (rest body)))) (if (= (len remaining) 1) (first remaining) (cons (quote do) remaining))) body))) + (let + ((raw-compiled (hs-to-sx stripped-body))) + (let + ((compiled-body (if (> (len event-refs) 0) (let ((bindings (map (fn (r) (let ((name (nth r 1))) (list (make-symbol name) (list (quote get) (list (quote get) (quote event) "detail") name)))) event-refs))) (list (quote let) bindings raw-compiled)) raw-compiled))) (let - ((var (make-symbol (first catch-info))) - (catch-body - (hs-to-sx (nth catch-info 1)))) - (if - finally-info - (list - (quote do) + ((wrapped-body (if catch-info (let ((var (make-symbol (nth catch-info 0))) (catch-body (hs-to-sx (nth catch-info 1)))) (if finally-info (list (quote do) (list (quote guard) (list var (list true catch-body)) compiled-body) (hs-to-sx finally-info)) (list (quote guard) (list var (list true catch-body)) compiled-body))) (if finally-info (list (quote do) compiled-body (hs-to-sx finally-info)) compiled-body))) + (handler (list - (quote guard) - (list var (list true catch-body)) - compiled-body) - (hs-to-sx finally-info)) + (quote fn) + (list (quote event)) + wrapped-body))) + (if + every? (list - (quote guard) - (list var (list true catch-body)) - compiled-body))) - (if - finally-info - (list - (quote do) - compiled-body - (hs-to-sx finally-info)) - compiled-body))) - (handler - (list - (quote fn) - (list (quote event)) - wrapped-body))) - (if - every? - (list - (quote hs-on-every) - target - event-name - handler) - (list (quote hs-on) target event-name handler)))))) + (quote hs-on-every) + target + event-name + handler) + (list + (quote hs-on) + target + event-name + handler)))))))))) ((= (first items) :from) (scan-on (rest (rest items)) @@ -267,14 +252,14 @@ (if (and (> (len ast) 4) (= (nth ast 4) :index)) (list - (quote for-each) + (quote map-indexed) (list (quote fn) - (list (make-symbol var-name) (make-symbol (nth ast 5))) + (list (make-symbol (nth ast 5)) (make-symbol var-name)) body) collection) (list - (quote for-each) + (quote hs-for-each) (list (quote fn) (list (make-symbol var-name)) body) collection))))) (define @@ -364,10 +349,7 @@ (true (let ((t (hs-to-sx expr))) - (list - (quote set!) - t - (list (quote +) (list (quote or) t 0) amount))))))) + (list (quote set!) t (list (quote +) t amount))))))) (define emit-dec (fn @@ -416,10 +398,7 @@ (true (let ((t (hs-to-sx expr))) - (list - (quote set!) - t - (list (quote -) (list (quote or) t 0) amount))))))) + (list (quote set!) t (list (quote -) t amount))))))) (define emit-behavior (fn @@ -856,6 +835,22 @@ (quote dom-add-class) (hs-to-sx raw-tgt) (nth ast 1))))) + ((= head (quote set-style)) + (list + (quote dom-set-style) + (hs-to-sx (nth ast 3)) + (nth ast 1) + (nth ast 2))) + ((= head (quote set-styles)) + (let + ((pairs (nth ast 1)) (tgt (hs-to-sx (nth ast 2)))) + (cons + (quote do) + (map + (fn + (p) + (list (quote dom-set-style) tgt (first p) (nth p 1))) + pairs)))) ((= head (quote multi-add-class)) (let ((target (hs-to-sx (nth ast 1))) @@ -1002,6 +997,14 @@ (nth ast 1) (hs-to-sx (nth ast 2)) (hs-to-sx (nth ast 3)))) + ((= head (quote toggle-style-cycle)) + (list + (quote hs-toggle-style-cycle!) + (hs-to-sx (nth ast 2)) + (nth ast 1) + (cons + (quote list) + (map hs-to-sx (slice ast 3 (len ast)))))) ((= head (quote toggle-attr)) (list (quote hs-toggle-attr!) @@ -1097,6 +1100,16 @@ to-val (if dur (hs-to-sx dur) nil)))) ((= head (quote repeat)) (emit-repeat ast)) + ((= head (quote repeat-until)) + (list + (quote hs-repeat-until) + (list (quote fn) (list) (hs-to-sx (nth ast 1))) + (list (quote fn) (list) (hs-to-sx (nth ast 2))))) + ((= head (quote repeat-while)) + (list + (quote hs-repeat-while) + (list (quote fn) (list) (hs-to-sx (nth ast 1))) + (list (quote fn) (list) (hs-to-sx (nth ast 2))))) ((= head (quote fetch)) (list (quote hs-fetch) (hs-to-sx (nth ast 1)) (nth ast 2))) ((= head (quote fetch-gql)) @@ -1106,8 +1119,13 @@ (if (nth ast 2) (hs-to-sx (nth ast 2)) nil))) ((= head (quote call)) (let - ((fn-expr (hs-to-sx (nth ast 1))) - (args (map hs-to-sx (nth ast 2)))) + ((raw-fn (nth ast 1)) + (fn-expr + (if + (string? raw-fn) + (make-symbol raw-fn) + (hs-to-sx raw-fn))) + (args (map hs-to-sx (rest (rest ast))))) (cons fn-expr args))) ((= head (quote return)) (let @@ -1125,10 +1143,13 @@ ((= head (quote go)) (list (quote hs-navigate!) (hs-to-sx (nth ast 1)))) ((= head (quote append!)) - (list - (quote dom-append) - (hs-to-sx (nth ast 2)) - (hs-to-sx (nth ast 1)))) + (let + ((tgt (hs-to-sx (nth ast 2))) + (val (hs-to-sx (nth ast 1)))) + (if + (symbol? tgt) + (list (quote set!) tgt (list (quote hs-append) tgt val)) + (list (quote hs-append!) val tgt)))) ((= head (quote tell)) (let ((tgt (hs-to-sx (nth ast 1)))) @@ -1182,6 +1203,10 @@ (nth ast 1) (nth ast 2) (if (> (len ast) 3) (nth ast 3) nil))) + ((= head (quote break)) (list (quote raise) "hs-break")) + ((= head (quote continue)) + (list (quote raise) "hs-continue")) + ((= head (quote exit)) nil) ((= head (quote on)) (emit-on ast)) ((= head (quote init)) (list diff --git a/shared/static/wasm/sx/hs-compiler.sxbc b/shared/static/wasm/sx/hs-compiler.sxbc index 120e4ac0..c855c95f 100644 --- a/shared/static/wasm/sx/hs-compiler.sxbc +++ b/shared/static/wasm/sx/hs-compiler.sxbc @@ -1,3 +1,3 @@ -(sxbc 1 "831869a3733b381d" +(sxbc 1 "90446e15f3f0a660" (code - :constants ("hs-to-sx" "make-symbol" "." "%" {:upvalue-count 0 :arity 1 :constants ("hs-to-sx") :bytecode (20 0 0 16 0 49 1 50)} {:upvalue-count 1 :arity 2 :constants ("not" "list?" "list" set! "first" "=" dom-set-prop "hs-to-sx" "nth" 1 2 attr dom-set-attr style dom-set-style ref "make-symbol" local me dom-set-inner-html it query array-index host-set! of host-get) :bytecode (16 0 52 1 0 1 52 0 0 1 33 14 0 1 3 0 16 0 16 1 52 2 0 3 32 111 2 16 0 52 4 0 1 17 2 16 2 18 0 52 5 0 2 33 35 0 1 6 0 20 7 0 16 0 1 9 0 52 8 0 2 48 1 16 0 1 10 0 52 8 0 2 16 1 52 2 0 4 32 57 2 16 2 1 11 0 52 5 0 2 33 35 0 1 12 0 20 7 0 16 0 1 10 0 52 8 0 2 48 1 16 0 1 9 0 52 8 0 2 16 1 52 2 0 4 32 10 2 16 2 1 13 0 52 5 0 2 33 35 0 1 14 0 20 7 0 16 0 1 10 0 52 8 0 2 48 1 16 0 1 9 0 52 8 0 2 16 1 52 2 0 4 32 219 1 16 2 1 15 0 52 5 0 2 33 25 0 1 3 0 16 0 1 9 0 52 8 0 2 52 16 0 1 16 1 52 2 0 3 32 182 1 16 2 1 17 0 52 5 0 2 33 25 0 1 3 0 16 0 1 9 0 52 8 0 2 52 16 0 1 16 1 52 2 0 3 32 145 1 16 2 1 18 0 52 5 0 2 33 15 0 1 19 0 1 18 0 16 1 52 2 0 3 32 118 1 16 2 1 20 0 52 5 0 2 33 15 0 1 3 0 1 20 0 16 1 52 2 0 3 32 91 1 16 2 1 21 0 52 5 0 2 33 19 0 1 19 0 20 7 0 16 0 48 1 16 1 52 2 0 3 32 60 1 16 2 1 22 0 52 5 0 2 33 40 0 1 23 0 20 7 0 16 0 1 9 0 52 8 0 2 48 1 20 7 0 16 0 1 10 0 52 8 0 2 48 1 16 1 52 2 0 4 32 8 1 16 2 1 24 0 52 5 0 2 33 236 0 16 0 1 9 0 52 8 0 2 17 3 16 0 1 10 0 52 8 0 2 17 4 16 3 52 1 0 1 6 33 13 0 5 16 3 52 4 0 1 18 0 52 5 0 2 33 59 0 16 3 1 9 0 52 8 0 2 17 5 16 3 1 10 0 52 8 0 2 17 6 1 6 0 1 25 0 20 7 0 16 4 48 1 16 5 1 9 0 52 8 0 2 52 2 0 3 16 6 16 1 52 2 0 4 32 126 0 16 3 52 1 0 1 6 33 14 0 5 16 3 52 4 0 1 1 11 0 52 5 0 2 33 28 0 1 12 0 20 7 0 16 4 48 1 16 3 1 9 0 52 8 0 2 16 1 52 2 0 4 32 71 0 16 3 52 1 0 1 6 33 14 0 5 16 3 52 4 0 1 1 15 0 52 5 0 2 33 28 0 1 6 0 20 7 0 16 4 48 1 16 3 1 9 0 52 8 0 2 16 1 52 2 0 4 32 16 0 1 3 0 20 7 0 16 0 48 1 16 1 52 2 0 3 32 16 0 1 3 0 20 7 0 16 0 48 1 16 1 52 2 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("rest" "first" {:upvalue-count 2 :arity 6 :constants ("<=" "len" 1 ">" 0 "first" "hs-to-sx" me "make-symbol" "nth" "list" do guard fn event hs-on-every hs-on "=" "from" "rest" "filter" "every" "catch" "finally") :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 242 0 16 0 52 1 0 1 1 4 0 52 3 0 2 33 9 0 16 0 52 5 0 1 32 1 0 2 17 6 16 1 33 10 0 20 6 0 16 1 48 1 32 3 0 1 7 0 17 7 20 6 0 16 6 48 1 17 8 16 4 33 97 0 16 4 52 5 0 1 52 8 0 1 17 9 20 6 0 16 4 1 2 0 52 9 0 2 48 1 17 10 16 5 33 39 0 1 11 0 1 12 0 16 9 3 16 10 52 10 0 2 52 10 0 2 16 8 52 10 0 3 20 6 0 16 5 48 1 52 10 0 3 32 22 0 1 12 0 16 9 3 16 10 52 10 0 2 52 10 0 2 16 8 52 10 0 3 32 26 0 16 5 33 19 0 1 11 0 16 8 20 6 0 16 5 48 1 52 10 0 3 32 2 0 16 8 17 9 1 13 0 1 14 0 52 10 0 1 16 9 52 10 0 3 17 10 16 3 33 16 0 1 15 0 16 7 18 0 16 10 52 10 0 4 32 13 0 1 16 0 16 7 18 0 16 10 52 10 0 4 32 6 1 16 0 52 5 0 1 1 18 0 52 17 0 2 33 34 0 18 1 16 0 52 19 0 1 52 19 0 1 16 0 1 2 0 52 9 0 2 16 2 16 3 16 4 16 5 49 6 32 212 0 16 0 52 5 0 1 1 20 0 52 17 0 2 33 34 0 18 1 16 0 52 19 0 1 52 19 0 1 16 1 16 0 1 2 0 52 9 0 2 16 3 16 4 16 5 49 6 32 162 0 16 0 52 5 0 1 1 21 0 52 17 0 2 33 26 0 18 1 16 0 52 19 0 1 52 19 0 1 16 1 16 2 3 16 4 16 5 49 6 32 120 0 16 0 52 5 0 1 1 22 0 52 17 0 2 33 34 0 18 1 16 0 52 19 0 1 52 19 0 1 16 1 16 2 16 3 16 0 1 2 0 52 9 0 2 16 5 49 6 32 70 0 16 0 52 5 0 1 1 23 0 52 17 0 2 33 34 0 18 1 16 0 52 19 0 1 52 19 0 1 16 1 16 2 16 3 16 4 16 0 1 2 0 52 9 0 2 49 6 32 20 0 18 1 16 0 52 19 0 1 16 1 16 2 16 3 16 4 16 5 49 6 50)}) :bytecode (16 0 52 0 0 1 17 1 16 1 52 1 0 1 17 2 51 2 0 1 2 1 3 17 3 5 16 3 16 1 52 0 0 1 2 2 4 2 2 49 6 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 "rest" "=" "len" 4 "list?" 2 "first" dict "list" dom-dispatch "hs-to-sx" 3 me) :bytecode (16 0 1 1 0 52 0 0 2 17 1 16 0 52 2 0 1 52 2 0 1 17 2 16 0 52 4 0 1 1 5 0 52 3 0 2 6 33 39 0 5 16 0 1 7 0 52 0 0 2 52 6 0 1 6 33 21 0 5 16 0 1 7 0 52 0 0 2 52 8 0 1 1 9 0 52 3 0 2 33 40 0 1 11 0 20 12 0 16 0 1 13 0 52 0 0 2 48 1 16 1 20 12 0 16 0 1 7 0 52 0 0 2 48 1 52 10 0 4 32 56 0 16 0 52 4 0 1 1 13 0 52 3 0 2 33 27 0 1 11 0 20 12 0 16 0 1 7 0 52 0 0 2 48 1 16 1 2 52 10 0 4 32 13 0 1 11 0 1 14 0 16 1 2 52 10 0 4 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 "hs-to-sx" 2 "list?" "=" "first" forever "list" hs-repeat-forever fn times hs-repeat-times "number?" while hs-repeat-while until hs-repeat-until) :bytecode (16 0 1 1 0 52 0 0 2 17 1 20 2 0 16 0 1 3 0 52 0 0 2 48 1 17 2 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 7 0 52 5 0 2 33 23 0 1 9 0 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 2 32 27 1 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 11 0 52 5 0 2 33 37 0 1 12 0 20 2 0 16 1 1 1 0 52 0 0 2 48 1 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 219 0 16 1 52 13 0 1 33 25 0 1 12 0 16 1 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 185 0 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 14 0 52 5 0 2 33 52 0 20 2 0 16 1 1 1 0 52 0 0 2 48 1 17 3 1 15 0 1 10 0 52 8 0 0 16 3 52 8 0 3 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 106 0 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 16 0 52 5 0 2 33 52 0 20 2 0 16 1 1 1 0 52 0 0 2 48 1 17 3 1 17 0 1 10 0 52 8 0 0 16 3 52 8 0 3 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 27 0 1 12 0 20 2 0 16 1 48 1 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 "hs-to-sx" 2 3 ">" "len" 4 "=" "index" "list" for-each fn "make-symbol" 5) :bytecode (16 0 1 1 0 52 0 0 2 17 1 20 2 0 16 0 1 3 0 52 0 0 2 48 1 17 2 20 2 0 16 0 1 4 0 52 0 0 2 48 1 17 3 16 0 52 6 0 1 1 7 0 52 5 0 2 6 33 17 0 5 16 0 1 7 0 52 0 0 2 1 9 0 52 8 0 2 33 44 0 1 11 0 1 12 0 16 1 52 13 0 1 16 0 1 14 0 52 0 0 2 52 13 0 1 52 10 0 2 16 3 52 10 0 3 16 2 52 10 0 3 32 28 0 1 11 0 1 12 0 16 1 52 13 0 1 52 10 0 1 16 3 52 10 0 3 16 2 52 10 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 ">" "len" 2 "=" "from" "list" hs-wait-for "hs-to-sx" 3 me) :bytecode (16 0 1 1 0 52 0 0 2 17 1 16 0 52 3 0 1 1 4 0 52 2 0 2 6 33 17 0 5 16 0 1 4 0 52 0 0 2 1 6 0 52 5 0 2 33 26 0 1 8 0 20 9 0 16 0 1 10 0 52 0 0 2 48 1 16 1 52 7 0 3 32 12 0 1 8 0 1 11 0 16 1 52 7 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("hs-to-sx" "nth" 1 2 3 4 "list" hs-transition "nil?" me) :bytecode (20 0 0 16 0 1 2 0 52 1 0 2 48 1 17 1 20 0 0 16 0 1 3 0 52 1 0 2 48 1 17 2 16 0 1 4 0 52 1 0 2 17 3 16 0 1 5 0 52 1 0 2 17 4 1 7 0 16 4 52 8 0 1 33 6 0 1 9 0 32 7 0 20 0 0 16 4 48 1 16 1 16 2 16 3 33 10 0 20 0 0 16 3 48 1 32 1 0 2 52 6 0 5 50)} {:upvalue-count 0 :arity 1 :constants ("=" "len" 3 "list" let "make-symbol" "nth" 2 hs-make 1) :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 60 0 1 4 0 16 0 1 7 0 52 6 0 2 52 5 0 1 1 8 0 16 0 1 9 0 52 6 0 2 52 3 0 2 52 3 0 2 52 3 0 1 16 0 1 7 0 52 6 0 2 52 5 0 1 52 3 0 3 32 16 0 1 8 0 16 0 1 9 0 52 6 0 2 52 3 0 2 50)} {:upvalue-count 1 :arity 3 :constants ("list?" "=" "first" attr "hs-to-sx" me "list" dom-set-attr "nth" 1 + parse-number dom-get-attr 2 host-set! host-get style dom-set-style dom-get-style set! or 0) :bytecode (16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 33 75 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 1 7 0 16 3 16 0 1 9 0 52 8 0 2 1 10 0 1 11 0 1 12 0 16 3 16 0 1 9 0 52 8 0 2 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 232 0 16 0 52 0 0 1 6 33 13 0 5 16 0 52 2 0 1 18 0 52 1 0 2 33 68 0 20 4 0 16 0 1 9 0 52 8 0 2 48 1 17 3 16 0 1 13 0 52 8 0 2 17 4 1 14 0 16 3 16 4 1 10 0 1 11 0 1 15 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 138 0 16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 16 0 52 1 0 2 33 72 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 16 0 1 9 0 52 8 0 2 17 4 1 17 0 16 3 16 4 1 10 0 1 11 0 1 18 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 39 0 20 4 0 16 0 48 1 17 3 1 19 0 16 3 1 10 0 1 20 0 16 3 1 21 0 52 6 0 3 16 1 52 6 0 3 52 6 0 3 50)} {:upvalue-count 1 :arity 3 :constants ("list?" "=" "first" attr "hs-to-sx" me "list" dom-set-attr "nth" 1 - parse-number dom-get-attr 2 host-set! host-get style dom-set-style dom-get-style set! or 0) :bytecode (16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 33 75 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 1 7 0 16 3 16 0 1 9 0 52 8 0 2 1 10 0 1 11 0 1 12 0 16 3 16 0 1 9 0 52 8 0 2 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 232 0 16 0 52 0 0 1 6 33 13 0 5 16 0 52 2 0 1 18 0 52 1 0 2 33 68 0 20 4 0 16 0 1 9 0 52 8 0 2 48 1 17 3 16 0 1 13 0 52 8 0 2 17 4 1 14 0 16 3 16 4 1 10 0 1 11 0 1 15 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 138 0 16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 16 0 52 1 0 2 33 72 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 16 0 1 9 0 52 8 0 2 17 4 1 17 0 16 3 16 4 1 10 0 1 11 0 1 18 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 39 0 20 4 0 16 0 48 1 17 3 1 19 0 16 3 1 10 0 1 20 0 16 3 1 21 0 52 6 0 3 16 1 52 6 0 3 52 6 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 2 3 "list" define "make-symbol" fn "cons" me "map" do "hs-to-sx") :bytecode (16 0 1 1 0 52 0 0 2 17 1 16 0 1 2 0 52 0 0 2 17 2 16 0 1 3 0 52 0 0 2 17 3 1 5 0 16 1 52 6 0 1 1 7 0 1 9 0 20 6 0 16 2 52 10 0 2 52 8 0 2 1 11 0 20 12 0 16 3 52 10 0 2 52 8 0 2 52 4 0 3 52 4 0 3 50)} {:upvalue-count 13 :arity 1 :constants ("nil?" "number?" "string?" "boolean?" "not" "list?" "first" "=" null-literal not "list" "hs-to-sx" "nth" 1 starts-with? ends-with? contains? precedes? follows? exists? "cons" "map" "rest" object-literal "len" 0 dict hs-make-object list {:upvalue-count 0 :arity 1 :constants ("list" list "first" "hs-to-sx" "nth" 1) :bytecode (1 1 0 16 0 52 2 0 1 20 3 0 16 0 1 5 0 52 4 0 2 48 1 52 0 0 3 50)} template "" {:upvalue-count 2 :arity 0 :constants (">" "len" 0 "append" "list" "") :bytecode (18 0 52 1 0 1 1 2 0 52 0 0 2 33 23 0 18 1 18 0 52 4 0 1 52 3 0 2 19 1 5 1 5 0 19 0 32 1 0 2 50)} {:upvalue-count 3 :arity 1 :constants ("<" "nth" ">=" "a" "<=" "z" "A" "Z" "0" "9" "=" "_" "." "+" 1) :bytecode (16 0 18 0 52 0 0 2 6 33 118 0 5 18 1 16 0 52 1 0 2 17 1 16 1 1 3 0 52 2 0 2 6 33 10 0 5 16 1 1 5 0 52 4 0 2 6 34 80 0 5 16 1 1 6 0 52 2 0 2 6 33 10 0 5 16 1 1 7 0 52 4 0 2 6 34 52 0 5 16 1 1 8 0 52 2 0 2 6 33 10 0 5 16 1 1 9 0 52 4 0 2 6 34 24 0 5 16 1 1 11 0 52 10 0 2 6 34 10 0 5 16 1 1 12 0 52 10 0 2 33 16 0 18 2 16 0 1 14 0 52 13 0 2 49 1 32 2 0 16 0 50)} {:upvalue-count 3 :arity 2 :constants (">=" "=" "nth" "}" 1 "+" "-" "{") :bytecode (16 0 18 0 52 0 0 2 33 5 0 16 0 32 118 0 18 1 16 0 52 2 0 2 1 3 0 52 1 0 2 33 42 0 16 1 1 4 0 52 1 0 2 33 5 0 16 0 32 22 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 6 0 2 49 2 32 58 0 18 1 16 0 52 2 0 2 1 7 0 52 1 0 2 33 25 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 5 0 2 49 2 32 15 0 18 2 16 0 1 4 0 52 5 0 2 16 1 49 2 50)} {:upvalue-count 9 :arity 0 :constants ("<" "nth" "=" "$" "+" 1 "{" 2 "slice" "append" "list" "hs-to-sx" "hs-compile" "str") :bytecode (18 0 18 1 52 0 0 2 33 253 0 18 2 18 0 52 1 0 2 17 0 16 0 1 3 0 52 2 0 2 6 33 16 0 5 18 0 1 5 0 52 4 0 2 18 1 52 0 0 2 33 181 0 18 2 18 0 1 5 0 52 4 0 2 52 1 0 2 1 6 0 52 2 0 2 33 83 0 18 0 1 7 0 52 4 0 2 17 1 18 3 16 1 1 5 0 48 2 17 2 18 2 16 1 16 2 52 8 0 3 17 3 18 4 48 0 5 18 5 20 11 0 20 12 0 16 3 48 1 48 1 52 10 0 1 52 9 0 2 19 5 5 16 2 1 5 0 52 4 0 2 19 0 5 18 6 49 0 32 70 0 18 0 1 5 0 52 4 0 2 17 1 18 7 16 1 48 1 17 2 18 2 16 1 16 2 52 8 0 3 17 3 18 4 48 0 5 18 5 20 11 0 20 12 0 16 3 48 1 48 1 52 10 0 1 52 9 0 2 19 5 5 16 2 19 0 5 18 6 49 0 32 27 0 18 8 16 0 52 13 0 2 19 8 5 18 0 1 5 0 52 4 0 2 19 0 5 18 6 49 0 32 1 0 2 50)} str beep! hs-beep array-index nth 2 array-slice hs-slice 3 prop-is hs-prop-is coll-where filter fn it coll-sorted hs-sorted-by coll-sorted-desc hs-sorted-by-desc coll-mapped map coll-split hs-split-by coll-joined hs-joined-by method-call "make-symbol" "." hs-method-call string-postfix block-literal me event hs-first "last" hs-last host-get ref query hs-query-first attr dom-get-attr style dom-get-style has-class? dom-has-class? local array no hs-falsy? and or = + hs-add - * / "%" modulo empty? hs-empty? nil? matches? hs-matches? matches-ignore-case? hs-matches-ignore-case? starts-with-ic? hs-starts-with-ic? ends-with-ic? hs-ends-with-ic? hs-contains? contains-ignore-case? hs-contains-ignore-case? as hs-coerce in? of first last "!=" "<" < ">" > "<=" <= ">=" >= closest dom-closest next hs-next previous hs-previous hs-query-last add-class for-each _el dom-add-class hs-query-all multi-add-class do {:upvalue-count 1 :arity 1 :constants ("list" dom-add-class) :bytecode (1 1 0 18 0 16 0 52 0 0 3 50)} add-class-when host-call "querySelectorAll" when multi-remove-class {:upvalue-count 1 :arity 1 :constants ("list" dom-remove-class) :bytecode (1 1 0 18 0 16 0 52 0 0 3 50)} remove-class dom-remove-class remove-element dom-remove empty-target hs-empty-target! open-element hs-open! close-element hs-close! swap! let _swap_tmp remove-attr dom-remove-attr remove-css {:upvalue-count 1 :arity 1 :constants ("list" dom-set-style "") :bytecode (1 1 0 18 0 16 0 1 2 0 52 0 0 4 50)} toggle-class hs-toggle-class! toggle-between hs-toggle-between! toggle-style hs-toggle-style! toggle-style-between hs-toggle-style-between! 4 toggle-attr hs-toggle-attr! toggle-attr-between hs-toggle-attr-between! set! put! hs-put! if "some" {:upvalue-count 0 :arity 1 :constants ("list?" "=" "first" hs-fetch hs-wait perform) :bytecode (16 0 52 0 0 1 6 33 50 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 6 34 32 0 5 16 0 52 2 0 1 1 4 0 52 1 0 2 6 34 14 0 5 16 0 52 2 0 1 1 5 0 52 1 0 2 50)} "reduce" {:upvalue-count 0 :arity 2 :constants ("list" let it) :bytecode (1 1 0 1 2 0 16 1 52 0 0 2 52 0 0 1 16 0 52 0 0 3 50)} "-" "reverse" wait hs-wait wait-for log console-log send trigger dom-dispatch hide "display" hs-hide! show hs-show! transition transition-from 5 hs-transition-from repeat fetch hs-fetch fetch-gql hs-fetch-gql call return raise "hs-return" throw settle hs-settle go hs-navigate! append! dom-append tell you yourself for take! 6 "attr" hs-take! make install hs-install measure hs-measure increment! decrement! on init hs-init def {:upvalue-count 0 :arity 1 :constants ("list?" "=" "first" ref "make-symbol" "nth" 1) :bytecode (16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 33 16 0 16 0 1 6 0 52 5 0 2 52 4 0 1 32 6 0 16 0 52 4 0 1 50)} define guard _e true list? behavior sx-eval "sx-parse" cek-eval component render {:upvalue-count 1 :arity 1 :constants ("<" "len" 2 "list" "cons" "make-keyword" "first" "hs-to-sx" "nth" 1 "rest") :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 7 0 52 3 0 0 32 46 0 16 0 52 6 0 1 52 5 0 1 20 7 0 16 0 1 9 0 52 8 0 2 48 1 18 0 16 0 52 10 0 1 52 10 0 1 48 1 52 4 0 2 52 4 0 2 50)} render-to-html not-in? type-check hs-type-check type-check-strict hs-type-check-strict strict-eq hs-strict-eq eq-ignore-case hs-eq-ignore-case some every every? scroll! hs-scroll! select! hs-select! reset! hs-reset! default! halt! hs-halt! focus! dom-focus) :bytecode (16 0 52 0 0 1 33 4 0 2 32 210 30 16 0 52 1 0 1 33 5 0 16 0 32 196 30 16 0 52 2 0 1 33 5 0 16 0 32 182 30 16 0 52 3 0 1 33 5 0 16 0 32 168 30 16 0 52 5 0 1 52 4 0 1 33 5 0 16 0 32 150 30 16 0 52 6 0 1 17 1 16 1 1 8 0 52 7 0 2 33 4 0 2 32 126 30 16 1 1 9 0 52 7 0 2 33 24 0 1 9 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 90 30 16 1 1 14 0 52 7 0 2 6 34 66 0 5 16 1 1 15 0 52 7 0 2 6 34 52 0 5 16 1 1 16 0 52 7 0 2 6 34 38 0 5 16 1 1 17 0 52 7 0 2 6 34 24 0 5 16 1 1 18 0 52 7 0 2 6 34 10 0 5 16 1 1 19 0 52 7 0 2 33 22 0 16 1 20 11 0 16 0 52 22 0 1 52 21 0 2 52 20 0 2 32 242 29 16 1 1 23 0 52 7 0 2 33 67 0 16 0 1 13 0 52 12 0 2 17 2 16 2 52 24 0 1 1 25 0 52 7 0 2 33 10 0 1 26 0 52 10 0 1 32 27 0 1 27 0 1 28 0 51 29 0 16 2 52 21 0 2 52 20 0 2 52 10 0 1 52 20 0 2 32 163 29 16 1 1 30 0 52 7 0 2 33 115 0 16 0 1 13 0 52 12 0 2 17 2 52 10 0 0 17 3 1 31 0 17 4 1 25 0 17 5 16 2 52 24 0 1 17 6 51 32 0 1 4 1 3 17 7 5 51 33 0 1 6 1 2 1 8 17 8 5 51 34 0 1 6 1 2 1 9 17 9 5 51 35 0 1 5 1 6 1 2 1 9 1 7 1 3 1 10 1 8 1 4 17 10 5 16 10 48 0 5 16 7 48 0 5 1 36 0 16 3 52 20 0 2 32 36 29 16 1 1 37 0 52 7 0 2 33 24 0 1 38 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 0 29 16 1 1 39 0 52 7 0 2 33 38 0 1 40 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 206 28 16 1 1 42 0 52 7 0 2 33 52 0 1 43 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 4 32 142 28 16 1 1 45 0 52 7 0 2 33 33 0 1 46 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 97 28 16 1 1 47 0 52 7 0 2 33 52 0 1 48 0 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 33 28 16 1 1 51 0 52 7 0 2 33 52 0 1 52 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 3 32 225 27 16 1 1 53 0 52 7 0 2 33 52 0 1 54 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 3 32 161 27 16 1 1 55 0 52 7 0 2 33 52 0 1 56 0 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 97 27 16 1 1 57 0 52 7 0 2 33 38 0 1 58 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 47 27 16 1 1 59 0 52 7 0 2 33 38 0 1 60 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 253 26 16 1 1 61 0 52 7 0 2 33 134 0 16 0 1 13 0 52 12 0 2 17 2 20 11 0 16 0 1 41 0 52 12 0 2 52 21 0 2 17 3 16 2 52 5 0 1 6 33 18 0 5 16 2 52 6 0 1 1 63 0 52 62 0 1 52 7 0 2 33 51 0 20 11 0 16 2 1 13 0 52 12 0 2 48 1 17 4 16 2 1 41 0 52 12 0 2 17 5 1 64 0 16 4 16 5 16 3 52 20 0 2 52 20 0 2 52 20 0 2 32 20 0 1 64 0 20 11 0 16 2 48 1 16 3 52 20 0 2 52 20 0 2 32 107 26 16 1 1 65 0 52 7 0 2 33 33 0 1 36 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 62 26 16 1 1 66 0 52 7 0 2 33 69 0 20 62 0 16 0 1 13 0 52 12 0 2 52 21 0 2 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 16 2 52 24 0 1 1 25 0 52 7 0 2 33 5 0 16 3 32 11 0 1 49 0 16 2 16 3 52 10 0 3 32 237 25 16 1 1 67 0 52 7 0 2 33 6 0 1 67 0 32 219 25 16 1 1 50 0 52 7 0 2 33 6 0 1 50 0 32 201 25 16 1 1 68 0 52 7 0 2 33 6 0 1 68 0 32 183 25 16 1 18 0 52 7 0 2 33 89 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 1 41 0 52 12 0 2 17 3 16 3 1 6 0 52 7 0 2 33 12 0 1 69 0 16 2 52 10 0 2 32 35 0 16 3 1 70 0 52 7 0 2 33 12 0 1 71 0 16 2 52 10 0 2 32 11 0 1 72 0 16 2 16 3 52 10 0 3 32 83 25 16 1 1 73 0 52 7 0 2 33 16 0 16 0 1 13 0 52 12 0 2 52 62 0 1 32 55 25 16 1 1 74 0 52 7 0 2 33 19 0 1 75 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 24 25 16 1 1 76 0 52 7 0 2 33 33 0 1 77 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 235 24 16 1 1 78 0 52 7 0 2 33 33 0 1 79 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 190 24 16 1 1 80 0 52 7 0 2 33 33 0 1 81 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 145 24 16 1 1 82 0 52 7 0 2 33 16 0 16 0 1 13 0 52 12 0 2 52 62 0 1 32 117 24 16 1 1 83 0 52 7 0 2 33 23 0 1 28 0 20 11 0 16 0 52 22 0 1 52 21 0 2 52 20 0 2 32 82 24 16 1 1 9 0 52 7 0 2 33 24 0 1 9 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 46 24 16 1 1 84 0 52 7 0 2 33 24 0 1 85 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 10 24 16 1 1 86 0 52 7 0 2 33 38 0 1 86 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 216 23 16 1 1 87 0 52 7 0 2 33 38 0 1 87 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 166 23 16 1 1 88 0 52 7 0 2 33 38 0 1 88 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 116 23 16 1 1 89 0 52 7 0 2 33 38 0 1 90 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 66 23 16 1 1 91 0 52 7 0 2 33 38 0 1 91 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 16 23 16 1 1 92 0 52 7 0 2 33 38 0 1 92 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 222 22 16 1 1 93 0 52 7 0 2 33 38 0 1 93 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 172 22 16 1 18 1 52 7 0 2 33 81 0 16 0 1 41 0 52 12 0 2 52 0 0 1 33 27 0 1 36 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 1 94 0 52 10 0 3 32 35 0 1 95 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 80 22 16 1 1 96 0 52 7 0 2 33 24 0 1 97 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 44 22 16 1 1 19 0 52 7 0 2 33 31 0 1 9 0 1 98 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 52 10 0 2 32 1 22 16 1 1 99 0 52 7 0 2 33 99 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 3 52 5 0 1 6 33 14 0 5 16 3 52 6 0 1 1 74 0 52 7 0 2 33 26 0 1 100 0 20 11 0 16 2 48 1 16 3 1 13 0 52 12 0 2 52 10 0 3 32 21 0 1 100 0 20 11 0 16 2 48 1 20 11 0 16 3 48 1 52 10 0 3 32 146 21 16 1 1 101 0 52 7 0 2 33 38 0 1 102 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 96 21 16 1 1 103 0 52 7 0 2 33 38 0 1 104 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 46 21 16 1 1 105 0 52 7 0 2 33 38 0 1 106 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 252 20 16 1 1 16 0 52 7 0 2 33 38 0 1 107 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 202 20 16 1 1 108 0 52 7 0 2 33 38 0 1 109 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 152 20 16 1 1 110 0 52 7 0 2 33 33 0 1 111 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 107 20 16 1 1 112 0 52 7 0 2 33 38 0 1 107 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 57 20 16 1 1 113 0 52 7 0 2 33 94 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 16 2 1 114 0 52 7 0 2 33 12 0 1 114 0 16 3 52 10 0 2 32 35 0 16 2 1 115 0 52 7 0 2 33 12 0 1 115 0 16 3 52 10 0 2 32 11 0 1 72 0 16 3 16 2 52 10 0 3 32 207 19 16 1 1 116 0 52 7 0 2 33 45 0 1 9 0 1 88 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 2 32 150 19 16 1 1 117 0 52 7 0 2 33 38 0 1 118 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 100 19 16 1 1 119 0 52 7 0 2 33 38 0 1 120 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 50 19 16 1 1 121 0 52 7 0 2 33 38 0 1 122 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 0 19 16 1 1 123 0 52 7 0 2 33 38 0 1 124 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 206 18 16 1 1 125 0 52 7 0 2 33 33 0 1 126 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 161 18 16 1 1 127 0 52 7 0 2 33 33 0 1 128 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 116 18 16 1 1 129 0 52 7 0 2 33 33 0 1 130 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 71 18 16 1 1 114 0 52 7 0 2 33 68 0 16 0 52 24 0 1 1 41 0 52 119 0 2 33 33 0 1 69 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 16 0 1 75 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 247 17 16 1 1 115 0 52 7 0 2 33 68 0 16 0 52 24 0 1 1 41 0 52 119 0 2 33 33 0 1 71 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 16 0 1 131 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 167 17 16 1 1 132 0 52 7 0 2 33 123 0 16 0 1 41 0 52 12 0 2 17 2 16 2 52 5 0 1 6 33 14 0 5 16 2 52 6 0 1 1 74 0 52 7 0 2 33 59 0 1 133 0 1 49 0 1 134 0 52 10 0 1 1 135 0 1 134 0 16 0 1 13 0 52 12 0 2 52 10 0 3 52 10 0 3 1 136 0 16 2 1 13 0 52 12 0 2 52 10 0 2 52 10 0 3 32 23 0 1 135 0 20 11 0 16 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 32 17 16 1 1 137 0 52 7 0 2 33 49 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 22 0 1 52 22 0 1 17 3 1 138 0 51 139 0 1 2 16 3 52 21 0 2 52 20 0 2 32 227 16 16 1 1 140 0 52 7 0 2 33 253 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 0 1 44 0 52 12 0 2 17 4 16 3 52 5 0 1 6 33 14 0 5 16 3 52 6 0 1 1 74 0 52 7 0 2 33 19 0 1 136 0 16 3 1 13 0 52 12 0 2 52 10 0 2 32 120 0 16 3 52 5 0 1 6 33 57 0 5 16 3 52 6 0 1 1 112 0 52 7 0 2 6 33 39 0 5 16 3 1 13 0 52 12 0 2 52 5 0 1 6 33 21 0 5 16 3 1 13 0 52 12 0 2 52 6 0 1 1 74 0 52 7 0 2 33 43 0 1 141 0 20 11 0 16 3 1 41 0 52 12 0 2 48 1 1 142 0 16 3 1 13 0 52 12 0 2 1 13 0 52 12 0 2 52 10 0 4 32 7 0 20 11 0 16 3 48 1 17 5 1 133 0 1 49 0 1 50 0 52 10 0 1 1 143 0 20 11 0 16 4 48 1 1 135 0 1 50 0 16 2 52 10 0 3 52 10 0 3 52 10 0 3 16 5 52 10 0 3 32 218 15 16 1 1 144 0 52 7 0 2 33 49 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 22 0 1 52 22 0 1 17 3 1 138 0 51 145 0 1 2 16 3 52 21 0 2 52 20 0 2 32 157 15 16 1 1 146 0 52 7 0 2 33 138 0 16 0 1 41 0 52 12 0 2 17 2 16 2 52 5 0 1 6 33 14 0 5 16 2 52 6 0 1 1 74 0 52 7 0 2 33 59 0 1 133 0 1 49 0 1 134 0 52 10 0 1 1 147 0 1 134 0 16 0 1 13 0 52 12 0 2 52 10 0 3 52 10 0 3 1 136 0 16 2 1 13 0 52 12 0 2 52 10 0 2 52 10 0 3 32 38 0 1 147 0 16 2 52 0 0 1 33 6 0 1 67 0 32 7 0 20 11 0 16 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 7 15 16 1 1 148 0 52 7 0 2 33 24 0 1 149 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 227 14 16 1 1 150 0 52 7 0 2 33 24 0 1 151 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 191 14 16 1 1 152 0 52 7 0 2 33 24 0 1 153 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 155 14 16 1 1 154 0 52 7 0 2 33 24 0 1 155 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 119 14 16 1 1 156 0 52 7 0 2 33 79 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 1 157 0 1 158 0 20 11 0 16 2 48 1 52 10 0 2 52 10 0 1 1 138 0 18 2 16 2 20 11 0 16 3 48 1 48 2 18 2 16 3 1 158 0 48 2 52 10 0 3 52 10 0 3 32 28 14 16 1 1 159 0 52 7 0 2 33 59 0 16 0 1 41 0 52 12 0 2 52 0 0 1 33 6 0 1 67 0 32 14 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 2 1 160 0 16 2 16 0 1 13 0 52 12 0 2 52 10 0 3 32 213 13 16 1 1 161 0 52 7 0 2 33 70 0 16 0 1 41 0 52 12 0 2 52 0 0 1 33 6 0 1 67 0 32 14 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 2 16 0 1 13 0 52 12 0 2 17 3 1 138 0 51 162 0 1 2 16 3 52 21 0 2 52 20 0 2 32 131 13 16 1 1 163 0 52 7 0 2 33 33 0 1 164 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 86 13 16 1 1 165 0 52 7 0 2 33 42 0 1 166 0 20 11 0 16 0 1 44 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 52 10 0 4 32 32 13 16 1 1 167 0 52 7 0 2 33 52 0 16 0 1 41 0 52 12 0 2 17 2 1 168 0 16 2 52 0 0 1 33 6 0 1 67 0 32 7 0 20 11 0 16 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 224 12 16 1 1 169 0 52 7 0 2 33 61 0 1 170 0 20 11 0 16 0 1 171 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 5 32 151 12 16 1 1 172 0 52 7 0 2 33 33 0 1 173 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 106 12 16 1 1 174 0 52 7 0 2 33 61 0 1 175 0 20 11 0 16 0 1 171 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 5 32 33 12 16 1 1 176 0 52 7 0 2 33 30 0 18 2 16 0 1 13 0 52 12 0 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 49 2 32 247 11 16 1 1 177 0 52 7 0 2 33 47 0 1 178 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 4 32 188 11 16 1 1 179 0 52 7 0 2 33 106 0 16 0 52 24 0 1 1 44 0 52 119 0 2 33 52 0 1 179 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 4 32 35 0 1 143 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 70 11 16 1 1 138 0 52 7 0 2 33 100 0 20 11 0 16 0 52 22 0 1 52 21 0 2 17 2 16 2 52 24 0 1 1 13 0 52 119 0 2 6 33 10 0 5 51 181 0 16 2 52 180 0 2 33 43 0 51 183 0 16 2 16 2 52 24 0 1 1 13 0 52 184 0 2 52 12 0 2 16 2 52 185 0 1 52 22 0 1 52 185 0 1 52 182 0 3 32 9 0 1 138 0 16 2 52 20 0 2 32 214 10 16 1 1 186 0 52 7 0 2 33 19 0 1 187 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 183 10 16 1 1 188 0 52 7 0 2 33 9 0 18 3 16 0 49 1 32 162 10 16 1 1 189 0 52 7 0 2 33 24 0 1 190 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 126 10 16 1 1 191 0 52 7 0 2 33 9 0 18 4 16 0 49 1 32 105 10 16 1 1 192 0 52 7 0 2 33 34 0 1 193 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 2 52 10 0 4 32 59 10 16 1 1 194 0 52 7 0 2 33 63 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 24 0 1 1 41 0 52 119 0 2 33 12 0 16 0 1 41 0 52 12 0 2 32 3 0 1 195 0 17 3 1 196 0 16 2 16 3 52 10 0 3 32 240 9 16 1 1 197 0 52 7 0 2 33 63 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 24 0 1 1 41 0 52 119 0 2 33 12 0 16 0 1 41 0 52 12 0 2 32 3 0 1 195 0 17 3 1 198 0 16 2 16 3 52 10 0 3 32 165 9 16 1 1 199 0 52 7 0 2 33 9 0 18 5 16 0 49 1 32 144 9 16 1 1 200 0 52 7 0 2 33 124 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 20 11 0 16 0 1 44 0 52 12 0 2 48 1 17 4 16 0 1 171 0 52 12 0 2 17 5 16 0 1 201 0 52 12 0 2 17 6 1 202 0 16 6 52 0 0 1 33 6 0 1 67 0 32 7 0 20 11 0 16 6 48 1 16 2 16 3 16 4 16 5 33 10 0 20 11 0 16 5 48 1 32 1 0 2 52 10 0 6 32 8 9 16 1 1 203 0 52 7 0 2 33 9 0 18 6 16 0 49 1 32 243 8 16 1 1 204 0 52 7 0 2 33 33 0 1 205 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 198 8 16 1 1 206 0 52 7 0 2 33 49 0 1 207 0 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 33 17 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 32 1 0 2 52 10 0 3 32 137 8 16 1 1 208 0 52 7 0 2 33 45 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 41 0 52 12 0 2 52 21 0 2 17 3 16 2 16 3 52 20 0 2 32 80 8 16 1 1 209 0 52 7 0 2 33 68 0 16 0 1 13 0 52 12 0 2 17 2 16 2 52 0 0 1 33 21 0 1 210 0 1 28 0 1 211 0 2 52 10 0 3 52 10 0 2 32 24 0 1 210 0 1 28 0 1 211 0 20 11 0 16 2 48 1 52 10 0 3 52 10 0 2 32 0 8 16 1 1 212 0 52 7 0 2 33 24 0 1 210 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 220 7 16 1 1 213 0 52 7 0 2 33 13 0 1 214 0 1 67 0 52 10 0 2 32 195 7 16 1 1 215 0 52 7 0 2 33 24 0 1 216 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 159 7 16 1 1 217 0 52 7 0 2 33 38 0 1 218 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 109 7 16 1 1 219 0 52 7 0 2 33 71 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 1 157 0 1 67 0 16 2 52 10 0 2 1 220 0 16 2 52 10 0 2 1 221 0 16 2 52 10 0 2 52 10 0 3 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 26 7 16 1 1 222 0 52 7 0 2 33 9 0 18 7 16 0 49 1 32 5 7 16 1 1 223 0 52 7 0 2 33 58 1 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 17 4 16 0 52 24 0 1 1 171 0 52 119 0 2 33 12 0 16 0 1 171 0 52 12 0 2 32 1 0 2 17 5 16 0 52 24 0 1 1 201 0 52 119 0 2 33 12 0 16 0 1 201 0 52 12 0 2 32 1 0 2 17 6 16 0 52 24 0 1 1 224 0 52 119 0 2 33 12 0 16 0 1 224 0 52 12 0 2 32 1 0 2 17 7 16 5 33 10 0 20 11 0 16 5 48 1 32 3 0 1 67 0 17 8 16 4 52 0 0 1 33 4 0 2 32 53 0 16 4 52 5 0 1 6 33 14 0 5 16 4 52 6 0 1 1 74 0 52 7 0 2 33 19 0 1 136 0 16 4 1 13 0 52 12 0 2 52 10 0 2 32 7 0 20 11 0 16 4 48 1 17 9 16 2 1 225 0 52 7 0 2 6 33 10 0 5 16 6 6 34 3 0 5 16 7 33 36 0 1 226 0 16 8 16 2 16 3 16 9 16 6 16 7 33 10 0 20 11 0 16 7 48 1 32 1 0 2 52 10 0 7 32 15 0 1 226 0 16 8 16 2 16 3 16 9 52 10 0 5 32 191 5 16 1 1 227 0 52 7 0 2 33 9 0 18 8 16 0 49 1 32 170 5 16 1 1 228 0 52 7 0 2 33 23 0 1 229 0 20 11 0 16 0 52 22 0 1 52 21 0 2 52 20 0 2 32 135 5 16 1 1 230 0 52 7 0 2 33 24 0 1 231 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 99 5 16 1 1 232 0 52 7 0 2 33 54 0 18 9 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 49 3 32 33 5 16 1 1 233 0 52 7 0 2 33 54 0 18 10 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 49 3 32 223 4 16 1 1 234 0 52 7 0 2 33 9 0 18 11 16 0 49 1 32 202 4 16 1 1 235 0 52 7 0 2 33 35 0 1 236 0 1 49 0 52 10 0 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 52 10 0 2 32 155 4 16 1 1 237 0 52 7 0 2 33 156 0 20 11 0 16 0 1 44 0 52 12 0 2 48 1 17 2 51 238 0 16 0 1 41 0 52 12 0 2 52 21 0 2 17 3 1 239 0 16 0 1 13 0 52 12 0 2 52 62 0 1 1 49 0 16 3 1 240 0 1 241 0 1 242 0 1 179 0 1 86 0 1 243 0 1 241 0 52 10 0 2 1 88 0 1 114 0 1 241 0 52 10 0 2 1 211 0 52 10 0 3 52 10 0 3 1 40 0 1 241 0 1 13 0 52 10 0 3 1 210 0 1 241 0 52 10 0 2 52 10 0 4 52 10 0 2 52 10 0 2 16 2 52 10 0 3 52 10 0 3 52 10 0 3 32 243 3 16 1 1 244 0 52 7 0 2 33 9 0 18 12 16 0 49 1 32 222 3 16 1 1 245 0 52 7 0 2 33 51 0 16 0 1 13 0 52 12 0 2 17 2 16 2 52 2 0 1 33 14 0 20 246 0 16 2 48 1 52 6 0 1 32 14 0 1 247 0 20 11 0 16 2 48 1 52 10 0 2 32 159 3 16 1 1 248 0 52 7 0 2 33 16 0 16 0 1 13 0 52 12 0 2 52 62 0 1 32 131 3 16 1 1 249 0 52 7 0 2 33 182 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 17 4 16 0 52 24 0 1 1 171 0 52 119 0 2 33 17 0 20 11 0 16 0 1 171 0 52 12 0 2 48 1 32 1 0 2 17 5 16 2 52 2 0 1 33 9 0 16 2 52 62 0 1 32 7 0 20 11 0 16 2 48 1 17 6 51 250 0 1 7 17 7 5 1 251 0 16 6 16 7 16 3 48 1 52 20 0 2 52 20 0 2 17 8 16 4 33 27 0 1 178 0 16 8 16 4 16 5 33 5 0 16 5 32 3 0 1 67 0 52 10 0 4 32 2 0 16 8 32 193 2 16 1 1 252 0 52 7 0 2 33 45 0 1 9 0 1 107 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 52 10 0 2 32 136 2 16 1 1 112 0 52 7 0 2 33 38 0 1 107 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 86 2 16 1 1 253 0 52 7 0 2 33 33 0 1 254 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 41 2 16 1 1 255 0 52 7 0 2 33 33 0 1 0 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 252 1 16 1 1 1 1 52 7 0 2 33 38 0 1 2 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 202 1 16 1 1 3 1 52 7 0 2 33 38 0 1 4 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 152 1 16 1 1 5 1 52 7 0 2 33 62 0 1 5 1 1 49 0 16 0 1 13 0 52 12 0 2 52 62 0 1 52 10 0 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 78 1 16 1 1 6 1 52 7 0 2 33 62 0 1 7 1 1 49 0 16 0 1 13 0 52 12 0 2 52 62 0 1 52 10 0 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 4 1 16 1 1 8 1 52 7 0 2 33 33 0 1 9 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 215 0 16 1 1 10 1 52 7 0 2 33 24 0 1 11 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 179 0 16 1 1 12 1 52 7 0 2 33 24 0 1 13 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 143 0 16 1 1 14 1 52 7 0 2 33 62 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 1 143 0 1 98 0 16 2 52 10 0 2 1 176 0 16 2 16 3 52 10 0 3 52 10 0 3 32 69 0 16 1 1 15 1 52 7 0 2 33 19 0 1 16 1 16 0 1 13 0 52 12 0 2 52 10 0 2 32 38 0 16 1 1 17 1 52 7 0 2 33 24 0 1 18 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 2 0 16 0 50)} "hs-to-sx-from-source" {:upvalue-count 0 :arity 1 :constants ("hs-to-sx" "hs-compile") :bytecode (20 0 0 20 1 0 16 0 48 1 49 1 50)}) :bytecode (1 2 0 52 1 0 1 17 0 1 3 0 52 1 0 1 17 1 51 4 0 17 2 5 51 5 0 1 0 17 3 5 51 6 0 17 4 5 51 7 0 17 5 5 51 8 0 17 6 5 51 9 0 17 7 5 51 10 0 17 8 5 51 11 0 17 9 5 51 12 0 17 10 5 51 13 0 1 0 17 11 5 51 14 0 1 0 17 12 5 51 15 0 17 13 5 51 16 0 1 0 1 1 1 3 1 8 1 5 1 9 1 6 1 7 1 10 1 11 1 12 1 4 1 13 128 0 0 5 51 18 0 128 17 0 50))) + :constants ("hs-to-sx" "make-symbol" "." "%" {:upvalue-count 0 :arity 1 :constants ("hs-to-sx") :bytecode (20 0 0 16 0 49 1 50)} {:upvalue-count 1 :arity 2 :constants ("not" "list?" "list" set! "first" "=" dom-set-prop "hs-to-sx" "nth" 1 2 attr dom-set-attr style dom-set-style ref "make-symbol" local define me dom-set-inner-html it query array-index host-set! of host-get) :bytecode (16 0 52 1 0 1 52 0 0 1 33 14 0 1 3 0 16 0 16 1 52 2 0 3 32 111 2 16 0 52 4 0 1 17 2 16 2 18 0 52 5 0 2 33 35 0 1 6 0 20 7 0 16 0 1 9 0 52 8 0 2 48 1 16 0 1 10 0 52 8 0 2 16 1 52 2 0 4 32 57 2 16 2 1 11 0 52 5 0 2 33 35 0 1 12 0 20 7 0 16 0 1 10 0 52 8 0 2 48 1 16 0 1 9 0 52 8 0 2 16 1 52 2 0 4 32 10 2 16 2 1 13 0 52 5 0 2 33 35 0 1 14 0 20 7 0 16 0 1 10 0 52 8 0 2 48 1 16 0 1 9 0 52 8 0 2 16 1 52 2 0 4 32 219 1 16 2 1 15 0 52 5 0 2 33 25 0 1 3 0 16 0 1 9 0 52 8 0 2 52 16 0 1 16 1 52 2 0 3 32 182 1 16 2 1 17 0 52 5 0 2 33 25 0 1 18 0 16 0 1 9 0 52 8 0 2 52 16 0 1 16 1 52 2 0 3 32 145 1 16 2 1 19 0 52 5 0 2 33 15 0 1 20 0 1 19 0 16 1 52 2 0 3 32 118 1 16 2 1 21 0 52 5 0 2 33 15 0 1 3 0 1 21 0 16 1 52 2 0 3 32 91 1 16 2 1 22 0 52 5 0 2 33 19 0 1 20 0 20 7 0 16 0 48 1 16 1 52 2 0 3 32 60 1 16 2 1 23 0 52 5 0 2 33 40 0 1 24 0 20 7 0 16 0 1 9 0 52 8 0 2 48 1 20 7 0 16 0 1 10 0 52 8 0 2 48 1 16 1 52 2 0 4 32 8 1 16 2 1 25 0 52 5 0 2 33 236 0 16 0 1 9 0 52 8 0 2 17 3 16 0 1 10 0 52 8 0 2 17 4 16 3 52 1 0 1 6 33 13 0 5 16 3 52 4 0 1 18 0 52 5 0 2 33 59 0 16 3 1 9 0 52 8 0 2 17 5 16 3 1 10 0 52 8 0 2 17 6 1 6 0 1 26 0 20 7 0 16 4 48 1 16 5 1 9 0 52 8 0 2 52 2 0 3 16 6 16 1 52 2 0 4 32 126 0 16 3 52 1 0 1 6 33 14 0 5 16 3 52 4 0 1 1 11 0 52 5 0 2 33 28 0 1 12 0 20 7 0 16 4 48 1 16 3 1 9 0 52 8 0 2 16 1 52 2 0 4 32 71 0 16 3 52 1 0 1 6 33 14 0 5 16 3 52 4 0 1 1 15 0 52 5 0 2 33 28 0 1 6 0 20 7 0 16 4 48 1 16 3 1 9 0 52 8 0 2 16 1 52 2 0 4 32 16 0 1 3 0 20 7 0 16 0 48 1 16 1 52 2 0 3 32 16 0 1 3 0 20 7 0 16 0 48 1 16 1 52 2 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("rest" "first" {:upvalue-count 2 :arity 6 :constants ("<=" "len" 1 ">" 0 "first" "hs-to-sx" me "list?" "=" do {:upvalue-count 0 :arity 1 :constants ("list?" "=" "first" ref) :bytecode (16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 50)} "rest" "list" {:upvalue-count 0 :arity 1 :constants ("not" "list?" "=" "first" ref) :bytecode (16 0 52 1 0 1 6 33 14 0 5 16 0 52 3 0 1 1 4 0 52 2 0 2 52 0 0 1 50)} "cons" "map" {:upvalue-count 0 :arity 1 :constants ("nth" 1 "list" "make-symbol" get event "detail") :bytecode (16 0 1 1 0 52 0 0 2 17 1 16 1 52 3 0 1 1 4 0 1 4 0 1 5 0 1 6 0 52 2 0 3 16 1 52 2 0 3 52 2 0 2 50)} let "make-symbol" "nth" guard fn event hs-on-every hs-on "from" "filter" "every" "catch" "finally") :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 155 1 16 0 52 1 0 1 1 4 0 52 3 0 2 33 9 0 16 0 52 5 0 1 32 1 0 2 17 6 16 1 33 10 0 20 6 0 16 1 48 1 32 3 0 1 7 0 17 7 16 6 52 8 0 1 6 33 14 0 5 16 6 52 5 0 1 1 10 0 52 9 0 2 33 16 0 16 2 51 11 0 16 6 52 12 0 1 48 2 32 4 0 52 13 0 0 17 8 16 8 52 1 0 1 1 4 0 52 3 0 2 33 52 0 16 2 51 14 0 16 6 52 12 0 1 48 2 17 9 16 9 52 1 0 1 1 2 0 52 9 0 2 33 9 0 16 9 52 5 0 1 32 9 0 1 10 0 16 9 52 15 0 2 32 2 0 16 6 17 9 20 6 0 16 9 48 1 17 10 16 8 52 1 0 1 1 4 0 52 3 0 2 33 25 0 51 17 0 16 8 52 16 0 2 17 11 1 18 0 16 11 16 10 52 13 0 3 32 2 0 16 10 17 11 16 4 33 100 0 16 4 1 4 0 52 20 0 2 52 19 0 1 17 12 20 6 0 16 4 1 2 0 52 20 0 2 48 1 17 13 16 5 33 39 0 1 10 0 1 21 0 16 12 3 16 13 52 13 0 2 52 13 0 2 16 11 52 13 0 3 20 6 0 16 5 48 1 52 13 0 3 32 22 0 1 21 0 16 12 3 16 13 52 13 0 2 52 13 0 2 16 11 52 13 0 3 32 26 0 16 5 33 19 0 1 10 0 16 11 20 6 0 16 5 48 1 52 13 0 3 32 2 0 16 11 17 12 1 22 0 1 23 0 52 13 0 1 16 12 52 13 0 3 17 13 16 3 33 16 0 1 24 0 16 7 18 0 16 13 52 13 0 4 32 13 0 1 25 0 16 7 18 0 16 13 52 13 0 4 32 6 1 16 0 52 5 0 1 1 26 0 52 9 0 2 33 34 0 18 1 16 0 52 12 0 1 52 12 0 1 16 0 1 2 0 52 20 0 2 16 2 16 3 16 4 16 5 49 6 32 212 0 16 0 52 5 0 1 1 27 0 52 9 0 2 33 34 0 18 1 16 0 52 12 0 1 52 12 0 1 16 1 16 0 1 2 0 52 20 0 2 16 3 16 4 16 5 49 6 32 162 0 16 0 52 5 0 1 1 28 0 52 9 0 2 33 26 0 18 1 16 0 52 12 0 1 52 12 0 1 16 1 16 2 3 16 4 16 5 49 6 32 120 0 16 0 52 5 0 1 1 29 0 52 9 0 2 33 34 0 18 1 16 0 52 12 0 1 52 12 0 1 16 1 16 2 16 3 16 0 1 2 0 52 20 0 2 16 5 49 6 32 70 0 16 0 52 5 0 1 1 30 0 52 9 0 2 33 34 0 18 1 16 0 52 12 0 1 52 12 0 1 16 1 16 2 16 3 16 4 16 0 1 2 0 52 20 0 2 49 6 32 20 0 18 1 16 0 52 12 0 1 16 1 16 2 16 3 16 4 16 5 49 6 50)}) :bytecode (16 0 52 0 0 1 17 1 16 1 52 1 0 1 17 2 51 2 0 1 2 1 3 17 3 5 16 3 16 1 52 0 0 1 2 2 4 2 2 49 6 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 "rest" "=" "len" 4 "list?" 2 "first" dict "list" dom-dispatch "hs-to-sx" 3 me) :bytecode (16 0 1 1 0 52 0 0 2 17 1 16 0 52 2 0 1 52 2 0 1 17 2 16 0 52 4 0 1 1 5 0 52 3 0 2 6 33 39 0 5 16 0 1 7 0 52 0 0 2 52 6 0 1 6 33 21 0 5 16 0 1 7 0 52 0 0 2 52 8 0 1 1 9 0 52 3 0 2 33 40 0 1 11 0 20 12 0 16 0 1 13 0 52 0 0 2 48 1 16 1 20 12 0 16 0 1 7 0 52 0 0 2 48 1 52 10 0 4 32 56 0 16 0 52 4 0 1 1 13 0 52 3 0 2 33 27 0 1 11 0 20 12 0 16 0 1 7 0 52 0 0 2 48 1 16 1 2 52 10 0 4 32 13 0 1 11 0 1 14 0 16 1 2 52 10 0 4 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 "hs-to-sx" 2 "list?" "=" "first" forever "list" hs-repeat-forever fn times hs-repeat-times "number?" while hs-repeat-while until hs-repeat-until) :bytecode (16 0 1 1 0 52 0 0 2 17 1 20 2 0 16 0 1 3 0 52 0 0 2 48 1 17 2 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 7 0 52 5 0 2 33 23 0 1 9 0 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 2 32 27 1 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 11 0 52 5 0 2 33 37 0 1 12 0 20 2 0 16 1 1 1 0 52 0 0 2 48 1 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 219 0 16 1 52 13 0 1 33 25 0 1 12 0 16 1 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 185 0 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 14 0 52 5 0 2 33 52 0 20 2 0 16 1 1 1 0 52 0 0 2 48 1 17 3 1 15 0 1 10 0 52 8 0 0 16 3 52 8 0 3 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 106 0 16 1 52 4 0 1 6 33 14 0 5 16 1 52 6 0 1 1 16 0 52 5 0 2 33 52 0 20 2 0 16 1 1 1 0 52 0 0 2 48 1 17 3 1 17 0 1 10 0 52 8 0 0 16 3 52 8 0 3 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 32 27 0 1 12 0 20 2 0 16 1 48 1 1 10 0 52 8 0 0 16 2 52 8 0 3 52 8 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 "hs-to-sx" 2 3 ">" "len" 4 "=" "index" "list" map-indexed fn "make-symbol" 5 hs-for-each) :bytecode (16 0 1 1 0 52 0 0 2 17 1 20 2 0 16 0 1 3 0 52 0 0 2 48 1 17 2 20 2 0 16 0 1 4 0 52 0 0 2 48 1 17 3 16 0 52 6 0 1 1 7 0 52 5 0 2 6 33 17 0 5 16 0 1 7 0 52 0 0 2 1 9 0 52 8 0 2 33 44 0 1 11 0 1 12 0 16 0 1 14 0 52 0 0 2 52 13 0 1 16 1 52 13 0 1 52 10 0 2 16 3 52 10 0 3 16 2 52 10 0 3 32 28 0 1 15 0 1 12 0 16 1 52 13 0 1 52 10 0 1 16 3 52 10 0 3 16 2 52 10 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 ">" "len" 2 "=" "from" "list" hs-wait-for "hs-to-sx" 3 me) :bytecode (16 0 1 1 0 52 0 0 2 17 1 16 0 52 3 0 1 1 4 0 52 2 0 2 6 33 17 0 5 16 0 1 4 0 52 0 0 2 1 6 0 52 5 0 2 33 26 0 1 8 0 20 9 0 16 0 1 10 0 52 0 0 2 48 1 16 1 52 7 0 3 32 12 0 1 8 0 1 11 0 16 1 52 7 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("hs-to-sx" "nth" 1 2 3 4 "list" hs-transition "nil?" me) :bytecode (20 0 0 16 0 1 2 0 52 1 0 2 48 1 17 1 20 0 0 16 0 1 3 0 52 1 0 2 48 1 17 2 16 0 1 4 0 52 1 0 2 17 3 16 0 1 5 0 52 1 0 2 17 4 1 7 0 16 4 52 8 0 1 33 6 0 1 9 0 32 7 0 20 0 0 16 4 48 1 16 1 16 2 16 3 33 10 0 20 0 0 16 3 48 1 32 1 0 2 52 6 0 5 50)} {:upvalue-count 0 :arity 1 :constants ("=" "len" 3 "list" let "make-symbol" "nth" 2 hs-make 1) :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 60 0 1 4 0 16 0 1 7 0 52 6 0 2 52 5 0 1 1 8 0 16 0 1 9 0 52 6 0 2 52 3 0 2 52 3 0 2 52 3 0 1 16 0 1 7 0 52 6 0 2 52 5 0 1 52 3 0 3 32 16 0 1 8 0 16 0 1 9 0 52 6 0 2 52 3 0 2 50)} {:upvalue-count 1 :arity 3 :constants ("list?" "=" "first" attr "hs-to-sx" me "list" dom-set-attr "nth" 1 + parse-number dom-get-attr 2 host-set! host-get style dom-set-style dom-get-style set!) :bytecode (16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 33 75 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 1 7 0 16 3 16 0 1 9 0 52 8 0 2 1 10 0 1 11 0 1 12 0 16 3 16 0 1 9 0 52 8 0 2 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 222 0 16 0 52 0 0 1 6 33 13 0 5 16 0 52 2 0 1 18 0 52 1 0 2 33 68 0 20 4 0 16 0 1 9 0 52 8 0 2 48 1 17 3 16 0 1 13 0 52 8 0 2 17 4 1 14 0 16 3 16 4 1 10 0 1 11 0 1 15 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 128 0 16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 16 0 52 1 0 2 33 72 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 16 0 1 9 0 52 8 0 2 17 4 1 17 0 16 3 16 4 1 10 0 1 11 0 1 18 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 29 0 20 4 0 16 0 48 1 17 3 1 19 0 16 3 1 10 0 16 3 16 1 52 6 0 3 52 6 0 3 50)} {:upvalue-count 1 :arity 3 :constants ("list?" "=" "first" attr "hs-to-sx" me "list" dom-set-attr "nth" 1 - parse-number dom-get-attr 2 host-set! host-get style dom-set-style dom-get-style set!) :bytecode (16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 33 75 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 1 7 0 16 3 16 0 1 9 0 52 8 0 2 1 10 0 1 11 0 1 12 0 16 3 16 0 1 9 0 52 8 0 2 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 222 0 16 0 52 0 0 1 6 33 13 0 5 16 0 52 2 0 1 18 0 52 1 0 2 33 68 0 20 4 0 16 0 1 9 0 52 8 0 2 48 1 17 3 16 0 1 13 0 52 8 0 2 17 4 1 14 0 16 3 16 4 1 10 0 1 11 0 1 15 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 128 0 16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 16 0 52 1 0 2 33 72 0 16 2 33 10 0 20 4 0 16 2 48 1 32 3 0 1 5 0 17 3 16 0 1 9 0 52 8 0 2 17 4 1 17 0 16 3 16 4 1 10 0 1 11 0 1 18 0 16 3 16 4 52 6 0 3 52 6 0 2 16 1 52 6 0 3 52 6 0 4 32 29 0 20 4 0 16 0 48 1 17 3 1 19 0 16 3 1 10 0 16 3 16 1 52 6 0 3 52 6 0 3 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1 2 3 "list" define "make-symbol" fn "cons" me "map" do "hs-to-sx") :bytecode (16 0 1 1 0 52 0 0 2 17 1 16 0 1 2 0 52 0 0 2 17 2 16 0 1 3 0 52 0 0 2 17 3 1 5 0 16 1 52 6 0 1 1 7 0 1 9 0 20 6 0 16 2 52 10 0 2 52 8 0 2 1 11 0 20 12 0 16 3 52 10 0 2 52 8 0 2 52 4 0 3 52 4 0 3 50)} {:upvalue-count 13 :arity 1 :constants ("nil?" "number?" "string?" "boolean?" "not" "list?" "first" "=" null-literal not "list" "hs-to-sx" "nth" 1 starts-with? ends-with? contains? precedes? follows? exists? "cons" "map" "rest" object-literal "len" 0 dict hs-make-object list {:upvalue-count 0 :arity 1 :constants ("list" list "first" "hs-to-sx" "nth" 1) :bytecode (1 1 0 16 0 52 2 0 1 20 3 0 16 0 1 5 0 52 4 0 2 48 1 52 0 0 3 50)} template "" {:upvalue-count 2 :arity 0 :constants (">" "len" 0 "append" "list" "") :bytecode (18 0 52 1 0 1 1 2 0 52 0 0 2 33 23 0 18 1 18 0 52 4 0 1 52 3 0 2 19 1 5 1 5 0 19 0 32 1 0 2 50)} {:upvalue-count 3 :arity 1 :constants ("<" "nth" ">=" "a" "<=" "z" "A" "Z" "0" "9" "=" "_" "." "+" 1) :bytecode (16 0 18 0 52 0 0 2 6 33 118 0 5 18 1 16 0 52 1 0 2 17 1 16 1 1 3 0 52 2 0 2 6 33 10 0 5 16 1 1 5 0 52 4 0 2 6 34 80 0 5 16 1 1 6 0 52 2 0 2 6 33 10 0 5 16 1 1 7 0 52 4 0 2 6 34 52 0 5 16 1 1 8 0 52 2 0 2 6 33 10 0 5 16 1 1 9 0 52 4 0 2 6 34 24 0 5 16 1 1 11 0 52 10 0 2 6 34 10 0 5 16 1 1 12 0 52 10 0 2 33 16 0 18 2 16 0 1 14 0 52 13 0 2 49 1 32 2 0 16 0 50)} {:upvalue-count 3 :arity 2 :constants (">=" "=" "nth" "}" 1 "+" "-" "{") :bytecode (16 0 18 0 52 0 0 2 33 5 0 16 0 32 118 0 18 1 16 0 52 2 0 2 1 3 0 52 1 0 2 33 42 0 16 1 1 4 0 52 1 0 2 33 5 0 16 0 32 22 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 6 0 2 49 2 32 58 0 18 1 16 0 52 2 0 2 1 7 0 52 1 0 2 33 25 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 5 0 2 49 2 32 15 0 18 2 16 0 1 4 0 52 5 0 2 16 1 49 2 50)} {:upvalue-count 9 :arity 0 :constants ("<" "nth" "=" "$" "+" 1 "{" 2 "slice" "append" "list" "hs-to-sx" "hs-compile" "str") :bytecode (18 0 18 1 52 0 0 2 33 253 0 18 2 18 0 52 1 0 2 17 0 16 0 1 3 0 52 2 0 2 6 33 16 0 5 18 0 1 5 0 52 4 0 2 18 1 52 0 0 2 33 181 0 18 2 18 0 1 5 0 52 4 0 2 52 1 0 2 1 6 0 52 2 0 2 33 83 0 18 0 1 7 0 52 4 0 2 17 1 18 3 16 1 1 5 0 48 2 17 2 18 2 16 1 16 2 52 8 0 3 17 3 18 4 48 0 5 18 5 20 11 0 20 12 0 16 3 48 1 48 1 52 10 0 1 52 9 0 2 19 5 5 16 2 1 5 0 52 4 0 2 19 0 5 18 6 49 0 32 70 0 18 0 1 5 0 52 4 0 2 17 1 18 7 16 1 48 1 17 2 18 2 16 1 16 2 52 8 0 3 17 3 18 4 48 0 5 18 5 20 11 0 20 12 0 16 3 48 1 48 1 52 10 0 1 52 9 0 2 19 5 5 16 2 19 0 5 18 6 49 0 32 27 0 18 8 16 0 52 13 0 2 19 8 5 18 0 1 5 0 52 4 0 2 19 0 5 18 6 49 0 32 1 0 2 50)} str beep! hs-beep array-index nth 2 array-slice hs-slice 3 prop-is hs-prop-is coll-where filter fn it coll-sorted hs-sorted-by coll-sorted-desc hs-sorted-by-desc coll-mapped map coll-split hs-split-by coll-joined hs-joined-by method-call "make-symbol" "." hs-method-call string-postfix block-literal me event hs-first "last" hs-last host-get ref query hs-query-first attr dom-get-attr style dom-get-style has-class? dom-has-class? local array no hs-falsy? and or = + hs-add - * / "%" modulo empty? hs-empty? nil? matches? hs-matches? matches-ignore-case? hs-matches-ignore-case? starts-with-ic? hs-starts-with-ic? ends-with-ic? hs-ends-with-ic? hs-contains? contains-ignore-case? hs-contains-ignore-case? as hs-coerce in? of first last "!=" "<" < ">" > "<=" <= ">=" >= closest dom-closest next hs-next previous hs-previous hs-query-last add-class for-each _el dom-add-class hs-query-all set-style dom-set-style set-styles do {:upvalue-count 1 :arity 1 :constants ("list" dom-set-style "first" "nth" 1) :bytecode (1 1 0 18 0 16 0 52 2 0 1 16 0 1 4 0 52 3 0 2 52 0 0 4 50)} multi-add-class {:upvalue-count 1 :arity 1 :constants ("list" dom-add-class) :bytecode (1 1 0 18 0 16 0 52 0 0 3 50)} add-class-when host-call "querySelectorAll" when multi-remove-class {:upvalue-count 1 :arity 1 :constants ("list" dom-remove-class) :bytecode (1 1 0 18 0 16 0 52 0 0 3 50)} remove-class dom-remove-class remove-element dom-remove add-value set! hs-add-to! remove-value hs-remove-from! empty-target hs-empty-target! open-element hs-open! close-element hs-close! swap! let _swap_tmp remove-attr dom-remove-attr remove-css {:upvalue-count 1 :arity 1 :constants ("list" dom-set-style "") :bytecode (1 1 0 18 0 16 0 1 2 0 52 0 0 4 50)} toggle-class hs-toggle-class! toggle-class-for perform io-sleep set-on hs-set-on! toggle-between hs-toggle-between! toggle-style hs-toggle-style! toggle-style-between hs-toggle-style-between! 4 toggle-style-cycle hs-toggle-style-cycle! "slice" toggle-attr hs-toggle-attr! toggle-attr-between hs-toggle-attr-between! put! hs-put! if "some" {:upvalue-count 0 :arity 1 :constants ("list?" "=" "first" hs-fetch hs-wait perform) :bytecode (16 0 52 0 0 1 6 33 50 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 6 34 32 0 5 16 0 52 2 0 1 1 4 0 52 1 0 2 6 34 14 0 5 16 0 52 2 0 1 1 5 0 52 1 0 2 50)} "reduce" {:upvalue-count 0 :arity 2 :constants ("list" let it) :bytecode (1 1 0 1 2 0 16 1 52 0 0 2 52 0 0 1 16 0 52 0 0 3 50)} "-" "reverse" wait hs-wait wait-for log console-log send trigger dom-dispatch hide "display" hs-hide! show hs-show! transition transition-from 5 hs-transition-from repeat repeat-until hs-repeat-until repeat-while hs-repeat-while fetch hs-fetch fetch-gql hs-fetch-gql call return raise "hs-return" throw settle hs-settle go hs-navigate! append! "symbol?" hs-append hs-append! tell you yourself for take! 6 "attr" hs-take! make install hs-install measure hs-measure increment! decrement! break "hs-break" continue "hs-continue" exit on init hs-init def {:upvalue-count 0 :arity 1 :constants ("list?" "=" "first" ref "make-symbol" "nth" 1) :bytecode (16 0 52 0 0 1 6 33 14 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 33 16 0 16 0 1 6 0 52 5 0 2 52 4 0 1 32 6 0 16 0 52 4 0 1 50)} define guard _e true list? behavior sx-eval "sx-parse" cek-eval component render {:upvalue-count 1 :arity 1 :constants ("<" "len" 2 "list" "cons" "make-keyword" "first" "hs-to-sx" "nth" 1 "rest") :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 7 0 52 3 0 0 32 46 0 16 0 52 6 0 1 52 5 0 1 20 7 0 16 0 1 9 0 52 8 0 2 48 1 18 0 16 0 52 10 0 1 52 10 0 1 48 1 52 4 0 2 52 4 0 2 50)} render-to-html not-in? type-check hs-type-check type-check-strict hs-type-check-strict strict-eq hs-strict-eq eq-ignore-case hs-eq-ignore-case some every every? scroll! hs-scroll! select! hs-select! reset! hs-reset! default! halt! hs-halt! focus! dom-focus) :bytecode (16 0 52 0 0 1 33 4 0 2 32 210 33 16 0 52 1 0 1 33 5 0 16 0 32 196 33 16 0 52 2 0 1 33 5 0 16 0 32 182 33 16 0 52 3 0 1 33 5 0 16 0 32 168 33 16 0 52 5 0 1 52 4 0 1 33 5 0 16 0 32 150 33 16 0 52 6 0 1 17 1 16 1 1 8 0 52 7 0 2 33 4 0 2 32 126 33 16 1 1 9 0 52 7 0 2 33 24 0 1 9 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 90 33 16 1 1 14 0 52 7 0 2 6 34 66 0 5 16 1 1 15 0 52 7 0 2 6 34 52 0 5 16 1 1 16 0 52 7 0 2 6 34 38 0 5 16 1 1 17 0 52 7 0 2 6 34 24 0 5 16 1 1 18 0 52 7 0 2 6 34 10 0 5 16 1 1 19 0 52 7 0 2 33 22 0 16 1 20 11 0 16 0 52 22 0 1 52 21 0 2 52 20 0 2 32 242 32 16 1 1 23 0 52 7 0 2 33 67 0 16 0 1 13 0 52 12 0 2 17 2 16 2 52 24 0 1 1 25 0 52 7 0 2 33 10 0 1 26 0 52 10 0 1 32 27 0 1 27 0 1 28 0 51 29 0 16 2 52 21 0 2 52 20 0 2 52 10 0 1 52 20 0 2 32 163 32 16 1 1 30 0 52 7 0 2 33 115 0 16 0 1 13 0 52 12 0 2 17 2 52 10 0 0 17 3 1 31 0 17 4 1 25 0 17 5 16 2 52 24 0 1 17 6 51 32 0 1 4 1 3 17 7 5 51 33 0 1 6 1 2 1 8 17 8 5 51 34 0 1 6 1 2 1 9 17 9 5 51 35 0 1 5 1 6 1 2 1 9 1 7 1 3 1 10 1 8 1 4 17 10 5 16 10 48 0 5 16 7 48 0 5 1 36 0 16 3 52 20 0 2 32 36 32 16 1 1 37 0 52 7 0 2 33 24 0 1 38 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 0 32 16 1 1 39 0 52 7 0 2 33 38 0 1 40 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 206 31 16 1 1 42 0 52 7 0 2 33 52 0 1 43 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 4 32 142 31 16 1 1 45 0 52 7 0 2 33 33 0 1 46 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 97 31 16 1 1 47 0 52 7 0 2 33 52 0 1 48 0 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 33 31 16 1 1 51 0 52 7 0 2 33 52 0 1 52 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 3 32 225 30 16 1 1 53 0 52 7 0 2 33 52 0 1 54 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 3 32 161 30 16 1 1 55 0 52 7 0 2 33 52 0 1 56 0 1 49 0 1 50 0 52 10 0 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 97 30 16 1 1 57 0 52 7 0 2 33 38 0 1 58 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 47 30 16 1 1 59 0 52 7 0 2 33 38 0 1 60 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 253 29 16 1 1 61 0 52 7 0 2 33 134 0 16 0 1 13 0 52 12 0 2 17 2 20 11 0 16 0 1 41 0 52 12 0 2 52 21 0 2 17 3 16 2 52 5 0 1 6 33 18 0 5 16 2 52 6 0 1 1 63 0 52 62 0 1 52 7 0 2 33 51 0 20 11 0 16 2 1 13 0 52 12 0 2 48 1 17 4 16 2 1 41 0 52 12 0 2 17 5 1 64 0 16 4 16 5 16 3 52 20 0 2 52 20 0 2 52 20 0 2 32 20 0 1 64 0 20 11 0 16 2 48 1 16 3 52 20 0 2 52 20 0 2 32 107 29 16 1 1 65 0 52 7 0 2 33 33 0 1 36 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 62 29 16 1 1 66 0 52 7 0 2 33 69 0 20 62 0 16 0 1 13 0 52 12 0 2 52 21 0 2 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 16 2 52 24 0 1 1 25 0 52 7 0 2 33 5 0 16 3 32 11 0 1 49 0 16 2 16 3 52 10 0 3 32 237 28 16 1 1 67 0 52 7 0 2 33 6 0 1 67 0 32 219 28 16 1 1 50 0 52 7 0 2 33 6 0 1 50 0 32 201 28 16 1 1 68 0 52 7 0 2 33 6 0 1 68 0 32 183 28 16 1 18 0 52 7 0 2 33 89 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 1 41 0 52 12 0 2 17 3 16 3 1 6 0 52 7 0 2 33 12 0 1 69 0 16 2 52 10 0 2 32 35 0 16 3 1 70 0 52 7 0 2 33 12 0 1 71 0 16 2 52 10 0 2 32 11 0 1 72 0 16 2 16 3 52 10 0 3 32 83 28 16 1 1 73 0 52 7 0 2 33 16 0 16 0 1 13 0 52 12 0 2 52 62 0 1 32 55 28 16 1 1 74 0 52 7 0 2 33 19 0 1 75 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 24 28 16 1 1 76 0 52 7 0 2 33 33 0 1 77 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 235 27 16 1 1 78 0 52 7 0 2 33 33 0 1 79 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 190 27 16 1 1 80 0 52 7 0 2 33 33 0 1 81 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 145 27 16 1 1 82 0 52 7 0 2 33 16 0 16 0 1 13 0 52 12 0 2 52 62 0 1 32 117 27 16 1 1 83 0 52 7 0 2 33 23 0 1 28 0 20 11 0 16 0 52 22 0 1 52 21 0 2 52 20 0 2 32 82 27 16 1 1 9 0 52 7 0 2 33 24 0 1 9 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 46 27 16 1 1 84 0 52 7 0 2 33 24 0 1 85 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 10 27 16 1 1 86 0 52 7 0 2 33 38 0 1 86 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 216 26 16 1 1 87 0 52 7 0 2 33 38 0 1 87 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 166 26 16 1 1 88 0 52 7 0 2 33 38 0 1 88 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 116 26 16 1 1 89 0 52 7 0 2 33 38 0 1 90 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 66 26 16 1 1 91 0 52 7 0 2 33 38 0 1 91 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 16 26 16 1 1 92 0 52 7 0 2 33 38 0 1 92 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 222 25 16 1 1 93 0 52 7 0 2 33 38 0 1 93 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 172 25 16 1 18 1 52 7 0 2 33 81 0 16 0 1 41 0 52 12 0 2 52 0 0 1 33 27 0 1 36 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 1 94 0 52 10 0 3 32 35 0 1 95 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 80 25 16 1 1 96 0 52 7 0 2 33 24 0 1 97 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 44 25 16 1 1 19 0 52 7 0 2 33 31 0 1 9 0 1 98 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 52 10 0 2 32 1 25 16 1 1 99 0 52 7 0 2 33 99 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 3 52 5 0 1 6 33 14 0 5 16 3 52 6 0 1 1 74 0 52 7 0 2 33 26 0 1 100 0 20 11 0 16 2 48 1 16 3 1 13 0 52 12 0 2 52 10 0 3 32 21 0 1 100 0 20 11 0 16 2 48 1 20 11 0 16 3 48 1 52 10 0 3 32 146 24 16 1 1 101 0 52 7 0 2 33 38 0 1 102 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 96 24 16 1 1 103 0 52 7 0 2 33 38 0 1 104 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 46 24 16 1 1 105 0 52 7 0 2 33 38 0 1 106 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 252 23 16 1 1 16 0 52 7 0 2 33 38 0 1 107 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 202 23 16 1 1 108 0 52 7 0 2 33 38 0 1 109 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 152 23 16 1 1 110 0 52 7 0 2 33 33 0 1 111 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 107 23 16 1 1 112 0 52 7 0 2 33 38 0 1 107 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 57 23 16 1 1 113 0 52 7 0 2 33 94 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 16 2 1 114 0 52 7 0 2 33 12 0 1 114 0 16 3 52 10 0 2 32 35 0 16 2 1 115 0 52 7 0 2 33 12 0 1 115 0 16 3 52 10 0 2 32 11 0 1 72 0 16 3 16 2 52 10 0 3 32 207 22 16 1 1 116 0 52 7 0 2 33 45 0 1 9 0 1 88 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 2 32 150 22 16 1 1 117 0 52 7 0 2 33 38 0 1 118 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 100 22 16 1 1 119 0 52 7 0 2 33 38 0 1 120 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 50 22 16 1 1 121 0 52 7 0 2 33 38 0 1 122 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 0 22 16 1 1 123 0 52 7 0 2 33 38 0 1 124 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 206 21 16 1 1 125 0 52 7 0 2 33 33 0 1 126 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 161 21 16 1 1 127 0 52 7 0 2 33 33 0 1 128 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 116 21 16 1 1 129 0 52 7 0 2 33 33 0 1 130 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 71 21 16 1 1 114 0 52 7 0 2 33 68 0 16 0 52 24 0 1 1 41 0 52 119 0 2 33 33 0 1 69 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 16 0 1 75 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 247 20 16 1 1 115 0 52 7 0 2 33 68 0 16 0 52 24 0 1 1 41 0 52 119 0 2 33 33 0 1 71 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 16 0 1 131 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 167 20 16 1 1 132 0 52 7 0 2 33 123 0 16 0 1 41 0 52 12 0 2 17 2 16 2 52 5 0 1 6 33 14 0 5 16 2 52 6 0 1 1 74 0 52 7 0 2 33 59 0 1 133 0 1 49 0 1 134 0 52 10 0 1 1 135 0 1 134 0 16 0 1 13 0 52 12 0 2 52 10 0 3 52 10 0 3 1 136 0 16 2 1 13 0 52 12 0 2 52 10 0 2 52 10 0 3 32 23 0 1 135 0 20 11 0 16 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 32 20 16 1 1 137 0 52 7 0 2 33 42 0 1 138 0 20 11 0 16 0 1 44 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 52 10 0 4 32 234 19 16 1 1 139 0 52 7 0 2 33 48 0 16 0 1 13 0 52 12 0 2 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 1 140 0 51 141 0 1 3 16 2 52 21 0 2 52 20 0 2 32 174 19 16 1 1 142 0 52 7 0 2 33 49 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 22 0 1 52 22 0 1 17 3 1 140 0 51 143 0 1 2 16 3 52 21 0 2 52 20 0 2 32 113 19 16 1 1 144 0 52 7 0 2 33 253 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 0 1 44 0 52 12 0 2 17 4 16 3 52 5 0 1 6 33 14 0 5 16 3 52 6 0 1 1 74 0 52 7 0 2 33 19 0 1 136 0 16 3 1 13 0 52 12 0 2 52 10 0 2 32 120 0 16 3 52 5 0 1 6 33 57 0 5 16 3 52 6 0 1 1 112 0 52 7 0 2 6 33 39 0 5 16 3 1 13 0 52 12 0 2 52 5 0 1 6 33 21 0 5 16 3 1 13 0 52 12 0 2 52 6 0 1 1 74 0 52 7 0 2 33 43 0 1 145 0 20 11 0 16 3 1 41 0 52 12 0 2 48 1 1 146 0 16 3 1 13 0 52 12 0 2 1 13 0 52 12 0 2 52 10 0 4 32 7 0 20 11 0 16 3 48 1 17 5 1 133 0 1 49 0 1 50 0 52 10 0 1 1 147 0 20 11 0 16 4 48 1 1 135 0 1 50 0 16 2 52 10 0 3 52 10 0 3 52 10 0 3 16 5 52 10 0 3 32 104 18 16 1 1 148 0 52 7 0 2 33 49 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 22 0 1 52 22 0 1 17 3 1 140 0 51 149 0 1 2 16 3 52 21 0 2 52 20 0 2 32 43 18 16 1 1 150 0 52 7 0 2 33 138 0 16 0 1 41 0 52 12 0 2 17 2 16 2 52 5 0 1 6 33 14 0 5 16 2 52 6 0 1 1 74 0 52 7 0 2 33 59 0 1 133 0 1 49 0 1 134 0 52 10 0 1 1 151 0 1 134 0 16 0 1 13 0 52 12 0 2 52 10 0 3 52 10 0 3 1 136 0 16 2 1 13 0 52 12 0 2 52 10 0 2 52 10 0 3 32 38 0 1 151 0 16 2 52 0 0 1 33 6 0 1 67 0 32 7 0 20 11 0 16 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 149 17 16 1 1 152 0 52 7 0 2 33 24 0 1 153 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 113 17 16 1 1 154 0 52 7 0 2 33 60 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 1 41 0 52 12 0 2 17 3 1 155 0 20 11 0 16 3 48 1 1 156 0 16 2 20 11 0 16 3 48 1 52 10 0 3 52 10 0 3 32 41 17 16 1 1 157 0 52 7 0 2 33 60 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 1 41 0 52 12 0 2 17 3 1 155 0 20 11 0 16 3 48 1 1 158 0 16 2 20 11 0 16 3 48 1 52 10 0 3 52 10 0 3 32 225 16 16 1 1 159 0 52 7 0 2 33 24 0 1 160 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 189 16 16 1 1 161 0 52 7 0 2 33 24 0 1 162 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 153 16 16 1 1 163 0 52 7 0 2 33 24 0 1 164 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 117 16 16 1 1 165 0 52 7 0 2 33 79 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 1 166 0 1 167 0 20 11 0 16 2 48 1 52 10 0 2 52 10 0 1 1 140 0 18 2 16 2 20 11 0 16 3 48 1 48 2 18 2 16 3 1 167 0 48 2 52 10 0 3 52 10 0 3 32 26 16 16 1 1 168 0 52 7 0 2 33 59 0 16 0 1 41 0 52 12 0 2 52 0 0 1 33 6 0 1 67 0 32 14 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 2 1 169 0 16 2 16 0 1 13 0 52 12 0 2 52 10 0 3 32 211 15 16 1 1 170 0 52 7 0 2 33 70 0 16 0 1 41 0 52 12 0 2 52 0 0 1 33 6 0 1 67 0 32 14 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 2 16 0 1 13 0 52 12 0 2 17 3 1 140 0 51 171 0 1 2 16 3 52 21 0 2 52 20 0 2 32 129 15 16 1 1 172 0 52 7 0 2 33 33 0 1 173 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 84 15 16 1 1 174 0 52 7 0 2 33 101 0 1 140 0 1 173 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 1 175 0 1 28 0 1 176 0 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 3 52 10 0 2 1 173 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 52 10 0 4 32 227 14 16 1 1 177 0 52 7 0 2 33 38 0 1 178 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 177 14 16 1 1 179 0 52 7 0 2 33 42 0 1 180 0 20 11 0 16 0 1 44 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 52 10 0 4 32 123 14 16 1 1 181 0 52 7 0 2 33 52 0 16 0 1 41 0 52 12 0 2 17 2 1 182 0 16 2 52 0 0 1 33 6 0 1 67 0 32 7 0 20 11 0 16 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 59 14 16 1 1 183 0 52 7 0 2 33 61 0 1 184 0 20 11 0 16 0 1 185 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 5 32 242 13 16 1 1 186 0 52 7 0 2 33 62 0 1 187 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 1 28 0 20 11 0 16 0 1 44 0 16 0 52 24 0 1 52 188 0 3 52 21 0 2 52 20 0 2 52 10 0 4 32 168 13 16 1 1 189 0 52 7 0 2 33 33 0 1 190 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 52 10 0 3 32 123 13 16 1 1 191 0 52 7 0 2 33 61 0 1 192 0 20 11 0 16 0 1 185 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 5 32 50 13 16 1 1 155 0 52 7 0 2 33 30 0 18 2 16 0 1 13 0 52 12 0 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 49 2 32 8 13 16 1 1 193 0 52 7 0 2 33 47 0 1 194 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 4 32 205 12 16 1 1 195 0 52 7 0 2 33 106 0 16 0 52 24 0 1 1 44 0 52 119 0 2 33 52 0 1 195 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 4 32 35 0 1 147 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 87 12 16 1 1 140 0 52 7 0 2 33 100 0 20 11 0 16 0 52 22 0 1 52 21 0 2 17 2 16 2 52 24 0 1 1 13 0 52 119 0 2 6 33 10 0 5 51 197 0 16 2 52 196 0 2 33 43 0 51 199 0 16 2 16 2 52 24 0 1 1 13 0 52 200 0 2 52 12 0 2 16 2 52 201 0 1 52 22 0 1 52 201 0 1 52 198 0 3 32 9 0 1 140 0 16 2 52 20 0 2 32 231 11 16 1 1 202 0 52 7 0 2 33 19 0 1 203 0 16 0 1 13 0 52 12 0 2 52 10 0 2 32 200 11 16 1 1 204 0 52 7 0 2 33 9 0 18 3 16 0 49 1 32 179 11 16 1 1 205 0 52 7 0 2 33 24 0 1 206 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 143 11 16 1 1 207 0 52 7 0 2 33 9 0 18 4 16 0 49 1 32 122 11 16 1 1 208 0 52 7 0 2 33 34 0 1 209 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 16 0 1 13 0 52 12 0 2 2 52 10 0 4 32 76 11 16 1 1 210 0 52 7 0 2 33 63 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 24 0 1 1 41 0 52 119 0 2 33 12 0 16 0 1 41 0 52 12 0 2 32 3 0 1 211 0 17 3 1 212 0 16 2 16 3 52 10 0 3 32 1 11 16 1 1 213 0 52 7 0 2 33 63 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 16 0 52 24 0 1 1 41 0 52 119 0 2 33 12 0 16 0 1 41 0 52 12 0 2 32 3 0 1 211 0 17 3 1 214 0 16 2 16 3 52 10 0 3 32 182 10 16 1 1 215 0 52 7 0 2 33 9 0 18 5 16 0 49 1 32 161 10 16 1 1 216 0 52 7 0 2 33 124 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 20 11 0 16 0 1 44 0 52 12 0 2 48 1 17 4 16 0 1 185 0 52 12 0 2 17 5 16 0 1 217 0 52 12 0 2 17 6 1 218 0 16 6 52 0 0 1 33 6 0 1 67 0 32 7 0 20 11 0 16 6 48 1 16 2 16 3 16 4 16 5 33 10 0 20 11 0 16 5 48 1 32 1 0 2 52 10 0 6 32 25 10 16 1 1 219 0 52 7 0 2 33 9 0 18 6 16 0 49 1 32 4 10 16 1 1 220 0 52 7 0 2 33 60 0 1 221 0 1 49 0 52 10 0 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 1 49 0 52 10 0 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 3 32 188 9 16 1 1 222 0 52 7 0 2 33 60 0 1 223 0 1 49 0 52 10 0 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 1 49 0 52 10 0 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 52 10 0 3 32 116 9 16 1 1 224 0 52 7 0 2 33 33 0 1 225 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 71 9 16 1 1 226 0 52 7 0 2 33 49 0 1 227 0 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 33 17 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 32 1 0 2 52 10 0 3 32 10 9 16 1 1 228 0 52 7 0 2 33 68 0 16 0 1 13 0 52 12 0 2 17 2 16 2 52 2 0 1 33 9 0 16 2 52 62 0 1 32 7 0 20 11 0 16 2 48 1 17 3 20 11 0 16 0 52 22 0 1 52 22 0 1 52 21 0 2 17 4 16 3 16 4 52 20 0 2 32 186 8 16 1 1 229 0 52 7 0 2 33 68 0 16 0 1 13 0 52 12 0 2 17 2 16 2 52 0 0 1 33 21 0 1 230 0 1 28 0 1 231 0 2 52 10 0 3 52 10 0 2 32 24 0 1 230 0 1 28 0 1 231 0 20 11 0 16 2 48 1 52 10 0 3 52 10 0 2 32 106 8 16 1 1 232 0 52 7 0 2 33 24 0 1 230 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 70 8 16 1 1 233 0 52 7 0 2 33 13 0 1 234 0 1 67 0 52 10 0 2 32 45 8 16 1 1 235 0 52 7 0 2 33 24 0 1 236 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 9 8 16 1 1 237 0 52 7 0 2 33 78 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 3 16 2 52 238 0 1 33 23 0 1 155 0 16 2 1 239 0 16 2 16 3 52 10 0 3 52 10 0 3 32 11 0 1 240 0 16 3 16 2 52 10 0 3 32 175 7 16 1 1 241 0 52 7 0 2 33 71 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 1 166 0 1 67 0 16 2 52 10 0 2 1 242 0 16 2 52 10 0 2 1 243 0 16 2 52 10 0 2 52 10 0 3 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 92 7 16 1 1 244 0 52 7 0 2 33 9 0 18 7 16 0 49 1 32 71 7 16 1 1 245 0 52 7 0 2 33 58 1 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 17 4 16 0 52 24 0 1 1 185 0 52 119 0 2 33 12 0 16 0 1 185 0 52 12 0 2 32 1 0 2 17 5 16 0 52 24 0 1 1 217 0 52 119 0 2 33 12 0 16 0 1 217 0 52 12 0 2 32 1 0 2 17 6 16 0 52 24 0 1 1 246 0 52 119 0 2 33 12 0 16 0 1 246 0 52 12 0 2 32 1 0 2 17 7 16 5 33 10 0 20 11 0 16 5 48 1 32 3 0 1 67 0 17 8 16 4 52 0 0 1 33 4 0 2 32 53 0 16 4 52 5 0 1 6 33 14 0 5 16 4 52 6 0 1 1 74 0 52 7 0 2 33 19 0 1 136 0 16 4 1 13 0 52 12 0 2 52 10 0 2 32 7 0 20 11 0 16 4 48 1 17 9 16 2 1 247 0 52 7 0 2 6 33 10 0 5 16 6 6 34 3 0 5 16 7 33 36 0 1 248 0 16 8 16 2 16 3 16 9 16 6 16 7 33 10 0 20 11 0 16 7 48 1 32 1 0 2 52 10 0 7 32 15 0 1 248 0 16 8 16 2 16 3 16 9 52 10 0 5 32 1 6 16 1 1 249 0 52 7 0 2 33 9 0 18 8 16 0 49 1 32 236 5 16 1 1 250 0 52 7 0 2 33 23 0 1 251 0 20 11 0 16 0 52 22 0 1 52 21 0 2 52 20 0 2 32 201 5 16 1 1 252 0 52 7 0 2 33 24 0 1 253 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 165 5 16 1 1 254 0 52 7 0 2 33 54 0 18 9 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 49 3 32 99 5 16 1 1 255 0 52 7 0 2 33 54 0 18 10 16 0 1 13 0 52 12 0 2 16 0 1 41 0 52 12 0 2 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 49 3 32 33 5 16 1 1 0 1 52 7 0 2 33 13 0 1 230 0 1 1 1 52 10 0 2 32 8 5 16 1 1 2 1 52 7 0 2 33 13 0 1 230 0 1 3 1 52 10 0 2 32 239 4 16 1 1 4 1 52 7 0 2 33 4 0 2 32 223 4 16 1 1 5 1 52 7 0 2 33 9 0 18 11 16 0 49 1 32 202 4 16 1 1 6 1 52 7 0 2 33 35 0 1 7 1 1 49 0 52 10 0 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 52 10 0 2 32 155 4 16 1 1 8 1 52 7 0 2 33 156 0 20 11 0 16 0 1 44 0 52 12 0 2 48 1 17 2 51 9 1 16 0 1 41 0 52 12 0 2 52 21 0 2 17 3 1 10 1 16 0 1 13 0 52 12 0 2 52 62 0 1 1 49 0 16 3 1 11 1 1 12 1 1 13 1 1 195 0 1 86 0 1 14 1 1 12 1 52 10 0 2 1 88 0 1 114 0 1 12 1 52 10 0 2 1 231 0 52 10 0 3 52 10 0 3 1 40 0 1 12 1 1 13 0 52 10 0 3 1 230 0 1 12 1 52 10 0 2 52 10 0 4 52 10 0 2 52 10 0 2 16 2 52 10 0 3 52 10 0 3 52 10 0 3 32 243 3 16 1 1 15 1 52 7 0 2 33 9 0 18 12 16 0 49 1 32 222 3 16 1 1 16 1 52 7 0 2 33 51 0 16 0 1 13 0 52 12 0 2 17 2 16 2 52 2 0 1 33 14 0 20 17 1 16 2 48 1 52 6 0 1 32 14 0 1 18 1 20 11 0 16 2 48 1 52 10 0 2 32 159 3 16 1 1 19 1 52 7 0 2 33 16 0 16 0 1 13 0 52 12 0 2 52 62 0 1 32 131 3 16 1 1 20 1 52 7 0 2 33 182 0 16 0 1 13 0 52 12 0 2 17 2 16 0 1 41 0 52 12 0 2 17 3 16 0 52 24 0 1 1 44 0 52 119 0 2 33 12 0 16 0 1 44 0 52 12 0 2 32 1 0 2 17 4 16 0 52 24 0 1 1 185 0 52 119 0 2 33 17 0 20 11 0 16 0 1 185 0 52 12 0 2 48 1 32 1 0 2 17 5 16 2 52 2 0 1 33 9 0 16 2 52 62 0 1 32 7 0 20 11 0 16 2 48 1 17 6 51 21 1 1 7 17 7 5 1 22 1 16 6 16 7 16 3 48 1 52 20 0 2 52 20 0 2 17 8 16 4 33 27 0 1 194 0 16 8 16 4 16 5 33 5 0 16 5 32 3 0 1 67 0 52 10 0 4 32 2 0 16 8 32 193 2 16 1 1 23 1 52 7 0 2 33 45 0 1 9 0 1 107 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 52 10 0 2 32 136 2 16 1 1 112 0 52 7 0 2 33 38 0 1 107 0 20 11 0 16 0 1 41 0 52 12 0 2 48 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 3 32 86 2 16 1 1 24 1 52 7 0 2 33 33 0 1 25 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 41 2 16 1 1 26 1 52 7 0 2 33 33 0 1 27 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 252 1 16 1 1 28 1 52 7 0 2 33 38 0 1 29 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 202 1 16 1 1 30 1 52 7 0 2 33 38 0 1 31 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 152 1 16 1 1 32 1 52 7 0 2 33 62 0 1 32 1 1 49 0 16 0 1 13 0 52 12 0 2 52 62 0 1 52 10 0 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 78 1 16 1 1 33 1 52 7 0 2 33 62 0 1 34 1 1 49 0 16 0 1 13 0 52 12 0 2 52 62 0 1 52 10 0 1 20 11 0 16 0 1 44 0 52 12 0 2 48 1 52 10 0 3 20 11 0 16 0 1 41 0 52 12 0 2 48 1 52 10 0 3 32 4 1 16 1 1 35 1 52 7 0 2 33 33 0 1 36 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 16 0 1 41 0 52 12 0 2 52 10 0 3 32 215 0 16 1 1 37 1 52 7 0 2 33 24 0 1 38 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 179 0 16 1 1 39 1 52 7 0 2 33 24 0 1 40 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 143 0 16 1 1 41 1 52 7 0 2 33 62 0 20 11 0 16 0 1 13 0 52 12 0 2 48 1 17 2 20 11 0 16 0 1 41 0 52 12 0 2 48 1 17 3 1 147 0 1 98 0 16 2 52 10 0 2 1 155 0 16 2 16 3 52 10 0 3 52 10 0 3 32 69 0 16 1 1 42 1 52 7 0 2 33 19 0 1 43 1 16 0 1 13 0 52 12 0 2 52 10 0 2 32 38 0 16 1 1 44 1 52 7 0 2 33 24 0 1 45 1 20 11 0 16 0 1 13 0 52 12 0 2 48 1 52 10 0 2 32 2 0 16 0 50)} "hs-to-sx-from-source" {:upvalue-count 0 :arity 1 :constants ("hs-to-sx" "hs-compile") :bytecode (20 0 0 20 1 0 16 0 48 1 49 1 50)}) :bytecode (1 2 0 52 1 0 1 17 0 1 3 0 52 1 0 1 17 1 51 4 0 17 2 5 51 5 0 1 0 17 3 5 51 6 0 17 4 5 51 7 0 17 5 5 51 8 0 17 6 5 51 9 0 17 7 5 51 10 0 17 8 5 51 11 0 17 9 5 51 12 0 17 10 5 51 13 0 1 0 17 11 5 51 14 0 1 0 17 12 5 51 15 0 17 13 5 51 16 0 1 0 1 1 1 3 1 8 1 5 1 9 1 6 1 7 1 10 1 11 1 12 1 4 1 13 128 0 0 5 51 18 0 128 17 0 50))) diff --git a/shared/static/wasm/sx/hs-integration.sx b/shared/static/wasm/sx/hs-integration.sx index 8e17242c..7fd9bf4b 100644 --- a/shared/static/wasm/sx/hs-integration.sx +++ b/shared/static/wasm/sx/hs-integration.sx @@ -10,20 +10,46 @@ ;; Returns a function (fn (me) ...) that can be called with a DOM element. ;; Uses eval-expr-cek to turn the SX data structure into a live closure. -(define - hs-handler - (fn - (src) - (let - ((sx (hs-to-sx-from-source src))) - (eval-expr-cek - (list - (quote fn) - (list (quote me)) - (list - (quote let) - (list (list (quote it) nil) (list (quote event) nil)) - sx)))))) +(begin + (define + hs-collect-vars + (fn + (sx) + (define vars (list)) + (define + walk + (fn + (node) + (when + (list? node) + (when + (and + (> (len node) 1) + (= (first node) (quote set!)) + (symbol? (nth node 1))) + (let + ((name (nth node 1))) + (when + (not (some (fn (v) (= v name)) vars)) + (set! vars (cons name vars))))) + (for-each walk node)))) + (walk sx) + vars)) + (define + hs-handler + (fn + (src) + (let + ((sx (hs-to-sx-from-source src))) + (let + ((extra-vars (hs-collect-vars sx))) + (let + ((bindings (append (list (list (quote it) nil) (list (quote event) nil)) (map (fn (v) (list v nil)) extra-vars)))) + (eval-expr-cek + (list + (quote fn) + (list (quote me)) + (list (quote let) bindings sx))))))))) ;; ── Activate a single element ─────────────────────────────────── ;; Reads the _="..." attribute, compiles, and executes with me=element. diff --git a/shared/static/wasm/sx/hs-integration.sxbc b/shared/static/wasm/sx/hs-integration.sxbc index ca0e1bad..5fd7ef72 100644 --- a/shared/static/wasm/sx/hs-integration.sxbc +++ b/shared/static/wasm/sx/hs-integration.sxbc @@ -1,3 +1,3 @@ -(sxbc 1 "99bd2816b1cd7891" +(sxbc 1 "886d830f7097651c" (code - :constants ("hs-handler" {:upvalue-count 0 :arity 1 :constants ("hs-to-sx-from-source" "eval-expr-cek" "list" fn me let it event) :bytecode (20 0 0 16 0 48 1 17 1 20 1 0 1 3 0 1 4 0 52 2 0 1 1 5 0 1 6 0 2 52 2 0 2 1 7 0 2 52 2 0 2 52 2 0 2 16 1 52 2 0 3 52 2 0 3 49 1 50)} "hs-activate!" {:upvalue-count 0 :arity 1 :constants ("dom-get-attr" "_" "not" "dom-get-data" "hs-active" "dom-set-data" "hs-handler") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 6 33 15 0 5 20 3 0 16 0 1 4 0 48 2 52 2 0 1 33 30 0 20 5 0 16 0 1 4 0 3 48 3 5 20 6 0 16 1 48 1 17 2 16 2 16 0 49 1 32 1 0 2 50)} "hs-boot!" {:upvalue-count 0 :arity 0 :constants ("dom-query-all" "host-get" "host-global" "document" "body" "[_]" "for-each" {:upvalue-count 0 :arity 1 :constants ("hs-activate!") :bytecode (20 0 0 16 0 49 1 50)}) :bytecode (20 0 0 1 3 0 52 2 0 1 1 4 0 52 1 0 2 1 5 0 48 2 17 0 51 7 0 16 0 52 6 0 2 50)} "hs-boot-subtree!" {:upvalue-count 0 :arity 1 :constants ("dom-query-all" "[_]" "for-each" {:upvalue-count 0 :arity 1 :constants ("hs-activate!") :bytecode (20 0 0 16 0 49 1 50)} "dom-get-attr" "_" "hs-activate!") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 51 3 0 16 1 52 2 0 2 5 20 4 0 16 0 1 5 0 48 2 33 10 0 20 6 0 16 0 49 1 32 1 0 2 50)}) :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 50))) + :constants ("hs-collect-vars" {:upvalue-count 0 :arity 3 :constants ("list" {:upvalue-count 2 :arity 1 :constants ("list?" ">" "len" 1 "=" "first" set! "symbol?" "nth" "not" "some" {:upvalue-count 1 :arity 1 :constants ("=") :bytecode (16 0 18 0 52 0 0 2 50)} "cons" "for-each") :bytecode (16 0 52 0 0 1 33 111 0 16 0 52 2 0 1 1 3 0 52 1 0 2 6 33 32 0 5 16 0 52 5 0 1 1 6 0 52 4 0 2 6 33 14 0 5 16 0 1 3 0 52 8 0 2 52 7 0 1 33 46 0 16 0 1 3 0 52 8 0 2 17 1 51 11 0 1 1 18 0 52 10 0 2 52 9 0 1 33 13 0 16 1 18 0 52 12 0 2 19 0 32 1 0 2 32 1 0 2 5 18 1 16 0 52 13 0 2 32 1 0 2 50)}) :bytecode (52 0 0 0 17 1 5 51 1 0 1 1 1 2 17 2 5 16 2 16 0 48 1 5 16 1 50)} "hs-handler" {:upvalue-count 0 :arity 1 :constants ("hs-to-sx-from-source" "hs-collect-vars" "append" "list" it event "map" {:upvalue-count 0 :arity 1 :constants ("list") :bytecode (16 0 2 52 0 0 2 50)} "eval-expr-cek" fn me let) :bytecode (20 0 0 16 0 48 1 17 1 20 1 0 16 1 48 1 17 2 1 4 0 2 52 3 0 2 1 5 0 2 52 3 0 2 52 3 0 2 51 7 0 16 2 52 6 0 2 52 2 0 2 17 3 20 8 0 1 9 0 1 10 0 52 3 0 1 1 11 0 16 3 16 1 52 3 0 3 52 3 0 3 49 1 50)} "hs-activate!" {:upvalue-count 0 :arity 1 :constants ("dom-get-attr" "_" "not" "dom-get-data" "hs-active" "dom-set-data" "hs-handler") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 6 33 15 0 5 20 3 0 16 0 1 4 0 48 2 52 2 0 1 33 30 0 20 5 0 16 0 1 4 0 3 48 3 5 20 6 0 16 1 48 1 17 2 16 2 16 0 49 1 32 1 0 2 50)} "hs-boot!" {:upvalue-count 0 :arity 0 :constants ("dom-query-all" "host-get" "host-global" "document" "body" "[_]" "for-each" {:upvalue-count 0 :arity 1 :constants ("hs-activate!") :bytecode (20 0 0 16 0 49 1 50)}) :bytecode (20 0 0 1 3 0 52 2 0 1 1 4 0 52 1 0 2 1 5 0 48 2 17 0 51 7 0 16 0 52 6 0 2 50)} "hs-boot-subtree!" {:upvalue-count 0 :arity 1 :constants ("dom-query-all" "[_]" "for-each" {:upvalue-count 0 :arity 1 :constants ("hs-activate!") :bytecode (20 0 0 16 0 49 1 50)} "dom-get-attr" "_" "hs-activate!") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 51 3 0 16 1 52 2 0 2 5 20 4 0 16 0 1 5 0 48 2 33 10 0 20 6 0 16 0 49 1 32 1 0 2 50)}) :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 50))) diff --git a/shared/static/wasm/sx/hs-parser.sx b/shared/static/wasm/sx/hs-parser.sx index 8e5d3607..4f8fa5af 100644 --- a/shared/static/wasm/sx/hs-parser.sx +++ b/shared/static/wasm/sx/hs-parser.sx @@ -158,7 +158,7 @@ (do (adv!) (list (make-symbol ".") (list (quote event)) "detail"))) - ((and (= typ "keyword") (= val "my")) + ((and (= typ "keyword") (or (= val "my") (= val "your"))) (do (adv!) (parse-poss-tail (list (quote me))))) ((and (= typ "keyword") (= val "its")) (do (adv!) (parse-poss-tail (list (quote it))))) @@ -775,50 +775,88 @@ parse-add-cmd (fn () - (if - (= (tp-type) "class") - (let - ((cls (get (adv!) "value")) (extra-classes (list))) - (define - collect-classes! - (fn - () - (when - (= (tp-type) "class") - (set! - extra-classes - (append extra-classes (list (get (adv!) "value")))) - (collect-classes!)))) - (collect-classes!) + (cond + ((= (tp-type) "class") (let - ((tgt (parse-tgt-kw "to" (list (quote me))))) + ((cls (get (adv!) "value")) (extra-classes (list))) + (define + collect-classes! + (fn + () + (when + (= (tp-type) "class") + (set! + extra-classes + (append extra-classes (list (get (adv!) "value")))) + (collect-classes!)))) + (collect-classes!) (let - ((when-clause (if (match-kw "when") (parse-expr) nil))) - (if - (empty? extra-classes) + ((tgt (if (match-kw "to") (parse-expr) (list (quote me))))) + (let + ((when-clause (if (match-kw "when") (parse-expr) nil))) (if - when-clause - (list (quote add-class-when) cls tgt when-clause) - (list (quote add-class) cls tgt)) - (if - when-clause - (list - (quote multi-add-class-when) - tgt + (empty? extra-classes) + (if when-clause - cls - extra-classes) - (cons - (quote multi-add-class) - (cons tgt (cons cls extra-classes)))))))) - (let - ((value (parse-expr))) - (if - (match-kw "to") + (list (quote add-class-when) cls tgt when-clause) + (list (quote add-class) cls tgt)) + (if + when-clause + (list + (quote multi-add-class-when) + tgt + when-clause + cls + extra-classes) + (cons + (quote multi-add-class) + (cons tgt (cons cls extra-classes))))))))) + ((= (tp-type) "style") + (let + ((prop (get (adv!) "value")) + (value + (if + (= (tp-type) "local") + (get (adv!) "value") + (parse-expr)))) (let - ((tgt (parse-expr))) - (list (quote add-value) value tgt)) - nil))))) + ((tgt (if (match-kw "to") (parse-expr) (list (quote me))))) + (list (quote set-style) prop value tgt)))) + ((= (tp-type) "brace-open") + (do + (adv!) + (let + ((pairs (list))) + (define + collect-pairs! + (fn + () + (when + (and + (not (= (tp-type) "brace-close")) + (not (at-end?))) + (let + ((prop (get (adv!) "value"))) + (when (= (tp-type) "colon") (adv!)) + (let + ((val (tp-val))) + (adv!) + (set! pairs (cons (list prop val) pairs)) + (collect-pairs!)))))) + (collect-pairs!) + (when (= (tp-type) "brace-close") (adv!)) + (let + ((tgt (if (match-kw "to") (parse-expr) (list (quote me))))) + (list (quote set-styles) (reverse pairs) tgt))))) + (true + (let + ((value (parse-expr))) + (if + (match-kw "to") + (let + ((tgt (parse-expr))) + (list (quote add-value) value tgt)) + nil)))))) (define parse-remove-cmd (fn @@ -923,40 +961,64 @@ (list (quote toggle-class) cls tgt))))) ((= (tp-type) "style") (let - ((prop (do (let ((v (tp-val))) (adv!) v)))) - (if - (match-kw "between") - (let - ((val1 (parse-atom))) - (expect-kw! "and") + ((prop (get (adv!) "value"))) + (let + ((tgt (if (match-kw "of") (parse-expr) (list (quote me))))) + (if + (match-kw "between") (let - ((val2 (parse-atom))) + ((val1 (parse-atom))) + (expect-kw! "and") (let - ((tgt (parse-tgt-kw "on" (list (quote me))))) - (list (quote toggle-style-between) prop val1 val2 tgt)))) - (let - ((tgt (parse-tgt-kw "on" (list (quote me))))) + ((val2 (parse-atom))) + (if + (match-kw "and") + (let + ((val3 (parse-atom))) + (if + (match-kw "and") + (let + ((val4 (parse-atom))) + (list + (quote toggle-style-cycle) + prop + tgt + val1 + val2 + val3 + val4)) + (list + (quote toggle-style-cycle) + prop + tgt + val1 + val2 + val3))) + (list + (quote toggle-style-between) + prop + val1 + val2 + tgt)))) (list (quote toggle-style) prop tgt))))) ((= (tp-type) "attr") (let - ((attr-name (do (let ((v (tp-val))) (adv!) v)))) - (if - (match-kw "between") - (let - ((val1 (parse-atom))) - (expect-kw! "and") + ((attr-name (get (adv!) "value"))) + (let + ((tgt (if (match-kw "on") (parse-expr) (list (quote me))))) + (if + (match-kw "between") (let - ((val2 (parse-atom))) + ((val1 (parse-expr))) + (expect-kw! "and") (let - ((tgt (parse-tgt-kw "on" (list (quote me))))) + ((val2 (parse-expr))) (list (quote toggle-attr-between) attr-name val1 val2 - tgt)))) - (let - ((tgt (parse-tgt-kw "on" (list (quote me))))) + tgt))) (list (quote toggle-attr) attr-name tgt))))) ((and (= (tp-type) "keyword") (= (tp-val) "my")) (do @@ -1050,17 +1112,19 @@ ((match-kw "after") (list (quote put!) value "after" (parse-expr))) ((match-kw "at") - (cond - ((match-kw "start") - (do - (expect-kw! "of") - (list (quote put!) value "start" (parse-expr)))) - ((match-kw "end") - (do - (expect-kw! "of") - (list (quote put!) value "end" (parse-expr)))) - (true - (error (str "Expected start/end after at, position " p))))) + (do + (match-kw "the") + (cond + ((match-kw "start") + (do + (expect-kw! "of") + (list (quote put!) value "start" (parse-expr)))) + ((match-kw "end") + (do + (expect-kw! "of") + (list (quote put!) value "end" (parse-expr)))) + (true + (error (str "Expected start/end after at, position " p)))))) (true (error (str "Expected into/before/after/at at position " p))))))) (define @@ -1221,26 +1285,35 @@ (fn () (let - ((prop (cond ((= (tp-type) "style") (get (adv!) "value")) ((= (tp-val) "my") (do (adv!) (if (= (tp-type) "style") (get (adv!) "value") (get (adv!) "value")))) (true (get (adv!) "value"))))) + ((prop (cond ((= (tp-type) "style") (get (adv!) "value")) ((= (tp-val) "my") (do (adv!) (if (= (tp-type) "style") (get (adv!) "value") (get (adv!) "value")))) ((= (tp-val) "'s") (do (adv!) (if (= (tp-type) "style") (get (adv!) "value") (get (adv!) "value")))) (true (get (adv!) "value"))))) (let - ((from-val (if (match-kw "from") (let ((v (parse-atom))) (if (and (number? v) (= (tp-type) "ident") (not (hs-keyword? (tp-val)))) (let ((unit (get (adv!) "value"))) (list (quote string-postfix) v unit)) v)) nil))) - (expect-kw! "to") + ((inner-tgt (if (match-kw "of") (parse-expr) nil))) (let - ((value (let ((v (parse-atom))) (if (and (number? v) (= (tp-type) "ident") (not (hs-keyword? (tp-val)))) (let ((unit (get (adv!) "value"))) (list (quote string-postfix) v unit)) v)))) + ((eff-tgt (if inner-tgt inner-tgt tgt))) (let - ((dur (if (match-kw "over") (let ((v (parse-atom))) (if (and (number? v) (= (tp-type) "ident") (not (hs-keyword? (tp-val)))) (let ((unit (get (adv!) "value"))) (list (quote string-postfix) v unit)) v)) nil))) + ((from-val (if (match-kw "from") (let ((v (parse-atom))) (if (and v (= (tp-type) "ident") (not (hs-keyword? (tp-val)))) (let ((unit (get (adv!) "value"))) (list (quote string-postfix) v unit)) v)) nil))) + (expect-kw! "to") (let - ((using-val (if (match-kw "using") (parse-expr) nil))) - (if - from-val - (list - (quote transition-from) - prop - from-val - value - dur - tgt) - (list (quote transition) prop value dur tgt))))))))) + ((value (let ((v (parse-atom))) (if (and v (= (tp-type) "ident") (not (hs-keyword? (tp-val)))) (let ((unit (get (adv!) "value"))) (list (quote string-postfix) v unit)) v)))) + (let + ((dur (if (match-kw "over") (let ((v (parse-atom))) (if (and (number? v) (= (tp-type) "ident") (not (hs-keyword? (tp-val)))) (let ((unit (get (adv!) "value"))) (list (quote string-postfix) v unit)) v)) nil))) + (let + ((using-val (if (match-kw "using") (parse-expr) nil))) + (if + from-val + (list + (quote transition-from) + prop + from-val + value + dur + eff-tgt) + (list + (quote transition) + prop + value + dur + eff-tgt))))))))))) (let ((first-t (parse-one-transition))) (define @@ -1278,9 +1351,20 @@ (let ((mode (cond ((match-kw "forever") (list (quote forever))) ((match-kw "while") (list (quote while) (parse-expr))) ((match-kw "until") (list (quote until) (parse-expr))) (true (let ((n (parse-expr))) (if (match-kw "times") (list (quote times) n) (list (quote forever)))))))) (let - ((body (parse-cmd-list))) - (match-kw "end") - (list (quote repeat) mode body))))))) + ((body (do (match-kw "then") (parse-cmd-list)))) + (cond + ((match-kw "until") + (let + ((cond-expr (parse-expr))) + (match-kw "end") + (list (quote repeat-until) cond-expr body))) + ((match-kw "while") + (let + ((cond-expr (parse-expr))) + (match-kw "end") + (list (quote repeat-while) cond-expr body))) + (true + (do (match-kw "end") (list (quote repeat) mode body)))))))))) (define parse-fetch-cmd (fn @@ -1521,9 +1605,9 @@ (let ((collection (parse-expr))) (let - ((idx (if (match-kw "index") (let ((iname (tp-val))) (adv!) iname) nil))) + ((idx (cond ((match-kw "index") (let ((iname (tp-val))) (adv!) iname)) ((match-kw "indexed") (do (match-kw "by") (let ((iname (tp-val))) (adv!) iname))) (true nil)))) (let - ((body (parse-cmd-list))) + ((body (do (match-kw "then") (parse-cmd-list)))) (match-kw "end") (if idx @@ -1599,8 +1683,8 @@ (fn () (let - ((the-event (and (match-kw "the") (or (match-kw "event") (match-kw "default"))))) - (list (quote halt!) (if the-event "event" "default"))))) + ((mode (cond ((match-kw "the") (do (match-kw "event") (match-kw "'s") "event")) ((or (match-kw "default") (and (= (tp-val) "default") (do (adv!) true))) "default") ((or (match-kw "bubbling") (and (= (tp-val) "bubbling") (do (adv!) true))) "bubbling") (true "event")))) + (list (quote halt!) mode)))) (define parse-param-list (fn () (if (= (tp-type) "paren-open") (parse-call-args) (list)))) @@ -1838,6 +1922,12 @@ (do (adv!) (parse-open-cmd))) ((and (= typ "keyword") (= val "close")) (do (adv!) (parse-close-cmd))) + ((and (= typ "keyword") (= val "break")) + (do (adv!) (list (quote break)))) + ((and (= typ "keyword") (= val "continue")) + (do (adv!) (list (quote continue)))) + ((and (= typ "keyword") (or (= val "exit") (= val "halt"))) + (do (adv!) (list (quote exit)))) (true (parse-expr)))))) (define parse-cmd-list diff --git a/shared/static/wasm/sx/hs-parser.sxbc b/shared/static/wasm/sx/hs-parser.sxbc index aaad0456..09575530 100644 --- a/shared/static/wasm/sx/hs-parser.sxbc +++ b/shared/static/wasm/sx/hs-parser.sxbc @@ -1,3 +1,3 @@ -(sxbc 1 "3777e64f1eb22aaa" +(sxbc 1 "3c0d58c5ef95516a" (code - :constants ("hs-parse" {:upvalue-count 0 :arity 2 :constants (0 "len" {:upvalue-count 3 :arity 0 :constants ("<" "nth") :bytecode (18 0 18 1 52 0 0 2 33 11 0 18 2 18 0 52 1 0 2 32 1 0 2 50)} {:upvalue-count 1 :arity 0 :constants ("get" "type" "eof") :bytecode (18 0 48 0 17 0 16 0 33 12 0 16 0 1 1 0 52 0 0 2 32 3 0 1 2 0 50)} {:upvalue-count 1 :arity 0 :constants ("get" "value") :bytecode (18 0 48 0 17 0 16 0 33 12 0 16 0 1 1 0 52 0 0 2 32 1 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("nth" "+" 1) :bytecode (18 0 18 1 52 0 0 2 17 0 18 1 1 2 0 52 1 0 2 19 1 5 16 0 50)} {:upvalue-count 3 :arity 0 :constants (">=" "=" "eof") :bytecode (18 0 18 1 52 0 0 2 6 34 12 0 5 18 2 48 0 1 2 0 52 1 0 2 50)} {:upvalue-count 3 :arity 1 :constants ("=" "keyword") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 11 0 5 18 1 48 0 16 0 52 0 0 2 33 9 0 18 2 48 0 5 3 32 1 0 2 50)} {:upvalue-count 2 :arity 1 :constants ("error" "str" "Expected '" "' at position ") :bytecode (18 0 16 0 48 1 33 4 0 3 32 18 0 1 2 0 16 0 1 3 0 18 1 52 1 0 4 52 0 0 1 50)} {:upvalue-count 0 :arity 1 :constants ("len" ">=" 3 "=" "substring" "-" 2 "ms" "parse-number" 0 "nth" 1 "s" "*" 1000) :bytecode (16 0 52 0 0 1 17 1 16 1 1 2 0 52 1 0 2 6 33 25 0 5 16 0 16 1 1 6 0 52 5 0 2 16 1 52 4 0 3 1 7 0 52 3 0 2 33 25 0 16 0 1 9 0 16 1 1 6 0 52 5 0 2 52 4 0 3 52 8 0 1 32 77 0 16 1 1 6 0 52 1 0 2 6 33 23 0 5 16 0 16 1 1 11 0 52 5 0 2 52 10 0 2 1 12 0 52 3 0 2 33 32 0 1 14 0 16 0 1 9 0 16 1 1 11 0 52 5 0 2 52 4 0 3 52 8 0 1 52 13 0 2 32 6 0 16 0 52 8 0 1 50)} {:upvalue-count 4 :arity 1 :constants ("=" "ident" "keyword" "list" . "attr" attr "class" "get" "value" "style" style) :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 6 34 10 0 5 16 1 1 2 0 52 0 0 2 33 23 0 18 2 48 0 5 18 3 1 4 0 16 0 16 2 52 3 0 3 49 1 32 107 0 16 1 1 5 0 52 0 0 2 33 19 0 18 2 48 0 5 1 6 0 16 2 16 0 52 3 0 3 32 76 0 16 1 1 7 0 52 0 0 2 33 31 0 18 2 48 0 1 9 0 52 8 0 2 17 3 18 3 1 4 0 16 0 16 3 52 3 0 3 49 1 32 33 0 16 1 1 10 0 52 0 0 2 33 19 0 18 2 48 0 5 1 11 0 16 2 16 0 52 3 0 3 32 2 0 16 0 50)} {:upvalue-count 6 :arity 1 :constants ("=" "class" "not" "list" "make-symbol" "." "paren-open" method-call) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 9 0 5 18 1 48 0 52 2 0 1 33 33 0 18 2 48 0 17 1 18 3 48 0 5 18 4 1 5 0 52 4 0 1 16 0 16 1 52 3 0 3 49 1 32 40 0 18 0 48 0 1 6 0 52 0 0 2 33 24 0 18 5 48 0 17 1 18 4 1 7 0 16 0 16 1 52 3 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 3 :arity 1 :constants ("=" "selector" "list" me "class" "str" "." "id" "#" "*") :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 33 23 0 18 2 48 0 5 16 0 16 2 1 3 0 52 2 0 1 52 2 0 3 32 100 0 16 1 1 4 0 52 0 0 2 33 30 0 18 2 48 0 5 16 0 1 6 0 16 2 52 5 0 2 1 3 0 52 2 0 1 52 2 0 3 32 58 0 16 1 1 7 0 52 0 0 2 33 30 0 18 2 48 0 5 16 0 1 8 0 16 2 52 5 0 2 1 3 0 52 2 0 1 52 2 0 3 32 16 0 16 0 1 9 0 1 3 0 52 2 0 1 52 2 0 3 50)} {:upvalue-count 5 :arity 1 :constants ("=" "selector" "class" "str" "." "id" "#" "*" "in" "list") :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 33 10 0 18 2 48 0 5 16 2 32 61 0 16 1 1 2 0 52 0 0 2 33 17 0 18 2 48 0 5 1 4 0 16 2 52 3 0 2 32 32 0 16 1 1 5 0 52 0 0 2 33 17 0 18 2 48 0 5 1 6 0 16 2 52 3 0 2 32 3 0 1 7 0 17 3 18 3 1 8 0 48 1 33 15 0 16 0 16 3 18 4 48 0 52 9 0 3 32 8 0 16 0 16 3 52 9 0 2 50)} {:upvalue-count 16 :arity 0 :constants ("=" "number" "string" "template" "list" template "keyword" "true" "false" "null" "nil" null-literal "undefined" "beep" "op" "!" beep! "not" not "no" no "eval" "paren-open" sx-eval "the" "me" me "I" "it" "result" it "event" event "target" "make-symbol" "." "detail" "my" "its" "closest" closest "next" next "previous" previous "first" first "last" last "id" query "str" "#" "selector" "attr" attr "style" style "local" local "class" "ident" ref "paren-close" "brace-open" {:upvalue-count 6 :arity 1 :constants ("=" "brace-close" "string" "local" "true" "false" "null" "list" ref "colon" "comma" "cons") :bytecode (18 0 48 0 6 34 12 0 5 18 1 48 0 1 1 0 52 0 0 2 33 28 0 18 1 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 203 0 18 1 48 0 1 2 0 52 0 0 2 33 16 0 18 3 48 0 17 1 18 2 48 0 5 16 1 32 13 0 18 3 48 0 17 1 18 2 48 0 5 16 1 17 1 18 1 48 0 1 3 0 52 0 0 2 33 71 0 18 3 48 0 17 2 18 2 48 0 5 16 2 1 4 0 52 0 0 2 33 4 0 3 32 41 0 16 2 1 5 0 52 0 0 2 33 4 0 4 32 25 0 16 2 1 6 0 52 0 0 2 33 4 0 2 32 9 0 1 8 0 16 2 52 7 0 2 32 30 0 18 1 48 0 1 9 0 52 0 0 2 33 12 0 18 2 48 0 5 18 4 48 0 32 4 0 18 4 48 0 17 2 18 1 48 0 1 10 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 5 16 1 16 2 52 7 0 2 16 0 52 11 0 2 49 1 50)} object-literal "\\" {:upvalue-count 6 :arity 1 :constants ("=" "op" "-" "<" "+" 1 "len" "get" "nth" "value" ">" "ident" "comma" "append") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 76 0 18 2 1 5 0 52 4 0 2 18 3 52 6 0 1 52 3 0 2 6 33 30 0 5 18 3 18 2 1 5 0 52 4 0 2 52 8 0 2 1 9 0 52 7 0 2 1 10 0 52 0 0 2 33 15 0 18 4 48 0 5 18 4 48 0 5 16 0 32 2 0 16 0 32 65 0 18 0 48 0 1 11 0 52 0 0 2 33 49 0 18 1 48 0 17 1 18 4 48 0 5 18 0 48 0 1 12 0 52 0 0 2 33 7 0 18 4 48 0 32 1 0 2 5 18 5 16 0 16 1 52 13 0 2 49 1 32 2 0 16 0 50)} block-literal "bracket-open" "-" - 0 "component" component "some" ">" "len" "+" 1 "get" "nth" "value" "in" "with" some "every" every) :bytecode (18 0 48 0 17 0 18 1 48 0 17 1 16 0 1 1 0 52 0 0 2 33 14 0 18 2 48 0 5 18 3 16 1 49 1 32 66 7 16 0 1 2 0 52 0 0 2 33 10 0 18 2 48 0 5 16 1 32 44 7 16 0 1 3 0 52 0 0 2 33 17 0 18 2 48 0 5 1 5 0 16 1 52 4 0 2 32 15 7 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 7 0 52 0 0 2 33 9 0 18 2 48 0 5 3 32 236 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 8 0 52 0 0 2 33 9 0 18 2 48 0 5 4 32 201 6 16 0 1 6 0 52 0 0 2 6 33 24 0 5 16 1 1 9 0 52 0 0 2 6 34 10 0 5 16 1 1 10 0 52 0 0 2 33 15 0 18 2 48 0 5 1 11 0 52 4 0 1 32 146 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 12 0 52 0 0 2 33 15 0 18 2 48 0 5 1 11 0 52 4 0 1 32 105 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 13 0 52 0 0 2 33 58 0 18 2 48 0 5 18 0 48 0 1 14 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 15 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 1 16 0 18 4 48 0 52 4 0 2 32 21 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 17 0 52 0 0 2 33 19 0 18 2 48 0 5 1 18 0 18 4 48 0 52 4 0 2 32 232 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 19 0 52 0 0 2 33 19 0 18 2 48 0 5 1 20 0 18 4 48 0 52 4 0 2 32 187 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 21 0 52 0 0 2 33 47 0 18 2 48 0 5 18 0 48 0 1 22 0 52 0 0 2 33 14 0 1 23 0 18 5 48 0 52 4 0 2 32 11 0 1 23 0 18 4 48 0 52 4 0 2 32 114 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 24 0 52 0 0 2 33 12 0 18 2 48 0 5 18 6 49 0 32 76 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 25 0 52 0 0 2 33 15 0 18 2 48 0 5 1 26 0 52 4 0 1 32 35 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 27 0 52 0 0 2 33 15 0 18 2 48 0 5 1 26 0 52 4 0 1 32 250 4 16 0 1 6 0 52 0 0 2 6 33 24 0 5 16 1 1 28 0 52 0 0 2 6 34 10 0 5 16 1 1 29 0 52 0 0 2 33 15 0 18 2 48 0 5 1 30 0 52 4 0 1 32 195 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 31 0 52 0 0 2 33 15 0 18 2 48 0 5 1 32 0 52 4 0 1 32 154 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 33 0 52 0 0 2 33 29 0 18 2 48 0 5 1 35 0 52 34 0 1 1 32 0 52 4 0 1 1 33 0 52 4 0 3 32 99 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 36 0 52 0 0 2 33 29 0 18 2 48 0 5 1 35 0 52 34 0 1 1 32 0 52 4 0 1 1 36 0 52 4 0 3 32 44 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 37 0 52 0 0 2 33 19 0 18 2 48 0 5 18 7 1 26 0 52 4 0 1 49 1 32 255 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 38 0 52 0 0 2 33 19 0 18 2 48 0 5 18 7 1 30 0 52 4 0 1 49 1 32 210 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 39 0 52 0 0 2 33 15 0 18 2 48 0 5 18 8 1 40 0 49 1 32 169 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 41 0 52 0 0 2 33 15 0 18 2 48 0 5 18 8 1 42 0 49 1 32 128 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 43 0 52 0 0 2 33 15 0 18 2 48 0 5 18 8 1 44 0 49 1 32 87 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 45 0 52 0 0 2 33 15 0 18 2 48 0 5 18 9 1 46 0 49 1 32 46 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 47 0 52 0 0 2 33 15 0 18 2 48 0 5 18 9 1 48 0 49 1 32 5 3 16 0 1 49 0 52 0 0 2 33 24 0 18 2 48 0 5 1 50 0 1 52 0 16 1 52 51 0 2 52 4 0 2 32 225 2 16 0 1 53 0 52 0 0 2 33 17 0 18 2 48 0 5 1 50 0 16 1 52 4 0 2 32 196 2 16 0 1 54 0 52 0 0 2 33 24 0 18 2 48 0 5 1 55 0 16 1 1 26 0 52 4 0 1 52 4 0 3 32 160 2 16 0 1 56 0 52 0 0 2 33 24 0 18 2 48 0 5 1 57 0 16 1 1 26 0 52 4 0 1 52 4 0 3 32 124 2 16 0 1 58 0 52 0 0 2 33 17 0 18 2 48 0 5 1 59 0 16 1 52 4 0 2 32 95 2 16 0 1 60 0 52 0 0 2 33 24 0 18 2 48 0 5 1 50 0 1 35 0 16 1 52 51 0 2 52 4 0 2 32 59 2 16 0 1 61 0 52 0 0 2 33 17 0 18 2 48 0 5 1 62 0 16 1 52 4 0 2 32 30 2 16 0 1 22 0 52 0 0 2 33 39 0 18 2 48 0 5 18 4 48 0 17 2 18 0 48 0 1 63 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 2 32 235 1 16 0 1 64 0 52 0 0 2 33 41 0 18 2 48 0 5 51 65 0 0 10 0 0 0 2 0 1 0 4 1 2 17 2 5 1 66 0 16 2 52 4 0 0 48 1 52 4 0 2 32 182 1 16 0 1 14 0 52 0 0 2 6 33 10 0 5 16 1 1 67 0 52 0 0 2 33 49 0 18 2 48 0 5 51 68 0 0 0 0 1 0 11 0 12 0 2 1 3 17 3 5 16 3 52 4 0 0 48 1 17 4 1 69 0 16 4 18 4 48 0 52 4 0 3 32 107 1 16 0 1 70 0 52 0 0 2 33 12 0 18 2 48 0 5 18 13 49 0 32 83 1 16 0 1 14 0 52 0 0 2 6 33 10 0 5 16 1 1 71 0 52 0 0 2 33 26 0 18 2 48 0 5 18 14 48 0 17 4 1 72 0 1 73 0 16 4 52 4 0 3 32 31 1 16 0 1 74 0 52 0 0 2 33 17 0 18 2 48 0 5 1 75 0 16 1 52 4 0 2 32 2 1 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 76 0 52 0 0 2 33 149 0 18 2 48 0 5 18 0 48 0 1 61 0 52 0 0 2 6 33 54 0 5 18 12 52 78 0 1 18 11 1 80 0 52 79 0 2 52 77 0 2 6 33 30 0 5 18 12 18 11 1 80 0 52 79 0 2 52 82 0 2 1 83 0 52 81 0 2 1 84 0 52 0 0 2 33 51 0 18 1 48 0 17 4 18 2 48 0 5 18 15 1 84 0 48 1 5 18 4 48 0 17 5 18 15 1 85 0 48 1 5 1 86 0 16 4 16 5 18 4 48 0 52 4 0 4 32 18 0 1 18 0 1 20 0 18 4 48 0 52 4 0 2 52 4 0 2 32 83 0 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 87 0 52 0 0 2 33 56 0 18 2 48 0 5 18 1 48 0 17 4 18 2 48 0 5 18 15 1 84 0 48 1 5 18 4 48 0 17 5 18 15 1 85 0 48 1 5 1 88 0 16 4 16 5 18 4 48 0 52 4 0 4 32 1 0 2 50)} {:upvalue-count 8 :arity 1 :constants ("=" "op" "'s" "class" "paren-open" "list" call "bracket-open" ".." "bracket-close" array-slice array-index) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 14 0 18 2 48 0 5 18 3 16 0 49 1 32 74 1 18 0 48 0 1 3 0 52 0 0 2 33 9 0 18 4 16 0 49 1 32 51 1 18 0 48 0 1 4 0 52 0 0 2 33 20 0 18 5 48 0 17 1 1 6 0 16 0 16 1 52 5 0 3 32 17 1 18 0 48 0 1 7 0 52 0 0 2 33 1 1 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 8 0 52 0 0 2 33 53 0 18 2 48 0 5 18 6 48 0 17 1 18 0 48 0 1 9 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 7 1 10 0 16 0 2 16 1 52 5 0 4 49 1 32 166 0 18 6 48 0 17 1 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 8 0 52 0 0 2 33 92 0 18 2 48 0 5 18 0 48 0 1 9 0 52 0 0 2 33 24 0 18 2 48 0 5 18 7 1 10 0 16 0 16 1 2 52 5 0 4 49 1 32 46 0 18 6 48 0 17 2 18 0 48 0 1 9 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 7 1 10 0 16 0 16 1 16 2 52 5 0 4 49 1 32 38 0 18 0 48 0 1 9 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 7 1 11 0 16 0 16 1 52 5 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 7 :arity 1 :constants ("=" "op" "==" "!=" "<" ">" "<=" ">=" "===" "!==" "list" = strict-eq not "keyword" "is" "not" "empty" empty? "in" not-in? "between" "and" and >= <= "really" "equal" "to" "a" "an" "!" type-check-strict type-check "ignoring" "case" eq-ignore-case "less" "than" "or" < "greater" > in? "ident" "hs-keyword?" prop-is "am" "exists" exists? "starts" "with" starts-with-ic? starts-with? "ends" ends-with-ic? ends-with? "matches" matches-ignore-case? matches? "contains" contains-ignore-case? contains? "as" "colon" as "str" ":" "of" "list?" "first" ref "make-symbol" "." "nth" 1 of "does" "exist" "match" "contain" "include" "includes" "start" "end" "equals" "precedes" precedes? "follows" follows?) :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 6 33 108 0 5 16 2 1 2 0 52 0 0 2 6 34 94 0 5 16 2 1 3 0 52 0 0 2 6 34 80 0 5 16 2 1 4 0 52 0 0 2 6 34 66 0 5 16 2 1 5 0 52 0 0 2 6 34 52 0 5 16 2 1 6 0 52 0 0 2 6 34 38 0 5 16 2 1 7 0 52 0 0 2 6 34 24 0 5 16 2 1 8 0 52 0 0 2 6 34 10 0 5 16 2 1 9 0 52 0 0 2 33 109 0 18 2 48 0 5 18 3 48 0 17 3 16 2 1 2 0 52 0 0 2 33 14 0 1 11 0 16 0 16 3 52 10 0 3 32 69 0 16 2 1 8 0 52 0 0 2 33 14 0 1 12 0 16 0 16 3 52 10 0 3 32 43 0 16 2 1 9 0 52 0 0 2 33 21 0 1 13 0 1 12 0 16 0 16 3 52 10 0 3 52 10 0 2 32 10 0 16 2 16 0 16 3 52 10 0 3 32 54 10 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 15 0 52 0 0 2 33 244 3 18 2 48 0 5 18 4 1 16 0 48 1 33 166 1 18 4 1 17 0 48 1 33 19 0 1 13 0 1 18 0 16 0 52 10 0 2 52 10 0 2 32 134 1 18 4 1 19 0 48 1 33 16 0 1 20 0 16 0 18 3 48 0 52 10 0 3 32 108 1 18 4 1 21 0 48 1 33 59 0 18 5 48 0 17 3 18 4 1 22 0 48 1 5 18 5 48 0 17 4 1 13 0 1 23 0 1 24 0 16 0 16 3 52 10 0 3 1 25 0 16 0 16 4 52 10 0 3 52 10 0 3 52 10 0 2 32 39 1 18 4 1 26 0 48 1 33 39 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 13 0 1 12 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 246 0 18 4 1 27 0 48 1 33 31 0 18 4 1 28 0 48 1 5 1 13 0 1 11 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 205 0 18 1 48 0 1 29 0 52 0 0 2 6 34 12 0 5 18 1 48 0 1 30 0 52 0 0 2 6 33 7 0 5 18 2 48 0 5 3 33 101 0 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 31 0 52 0 0 2 17 4 16 4 33 7 0 18 2 48 0 32 1 0 2 5 16 4 33 21 0 1 13 0 1 32 0 16 0 16 3 52 10 0 3 52 10 0 2 32 18 0 1 13 0 1 33 0 16 0 16 3 52 10 0 3 52 10 0 2 32 63 0 18 3 48 0 17 3 18 4 1 34 0 48 1 33 29 0 18 4 1 35 0 48 1 5 1 13 0 1 36 0 16 0 16 3 52 10 0 3 52 10 0 2 32 18 0 1 13 0 1 11 0 16 0 16 3 52 10 0 3 52 10 0 2 32 60 2 18 4 1 17 0 48 1 33 12 0 1 18 0 16 0 52 10 0 2 32 38 2 18 4 1 37 0 48 1 33 66 0 18 4 1 38 0 48 1 5 18 4 1 39 0 48 1 33 32 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 25 0 16 0 18 3 48 0 52 10 0 3 32 13 0 1 40 0 16 0 18 3 48 0 52 10 0 3 32 218 1 18 4 1 41 0 48 1 33 66 0 18 4 1 38 0 48 1 5 18 4 1 39 0 48 1 33 32 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 24 0 16 0 18 3 48 0 52 10 0 3 32 13 0 1 42 0 16 0 18 3 48 0 52 10 0 3 32 142 1 18 4 1 21 0 48 1 33 52 0 18 5 48 0 17 3 18 4 1 22 0 48 1 5 18 5 48 0 17 4 1 23 0 1 24 0 16 0 16 3 52 10 0 3 1 25 0 16 0 16 4 52 10 0 3 52 10 0 3 32 80 1 18 4 1 19 0 48 1 33 16 0 1 43 0 16 0 18 3 48 0 52 10 0 3 32 54 1 18 4 1 26 0 48 1 33 32 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 12 0 16 0 18 3 48 0 52 10 0 3 32 12 1 18 4 1 27 0 48 1 33 24 0 18 4 1 28 0 48 1 5 1 11 0 16 0 18 3 48 0 52 10 0 3 32 234 0 18 1 48 0 1 29 0 52 0 0 2 6 34 12 0 5 18 1 48 0 1 30 0 52 0 0 2 6 33 7 0 5 18 2 48 0 5 3 33 87 0 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 31 0 52 0 0 2 17 4 16 4 33 7 0 18 2 48 0 32 1 0 2 5 16 4 33 14 0 1 32 0 16 0 16 3 52 10 0 3 32 11 0 1 33 0 16 0 16 3 52 10 0 3 32 106 0 18 0 48 0 1 44 0 52 0 0 2 6 33 14 0 5 20 45 0 18 1 48 0 48 1 52 16 0 1 33 25 0 18 1 48 0 17 3 18 2 48 0 5 1 46 0 16 0 16 3 52 10 0 3 32 49 0 18 3 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 36 0 16 0 16 3 52 10 0 3 32 11 0 1 11 0 16 0 16 3 52 10 0 3 32 40 6 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 47 0 52 0 0 2 33 165 0 18 2 48 0 5 18 4 1 16 0 48 1 33 82 0 18 4 1 19 0 48 1 33 16 0 1 20 0 16 0 18 3 48 0 52 10 0 3 32 53 0 18 4 1 17 0 48 1 33 19 0 1 13 0 1 18 0 16 0 52 10 0 2 52 10 0 2 32 24 0 18 3 48 0 17 3 1 13 0 1 11 0 16 0 16 3 52 10 0 3 52 10 0 2 32 65 0 18 4 1 19 0 48 1 33 16 0 1 43 0 16 0 18 3 48 0 52 10 0 3 32 39 0 18 4 1 17 0 48 1 33 12 0 1 18 0 16 0 52 10 0 2 32 17 0 18 3 48 0 17 3 1 11 0 16 0 16 3 52 10 0 3 32 105 5 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 48 0 52 0 0 2 33 17 0 18 2 48 0 5 1 49 0 16 0 52 10 0 2 32 62 5 16 1 1 14 0 52 0 0 2 6 34 10 0 5 16 1 1 44 0 52 0 0 2 6 33 10 0 5 16 2 1 50 0 52 0 0 2 33 65 0 18 2 48 0 5 18 4 1 51 0 48 1 5 18 5 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 52 0 16 0 16 3 52 10 0 3 32 11 0 1 53 0 16 0 16 3 52 10 0 3 32 213 4 16 1 1 14 0 52 0 0 2 6 34 10 0 5 16 1 1 44 0 52 0 0 2 6 33 10 0 5 16 2 1 54 0 52 0 0 2 33 65 0 18 2 48 0 5 18 4 1 51 0 48 1 5 18 5 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 55 0 16 0 16 3 52 10 0 3 32 11 0 1 56 0 16 0 16 3 52 10 0 3 32 108 4 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 57 0 52 0 0 2 33 57 0 18 2 48 0 5 18 3 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 58 0 16 0 16 3 52 10 0 3 32 11 0 1 59 0 16 0 16 3 52 10 0 3 32 25 4 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 60 0 52 0 0 2 33 57 0 18 2 48 0 5 18 3 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 61 0 16 0 16 3 52 10 0 3 32 11 0 1 62 0 16 0 16 3 52 10 0 3 32 198 3 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 63 0 52 0 0 2 33 135 0 18 2 48 0 5 18 1 48 0 1 29 0 52 0 0 2 6 34 12 0 5 18 1 48 0 1 30 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 64 0 52 0 0 2 6 33 9 0 5 18 6 48 0 52 16 0 1 33 39 0 18 2 48 0 5 18 1 48 0 17 4 18 2 48 0 5 1 65 0 16 0 16 3 1 67 0 16 4 52 66 0 3 52 10 0 3 32 11 0 1 65 0 16 0 16 3 52 10 0 3 32 37 3 16 1 1 64 0 52 0 0 2 33 92 0 18 2 48 0 5 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 31 0 52 0 0 2 17 4 16 4 33 7 0 18 2 48 0 32 1 0 2 5 16 4 33 14 0 1 32 0 16 0 16 3 52 10 0 3 32 11 0 1 33 0 16 0 16 3 52 10 0 3 32 189 2 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 68 0 52 0 0 2 33 77 0 18 2 48 0 5 18 3 48 0 17 3 16 0 52 69 0 1 6 33 14 0 5 16 0 52 70 0 1 1 71 0 52 0 0 2 33 25 0 1 73 0 52 72 0 1 16 3 16 0 1 75 0 52 74 0 2 52 10 0 3 32 11 0 1 76 0 16 0 16 3 52 10 0 3 32 86 2 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 19 0 52 0 0 2 33 21 0 18 2 48 0 5 1 43 0 16 0 18 3 48 0 52 10 0 3 32 39 2 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 77 0 52 0 0 2 33 252 0 18 2 48 0 5 18 4 1 16 0 48 1 5 18 4 1 78 0 48 1 33 19 0 1 13 0 1 49 0 16 0 52 10 0 2 52 10 0 2 32 207 0 18 4 1 79 0 48 1 33 23 0 1 13 0 1 59 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 174 0 18 4 1 80 0 48 1 6 34 8 0 5 18 4 1 60 0 48 1 33 23 0 1 13 0 1 62 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 129 0 18 4 1 81 0 48 1 6 34 8 0 5 18 4 1 82 0 48 1 33 23 0 1 13 0 1 62 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 84 0 18 4 1 83 0 48 1 33 31 0 18 4 1 51 0 48 1 5 1 13 0 1 53 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 43 0 18 4 1 84 0 48 1 33 31 0 18 4 1 51 0 48 1 5 1 13 0 1 56 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 2 0 16 0 32 17 1 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 85 0 52 0 0 2 33 21 0 18 2 48 0 5 1 11 0 16 0 18 3 48 0 52 10 0 3 32 226 0 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 26 0 52 0 0 2 33 29 0 18 2 48 0 5 18 4 1 85 0 48 1 5 1 12 0 16 0 18 3 48 0 52 10 0 3 32 171 0 16 1 1 14 0 52 0 0 2 6 33 38 0 5 16 2 1 80 0 52 0 0 2 6 34 24 0 5 16 2 1 81 0 52 0 0 2 6 34 10 0 5 16 2 1 82 0 52 0 0 2 33 21 0 18 2 48 0 5 1 62 0 16 0 18 3 48 0 52 10 0 3 32 96 0 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 86 0 52 0 0 2 33 21 0 18 2 48 0 5 1 87 0 16 0 18 5 48 0 52 10 0 3 32 49 0 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 88 0 52 0 0 2 33 21 0 18 2 48 0 5 1 89 0 16 0 18 5 48 0 52 10 0 3 32 2 0 16 0 50)} {:upvalue-count 6 :arity 1 :constants ("where" "list" coll-where "sorted" "by" "descending" "not" "ascending" coll-sorted-desc coll-sorted "mapped" "to" coll-mapped "split" coll-split "joined" coll-joined) :bytecode (18 0 1 0 0 48 1 33 36 0 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 2 0 16 0 16 1 52 1 0 3 49 1 32 11 1 18 0 1 3 0 48 1 33 93 0 18 0 1 4 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 0 1 5 0 48 1 17 2 16 2 52 6 0 1 33 10 0 18 0 1 7 0 48 1 32 1 0 2 5 18 5 16 2 33 14 0 1 8 0 16 0 16 1 52 1 0 3 32 11 0 1 9 0 16 0 16 1 52 1 0 3 49 1 32 164 0 18 0 1 10 0 48 1 33 44 0 18 0 1 11 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 12 0 16 0 16 1 52 1 0 3 49 1 32 110 0 18 0 1 13 0 48 1 33 44 0 18 0 1 4 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 14 0 16 0 16 1 52 1 0 3 49 1 32 56 0 18 0 1 15 0 48 1 33 44 0 18 0 1 4 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 16 0 16 0 16 1 52 1 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 7 :arity 1 :constants ("and" "list" and "or" or) :bytecode (18 0 1 0 0 48 1 33 40 0 18 1 18 2 18 3 18 4 18 5 48 0 48 1 48 1 48 1 48 1 17 1 18 6 1 2 0 16 0 16 1 52 1 0 3 49 1 32 52 0 18 0 1 3 0 48 1 33 40 0 18 1 18 2 18 3 18 4 18 5 48 0 48 1 48 1 48 1 48 1 17 1 18 6 1 4 0 16 0 16 1 52 1 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 9 :arity 0 :constants ("nil?" "number?" "=" "ident" "not" "starts" "ends" "contains" "matches" "is" "does" "in" "precedes" "follows" "list" string-postfix "then" "end" "else" "otherwise" "op" "%") :bytecode (18 0 48 0 17 0 16 0 52 0 0 1 33 4 0 2 32 134 1 16 0 52 1 0 1 6 33 160 0 5 18 1 48 0 1 3 0 52 2 0 2 6 33 144 0 5 18 2 48 0 1 5 0 52 2 0 2 6 34 124 0 5 18 2 48 0 1 6 0 52 2 0 2 6 34 108 0 5 18 2 48 0 1 7 0 52 2 0 2 6 34 92 0 5 18 2 48 0 1 8 0 52 2 0 2 6 34 76 0 5 18 2 48 0 1 9 0 52 2 0 2 6 34 60 0 5 18 2 48 0 1 10 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 11 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 12 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 13 0 52 2 0 2 52 4 0 1 33 27 0 18 2 48 0 17 1 18 3 48 0 5 1 15 0 16 0 16 1 52 14 0 3 17 0 32 1 0 2 5 18 4 16 0 48 1 17 1 18 5 16 1 48 1 17 2 18 6 16 2 48 1 17 3 18 7 16 3 48 1 17 4 18 8 16 4 48 1 17 5 16 5 6 33 112 0 5 18 1 48 0 1 3 0 52 2 0 2 6 33 64 0 5 18 2 48 0 1 16 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 17 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 18 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 19 0 52 2 0 2 52 4 0 1 6 34 28 0 5 18 1 48 0 1 20 0 52 2 0 2 6 33 12 0 5 18 2 48 0 1 21 0 52 2 0 2 33 25 0 18 2 48 0 17 6 18 3 48 0 5 1 15 0 16 5 16 6 52 14 0 3 32 2 0 16 5 50)} {:upvalue-count 2 :arity 2 :constants () :bytecode (18 0 16 0 48 1 33 7 0 18 1 49 0 32 2 0 16 1 50)} {:upvalue-count 5 :arity 0 :constants ("=" "class" "get" "value" "list" {:upvalue-count 4 :arity 0 :constants ("=" "class" "append" "list" "get" "value") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 31 0 18 1 18 2 48 0 1 5 0 52 4 0 2 52 3 0 1 52 2 0 2 19 1 5 18 3 49 0 32 1 0 2 50)} "to" me "when" "empty?" add-class-when add-class multi-add-class-when "cons" multi-add-class) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 165 0 18 1 48 0 1 3 0 52 2 0 2 17 0 52 4 0 0 17 1 51 5 0 0 0 1 1 0 1 1 2 17 2 5 16 2 48 0 5 18 2 1 6 0 1 7 0 52 4 0 1 48 2 17 3 18 3 1 8 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 4 16 1 52 9 0 1 33 35 0 16 4 33 16 0 1 10 0 16 0 16 3 16 4 52 4 0 4 32 11 0 1 11 0 16 0 16 3 52 4 0 3 32 44 0 16 4 33 18 0 1 12 0 16 3 16 4 16 0 16 1 52 4 0 5 32 21 0 1 14 0 16 3 16 0 16 1 52 13 0 2 52 13 0 2 52 13 0 2 32 1 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("=" "class" "get" "value" "list" {:upvalue-count 4 :arity 0 :constants ("=" "class" "append" "list" "get" "value") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 31 0 18 1 18 2 48 0 1 5 0 52 4 0 2 52 3 0 1 52 2 0 2 19 1 5 18 3 49 0 32 1 0 2 50)} "from" "empty?" remove-class "cons" multi-remove-class "bracket-open" "[" "attr" "]" remove-attr "{" {:upvalue-count 4 :arity 0 :constants ("not" "=" "}" ";" "append" "list" "get" "value") :bytecode (18 0 48 0 1 2 0 52 1 0 2 52 0 0 1 33 76 0 18 0 48 0 1 3 0 52 1 0 2 33 7 0 18 1 48 0 32 1 0 2 5 18 0 48 0 1 2 0 52 1 0 2 52 0 0 1 33 31 0 18 2 18 1 48 0 1 7 0 52 6 0 2 52 5 0 1 52 4 0 2 19 2 5 18 3 49 0 32 1 0 2 32 1 0 2 50)} "}" remove-css remove-element) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 105 0 18 1 48 0 1 3 0 52 2 0 2 17 0 52 4 0 0 17 1 51 5 0 0 0 1 1 0 1 1 2 17 2 5 16 2 48 0 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 3 16 1 52 7 0 1 33 14 0 1 8 0 16 0 16 3 52 4 0 3 32 21 0 1 10 0 16 3 16 0 16 1 52 9 0 2 52 9 0 2 52 9 0 2 32 209 0 18 0 48 0 1 11 0 52 0 0 2 6 33 12 0 5 18 4 48 0 1 12 0 52 0 0 2 33 78 0 18 1 48 0 5 18 0 48 0 1 13 0 52 0 0 2 33 55 0 18 1 48 0 1 3 0 52 2 0 2 17 0 18 2 1 14 0 48 1 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 1 1 15 0 16 0 16 1 52 4 0 3 32 1 0 2 32 101 0 18 4 48 0 1 16 0 52 0 0 2 33 72 0 18 1 48 0 5 52 4 0 0 17 0 51 17 0 0 4 0 1 1 0 1 1 17 1 5 16 1 48 0 5 18 2 1 18 0 48 1 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 2 1 19 0 16 0 16 2 52 4 0 3 32 15 0 18 3 48 0 17 0 1 20 0 16 0 52 4 0 2 50)} {:upvalue-count 9 :arity 0 :constants ("between" "=" "class" "and" "on" "list" me toggle-between toggle-class "style" toggle-style-between toggle-style "attr" toggle-attr-between toggle-attr "keyword" "my" "get" "value" "the" "list?" "first" style "nth" 1 2 attr has-class?) :bytecode (18 0 1 0 0 48 1 33 106 0 18 1 48 0 1 2 0 52 1 0 2 33 88 0 18 2 48 0 17 0 18 3 48 0 5 16 0 17 0 18 4 1 3 0 48 1 5 18 1 48 0 1 2 0 52 1 0 2 33 47 0 18 2 48 0 17 1 18 3 48 0 5 16 1 17 1 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 2 1 7 0 16 0 16 1 16 2 52 5 0 4 32 1 0 2 32 1 0 2 32 49 3 18 1 48 0 1 2 0 52 1 0 2 33 45 0 18 2 48 0 17 0 18 3 48 0 5 16 0 17 0 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 1 1 8 0 16 0 16 1 52 5 0 3 32 246 2 18 1 48 0 1 9 0 52 1 0 2 33 109 0 18 2 48 0 17 0 18 3 48 0 5 16 0 17 0 18 0 1 0 0 48 1 33 54 0 18 6 48 0 17 1 18 4 1 3 0 48 1 5 18 6 48 0 17 2 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 3 1 10 0 16 0 16 1 16 2 16 3 52 5 0 5 32 27 0 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 1 1 11 0 16 0 16 1 52 5 0 3 32 123 2 18 1 48 0 1 12 0 52 1 0 2 33 109 0 18 2 48 0 17 0 18 3 48 0 5 16 0 17 0 18 0 1 0 0 48 1 33 54 0 18 6 48 0 17 1 18 4 1 3 0 48 1 5 18 6 48 0 17 2 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 3 1 13 0 16 0 16 1 16 2 16 3 52 5 0 5 32 27 0 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 1 1 14 0 16 0 16 1 52 5 0 3 32 0 2 18 1 48 0 1 15 0 52 1 0 2 6 33 12 0 5 18 2 48 0 1 16 0 52 1 0 2 33 199 0 18 3 48 0 5 18 1 48 0 1 9 0 52 1 0 2 33 115 0 18 3 48 0 1 18 0 52 17 0 2 17 0 18 0 1 0 0 48 1 33 58 0 18 7 48 0 17 1 18 4 1 3 0 48 1 5 18 7 48 0 17 2 18 0 1 4 0 48 1 33 7 0 18 7 48 0 32 1 0 2 17 3 1 10 0 16 0 16 1 16 2 16 3 52 5 0 5 32 31 0 18 0 1 4 0 48 1 33 7 0 18 7 48 0 32 1 0 2 17 1 1 11 0 16 0 16 1 52 5 0 3 32 62 0 18 1 48 0 1 12 0 52 1 0 2 33 47 0 18 3 48 0 1 18 0 52 17 0 2 17 0 18 0 1 4 0 48 1 33 7 0 18 7 48 0 32 1 0 2 17 1 1 14 0 16 0 16 1 52 5 0 3 32 1 0 2 32 27 1 18 1 48 0 1 15 0 52 1 0 2 6 33 12 0 5 18 2 48 0 1 19 0 52 1 0 2 33 252 0 18 3 48 0 5 18 8 48 0 17 0 16 0 52 20 0 1 6 33 14 0 5 16 0 52 21 0 1 1 22 0 52 1 0 2 33 84 0 16 0 1 24 0 52 23 0 2 17 1 16 0 1 25 0 52 23 0 2 17 2 18 0 1 0 0 48 1 33 38 0 18 7 48 0 17 3 18 4 1 3 0 48 1 5 18 7 48 0 17 4 1 10 0 16 1 16 3 16 4 16 2 52 5 0 5 32 11 0 1 11 0 16 1 16 2 52 5 0 3 32 127 0 16 0 52 20 0 1 6 33 14 0 5 16 0 52 21 0 1 1 26 0 52 1 0 2 33 36 0 16 0 1 24 0 52 23 0 2 17 1 16 0 1 25 0 52 23 0 2 17 2 1 14 0 16 1 16 2 52 5 0 3 32 64 0 16 0 52 20 0 1 6 33 14 0 5 16 0 52 21 0 1 1 27 0 52 1 0 2 33 36 0 16 0 1 24 0 52 23 0 2 17 1 16 0 1 25 0 52 23 0 2 17 2 1 8 0 16 2 16 1 52 5 0 3 32 1 0 2 32 1 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("to" "list" set!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 50)} {:upvalue-count 4 :arity 0 :constants ("into" "list" set! "before" put! "after" "at" "start" "of" "end" "error" "str" "Expected start/end after at, position " "Expected into/before/after/at at position ") :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 16 0 1 2 0 18 0 48 0 16 0 52 1 0 3 32 171 0 18 1 1 3 0 48 1 33 19 0 1 4 0 16 0 1 3 0 18 0 48 0 52 1 0 4 32 142 0 18 1 1 5 0 48 1 33 19 0 1 4 0 16 0 1 5 0 18 0 48 0 52 1 0 4 32 113 0 18 1 1 6 0 48 1 33 90 0 18 1 1 7 0 48 1 33 27 0 18 2 1 8 0 48 1 5 1 4 0 16 0 1 7 0 18 0 48 0 52 1 0 4 32 50 0 18 1 1 9 0 48 1 33 27 0 18 2 1 8 0 48 1 5 1 4 0 16 0 1 9 0 18 0 48 0 52 1 0 4 32 13 0 1 12 0 18 3 52 11 0 2 52 10 0 1 32 13 0 1 13 0 18 3 52 11 0 2 52 10 0 1 50)} {:upvalue-count 3 :arity 0 :constants ("then" "else" "otherwise" "end" "list" if) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 2 48 0 17 1 18 1 1 1 0 48 1 6 34 8 0 5 18 1 1 2 0 48 1 33 7 0 18 2 48 0 32 1 0 2 17 2 18 1 1 3 0 48 1 5 16 2 33 16 0 1 5 0 16 0 16 1 16 2 52 4 0 4 32 11 0 1 5 0 16 0 16 1 52 4 0 3 50)} {:upvalue-count 6 :arity 0 :constants ("for" "from" "list" wait-for "=" "number" wait "get" "value" 0) :bytecode (18 0 1 0 0 48 1 33 65 0 18 1 48 0 17 0 18 2 48 0 5 18 0 1 1 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 1 16 1 33 17 0 1 3 0 16 0 1 1 0 16 1 52 2 0 4 32 9 0 1 3 0 16 0 52 2 0 2 32 53 0 18 4 48 0 1 5 0 52 4 0 2 33 29 0 18 2 48 0 17 0 1 6 0 18 5 16 0 1 8 0 52 7 0 2 48 1 52 2 0 2 32 10 0 1 6 0 1 9 0 52 2 0 2 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "paren-close" "get" "value" "colon" "comma" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 34 5 0 5 18 1 48 0 33 28 0 18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 83 0 18 2 48 0 1 3 0 52 2 0 2 17 1 18 0 48 0 1 4 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 3 48 0 17 2 18 0 48 0 1 5 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 4 16 0 16 1 16 2 52 7 0 2 52 6 0 2 49 1 50)} "cons" dict "list") :bytecode (18 0 48 0 5 51 0 0 0 1 0 2 0 0 0 3 1 0 17 0 5 1 2 0 16 0 52 3 0 0 48 1 52 1 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("get" "value" {:upvalue-count 6 :arity 0 :constants ("not" "=" "class" "str" "." "local" ":") :bytecode (18 0 48 0 52 0 0 1 33 96 0 18 1 48 0 1 2 0 52 1 0 2 33 32 0 18 2 48 0 17 0 18 3 48 0 5 18 4 1 4 0 16 0 52 3 0 3 19 4 5 18 5 49 0 32 47 0 18 1 48 0 1 5 0 52 1 0 2 33 32 0 18 2 48 0 17 0 18 3 48 0 5 18 4 1 6 0 16 0 52 3 0 3 19 4 5 18 5 49 0 32 1 0 2 32 1 0 2 50)}) :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 51 2 0 0 1 0 2 0 3 0 0 1 0 1 1 17 1 5 16 1 48 0 5 16 0 50)} {:upvalue-count 4 :arity 0 :constants ("=" "paren-open" "to" "list" me send) :bytecode (18 0 48 0 17 0 18 1 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 17 1 18 3 1 2 0 1 4 0 52 3 0 1 48 2 17 2 16 1 33 16 0 1 5 0 16 0 16 1 16 2 52 3 0 4 32 11 0 1 5 0 16 0 16 2 52 3 0 3 50)} {:upvalue-count 2 :arity 0 :constants ("get" "value" "on" "list" me trigger) :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 18 1 1 2 0 1 4 0 52 3 0 1 48 2 17 1 1 5 0 16 0 16 1 52 3 0 3 50)} {:upvalue-count 1 :arity 0 :constants ("list" log) :bytecode (1 1 0 18 0 48 0 52 0 0 2 50)} {:upvalue-count 3 :arity 0 :constants ("by" 1 "on" "list" me increment!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 7 0 18 0 48 0 32 3 0 1 1 0 17 1 18 2 1 2 0 1 4 0 52 3 0 1 48 2 17 2 1 5 0 16 0 16 1 16 2 52 3 0 4 50)} {:upvalue-count 3 :arity 0 :constants ("by" 1 "on" "list" me decrement!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 7 0 18 0 48 0 32 3 0 1 1 0 17 1 18 2 1 2 0 1 4 0 52 3 0 1 48 2 17 2 1 5 0 16 0 16 1 16 2 52 3 0 4 50)} {:upvalue-count 6 :arity 0 :constants ("list" me "=" "keyword" "then" "end" "with" "add" "remove" "set" "put" "toggle" "hide" "show" "display" hide) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 188 0 18 1 48 0 1 3 0 52 2 0 2 6 33 156 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 140 0 5 18 2 48 0 1 5 0 52 2 0 2 6 34 124 0 5 18 2 48 0 1 6 0 52 2 0 2 6 34 108 0 5 18 2 48 0 1 7 0 52 2 0 2 6 34 92 0 5 18 2 48 0 1 8 0 52 2 0 2 6 34 76 0 5 18 2 48 0 1 9 0 52 2 0 2 6 34 60 0 5 18 2 48 0 1 10 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 11 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 12 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 13 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 18 4 1 6 0 48 1 33 29 0 18 0 48 0 33 6 0 1 14 0 32 13 0 18 2 48 0 17 1 18 5 48 0 5 16 1 32 3 0 1 14 0 17 1 1 15 0 16 0 16 1 52 0 0 3 50)} {:upvalue-count 6 :arity 0 :constants ("list" me "=" "keyword" "then" "end" "with" "add" "remove" "set" "put" "toggle" "hide" "show" "display" show) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 188 0 18 1 48 0 1 3 0 52 2 0 2 6 33 156 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 140 0 5 18 2 48 0 1 5 0 52 2 0 2 6 34 124 0 5 18 2 48 0 1 6 0 52 2 0 2 6 34 108 0 5 18 2 48 0 1 7 0 52 2 0 2 6 34 92 0 5 18 2 48 0 1 8 0 52 2 0 2 6 34 76 0 5 18 2 48 0 1 9 0 52 2 0 2 6 34 60 0 5 18 2 48 0 1 10 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 11 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 12 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 13 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 18 4 1 6 0 48 1 33 29 0 18 0 48 0 33 6 0 1 14 0 32 13 0 18 2 48 0 17 1 18 5 48 0 5 16 1 32 3 0 1 14 0 17 1 1 15 0 16 0 16 1 52 0 0 3 50)} {:upvalue-count 8 :arity 0 :constants ("=" "ident" "element" "id" "class" "selector" {:upvalue-count 8 :arity 0 :constants ("=" "style" "get" "value" "my" "from" "number?" "ident" "not" "hs-keyword?" "list" string-postfix "to" "over" "using" transition-from transition) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 14 0 18 1 48 0 1 3 0 52 2 0 2 32 72 0 18 2 48 0 1 4 0 52 0 0 2 33 47 0 18 1 48 0 5 18 0 48 0 1 1 0 52 0 0 2 33 14 0 18 1 48 0 1 3 0 52 2 0 2 32 11 0 18 1 48 0 1 3 0 52 2 0 2 32 11 0 18 1 48 0 1 3 0 52 2 0 2 17 0 18 3 1 5 0 48 1 33 81 0 18 4 48 0 17 1 16 1 52 6 0 1 6 33 30 0 5 18 0 48 0 1 7 0 52 0 0 2 6 33 14 0 5 20 9 0 18 2 48 0 48 1 52 8 0 1 33 27 0 18 1 48 0 1 3 0 52 2 0 2 17 2 1 11 0 16 1 16 2 52 10 0 3 32 2 0 16 1 32 1 0 2 17 1 18 5 1 12 0 48 1 5 18 4 48 0 17 2 16 2 52 6 0 1 6 33 30 0 5 18 0 48 0 1 7 0 52 0 0 2 6 33 14 0 5 20 9 0 18 2 48 0 48 1 52 8 0 1 33 27 0 18 1 48 0 1 3 0 52 2 0 2 17 3 1 11 0 16 2 16 3 52 10 0 3 32 2 0 16 2 17 2 18 3 1 13 0 48 1 33 81 0 18 4 48 0 17 3 16 3 52 6 0 1 6 33 30 0 5 18 0 48 0 1 7 0 52 0 0 2 6 33 14 0 5 20 9 0 18 2 48 0 48 1 52 8 0 1 33 27 0 18 1 48 0 1 3 0 52 2 0 2 17 4 1 11 0 16 3 16 4 52 10 0 3 32 2 0 16 3 32 1 0 2 17 3 18 3 1 14 0 48 1 33 7 0 18 6 48 0 32 1 0 2 17 4 16 1 33 20 0 1 15 0 16 0 16 1 16 2 16 3 18 7 52 10 0 6 32 15 0 1 16 0 16 0 16 2 16 3 18 7 52 10 0 5 50)} {:upvalue-count 5 :arity 1 :constants ("not" "=" "ident" "hs-keyword?" "append" "list") :bytecode (18 0 48 0 52 0 0 1 6 33 30 0 5 18 1 48 0 1 2 0 52 1 0 2 6 33 14 0 5 20 3 0 18 2 48 0 48 1 52 0 0 1 33 21 0 18 3 16 0 18 4 48 0 52 5 0 1 52 4 0 2 49 1 32 2 0 16 0 50)} "list" "len" 1 "first" "cons" do) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 12 0 18 2 48 0 5 18 3 48 0 32 64 0 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 3 48 0 32 43 0 18 0 48 0 1 4 0 52 0 0 2 33 7 0 18 3 48 0 32 22 0 18 0 48 0 1 5 0 52 0 0 2 33 7 0 18 3 48 0 32 1 0 2 17 0 51 6 0 0 0 0 2 0 1 0 4 0 3 0 5 0 6 1 0 17 1 5 16 1 48 0 17 2 51 7 0 0 7 0 0 0 1 1 3 1 1 17 3 5 16 3 16 2 52 8 0 1 48 1 17 4 16 4 52 9 0 1 1 10 0 52 0 0 2 33 9 0 16 4 52 11 0 1 32 9 0 1 13 0 16 4 52 12 0 2 50)} {:upvalue-count 7 :arity 0 :constants ("=" "keyword" "for" "in" "end" "list" for "it" "forever" forever "while" while "until" until "times" times repeat) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 12 0 18 2 48 0 5 18 3 49 0 32 203 0 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 3 0 52 0 0 2 33 43 0 18 2 48 0 5 18 4 48 0 17 0 18 5 48 0 17 1 18 6 1 4 0 48 1 5 1 6 0 1 7 0 16 0 2 16 1 52 5 0 5 32 130 0 18 6 1 8 0 48 1 33 10 0 1 9 0 52 5 0 1 32 83 0 18 6 1 10 0 48 1 33 14 0 1 11 0 18 4 48 0 52 5 0 2 32 59 0 18 6 1 12 0 48 1 33 14 0 1 13 0 18 4 48 0 52 5 0 2 32 35 0 18 4 48 0 17 0 18 6 1 14 0 48 1 33 12 0 1 15 0 16 0 52 5 0 2 32 7 0 1 9 0 52 5 0 1 17 0 18 5 48 0 17 1 18 6 1 4 0 48 1 5 1 16 0 16 0 16 1 52 5 0 3 50)} {:upvalue-count 9 :arity 0 :constants ("=" "keyword" "gql" "brace-open" {:upvalue-count 5 :arity 2 :constants ("join" " " "=" "brace-open" "append" "list" "{" "+" 1 "brace-close" 0 "}" "-" "") :bytecode (18 0 48 0 33 12 0 1 1 0 16 0 52 0 0 2 32 165 0 18 1 48 0 1 3 0 52 2 0 2 33 34 0 18 2 48 0 5 18 3 16 0 1 6 0 52 5 0 1 52 4 0 2 16 1 1 8 0 52 7 0 2 49 2 32 117 0 18 1 48 0 1 9 0 52 2 0 2 33 63 0 16 1 1 10 0 52 2 0 2 33 17 0 18 2 48 0 5 1 1 0 16 0 52 0 0 2 32 31 0 18 2 48 0 5 18 3 16 0 1 11 0 52 5 0 1 52 4 0 2 16 1 1 8 0 52 12 0 2 49 2 32 40 0 18 4 48 0 17 2 18 2 48 0 5 18 3 16 0 16 2 33 5 0 16 2 32 3 0 1 13 0 52 5 0 1 52 4 0 2 16 1 49 2 50)} "str" "{ " "list" 0 " }" "query" "mutation" "subscription" " { " "" "from" fetch-gql "op" "/" {:upvalue-count 6 :arity 0 :constants ("not" "=" "ident" "op" "dot" "number" "append!") :bytecode (18 0 48 0 52 0 0 1 6 33 60 0 5 18 1 48 0 1 2 0 52 1 0 2 6 34 44 0 5 18 1 48 0 1 3 0 52 1 0 2 6 34 28 0 5 18 1 48 0 1 4 0 52 1 0 2 6 34 12 0 5 18 1 48 0 1 5 0 52 1 0 2 33 23 0 18 2 18 3 48 0 52 6 0 2 5 18 4 48 0 5 18 5 49 0 32 1 0 2 50)} "join" "nil?" "as" "with" "not" "text" fetch) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 58 1 18 2 48 0 5 18 0 48 0 1 3 0 52 0 0 2 33 45 0 18 2 48 0 5 51 4 0 0 3 0 0 0 2 1 0 0 1 17 0 5 1 6 0 16 0 52 7 0 0 1 8 0 48 2 1 9 0 52 5 0 3 32 181 0 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 10 0 52 0 0 2 6 34 60 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 11 0 52 0 0 2 6 34 28 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 12 0 52 0 0 2 33 84 0 18 1 48 0 17 1 18 2 48 0 5 18 0 48 0 1 3 0 52 0 0 2 33 47 0 18 2 48 0 5 51 4 0 0 3 0 0 0 2 1 2 0 1 17 2 5 16 1 1 13 0 16 2 52 7 0 0 1 8 0 48 2 1 9 0 52 5 0 4 32 9 0 16 1 1 14 0 52 5 0 2 32 3 0 1 14 0 17 1 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 15 0 52 0 0 2 33 20 0 18 2 48 0 5 18 4 18 5 18 6 48 0 48 1 48 1 32 1 0 2 17 2 1 16 0 16 1 16 2 52 7 0 3 32 17 1 18 0 48 0 1 17 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 18 0 52 0 0 2 33 49 0 18 2 48 0 5 1 18 0 52 7 0 1 17 0 51 19 0 0 3 0 0 1 0 0 1 0 2 1 1 17 1 5 16 1 48 0 5 1 14 0 16 0 52 20 0 2 32 4 0 18 6 48 0 17 0 16 0 52 21 0 1 33 5 0 16 0 32 10 0 18 4 18 5 16 0 48 1 48 1 17 1 18 7 1 22 0 48 1 33 16 0 18 1 48 0 17 2 18 2 48 0 5 16 2 32 1 0 2 17 2 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 8 48 0 32 1 0 2 5 18 7 1 23 0 48 1 33 28 0 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 8 48 0 32 4 0 18 8 48 0 32 1 0 2 5 16 2 52 24 0 1 6 33 8 0 5 18 7 1 22 0 48 1 33 16 0 18 1 48 0 17 3 18 2 48 0 5 16 3 32 1 0 2 17 3 16 2 6 34 11 0 5 16 3 6 34 4 0 5 1 25 0 17 4 1 26 0 16 1 16 4 52 7 0 3 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "paren-close" "comma" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 34 5 0 5 18 1 48 0 33 28 0 18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 45 0 18 3 48 0 17 1 18 0 48 0 1 2 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 4 16 0 16 1 52 4 0 1 52 3 0 2 49 1 50)} "list") :bytecode (18 0 48 0 5 51 0 0 0 1 0 2 0 0 0 3 1 0 17 0 5 16 0 52 1 0 0 49 1 50)} {:upvalue-count 3 :arity 0 :constants ("get" "value" "=" "paren-open" "cons" call "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 18 1 48 0 1 3 0 52 2 0 2 33 24 0 18 2 48 0 17 1 1 5 0 16 0 16 1 52 4 0 2 52 4 0 2 32 9 0 1 5 0 16 0 52 6 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("=" "class" "from" "for" "list" take! "attr" "get" "value" "op" "with") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 74 0 18 1 48 0 17 0 18 2 48 0 5 16 0 17 0 18 3 1 2 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 1 18 3 1 3 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 2 1 5 0 1 1 0 16 0 16 1 16 2 52 4 0 5 32 163 0 18 0 48 0 1 6 0 52 0 0 2 33 148 0 18 2 48 0 1 8 0 52 7 0 2 17 0 18 0 48 0 1 9 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 0 0 52 0 0 2 33 19 0 18 2 48 0 5 18 2 48 0 1 8 0 52 7 0 2 32 1 0 2 17 1 18 3 1 10 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 2 18 3 1 2 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 3 18 3 1 3 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 4 1 5 0 1 6 0 16 0 16 3 16 4 16 1 16 2 52 4 0 7 32 1 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("to" "list" go) :bytecode (18 0 1 0 0 48 1 5 1 2 0 18 1 48 0 52 1 0 2 50)} {:upvalue-count 6 :arity 1 :constants ("=" "op" "+" "-" "*" "/" "%" "keyword" "mod" + - * / "make-symbol" "nil?" "list") :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 6 33 66 0 5 16 2 1 2 0 52 0 0 2 6 34 52 0 5 16 2 1 3 0 52 0 0 2 6 34 38 0 5 16 2 1 4 0 52 0 0 2 6 34 24 0 5 16 2 1 5 0 52 0 0 2 6 34 10 0 5 16 2 1 6 0 52 0 0 2 6 34 24 0 5 16 1 1 7 0 52 0 0 2 6 33 10 0 5 16 2 1 8 0 52 0 0 2 33 161 0 18 2 48 0 5 16 2 1 2 0 52 0 0 2 33 6 0 1 9 0 32 91 0 16 2 1 3 0 52 0 0 2 33 6 0 1 10 0 32 73 0 16 2 1 4 0 52 0 0 2 33 6 0 1 11 0 32 55 0 16 2 1 5 0 52 0 0 2 33 6 0 1 12 0 32 37 0 16 2 1 6 0 52 0 0 2 6 34 10 0 5 16 2 1 8 0 52 0 0 2 33 10 0 1 6 0 52 13 0 1 32 1 0 2 17 3 18 3 48 0 17 4 16 4 52 14 0 1 33 5 0 16 4 32 6 0 18 4 16 4 48 1 17 4 18 5 16 3 16 0 16 4 52 15 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 8 :arity 0 :constants ("=" "style" "of" "list" style me "attr" attr "class" has-class? "selector" "in" in? query "ident" "keyword" "make-symbol" "." "result" it "first" first "last" last "closest" closest "next" next "previous" previous ref) :bytecode (18 0 48 0 17 0 18 1 48 0 17 1 16 0 1 1 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 2 0 48 1 33 16 0 1 4 0 16 1 18 4 48 0 52 3 0 3 32 16 0 1 4 0 16 1 1 5 0 52 3 0 1 52 3 0 3 32 139 1 16 0 1 6 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 2 0 48 1 33 16 0 1 7 0 16 1 18 4 48 0 52 3 0 3 32 16 0 1 7 0 16 1 1 5 0 52 3 0 1 52 3 0 3 32 77 1 16 0 1 8 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 2 0 48 1 33 16 0 1 9 0 18 4 48 0 16 1 52 3 0 3 32 16 0 1 9 0 1 5 0 52 3 0 1 16 1 52 3 0 3 32 15 1 16 0 1 10 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 11 0 48 1 33 23 0 1 12 0 1 13 0 16 1 52 3 0 2 18 4 48 0 52 3 0 3 32 9 0 1 13 0 16 1 52 3 0 2 32 209 0 16 0 1 14 0 52 0 0 2 6 34 10 0 5 16 0 1 15 0 52 0 0 2 33 179 0 18 2 48 0 5 18 3 1 2 0 48 1 33 20 0 1 17 0 52 16 0 1 18 4 48 0 16 1 52 3 0 3 32 141 0 16 1 1 18 0 52 0 0 2 33 10 0 1 19 0 52 3 0 1 32 119 0 16 1 1 20 0 52 0 0 2 33 10 0 18 5 1 21 0 49 1 32 97 0 16 1 1 22 0 52 0 0 2 33 10 0 18 5 1 23 0 49 1 32 75 0 16 1 1 24 0 52 0 0 2 33 10 0 18 6 1 25 0 49 1 32 53 0 16 1 1 26 0 52 0 0 2 33 10 0 18 6 1 27 0 49 1 32 31 0 16 1 1 28 0 52 0 0 2 33 10 0 18 6 1 29 0 49 1 32 9 0 1 30 0 16 1 52 3 0 2 32 4 0 18 7 49 0 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "bracket-close" "comma" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 34 5 0 5 18 1 48 0 33 28 0 18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 45 0 18 3 48 0 17 1 18 0 48 0 1 2 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 4 16 0 16 1 52 4 0 1 52 3 0 2 49 1 50)} "cons" array "list") :bytecode (51 0 0 0 0 0 1 0 2 0 3 1 0 17 0 5 1 2 0 16 0 52 3 0 0 48 1 52 1 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("=" "keyword" "end" "then" "else" "list" return) :bytecode (18 0 48 0 6 34 60 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 44 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 28 0 5 18 2 48 0 1 3 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 4 0 52 0 0 2 33 11 0 1 6 0 2 52 5 0 2 32 11 0 1 6 0 18 3 48 0 52 5 0 2 50)} {:upvalue-count 1 :arity 0 :constants ("list" throw) :bytecode (1 1 0 18 0 48 0 52 0 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("to" "list" append!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 50)} {:upvalue-count 3 :arity 0 :constants ("then" "end" "list" tell) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 2 48 0 17 1 18 1 1 1 0 48 1 5 1 3 0 16 0 16 1 52 2 0 3 50)} {:upvalue-count 6 :arity 0 :constants ("in" "index" "end" "list" for) :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 1 0 0 48 1 5 18 3 48 0 17 1 18 4 1 1 0 48 1 33 16 0 18 0 48 0 17 2 18 1 48 0 5 16 2 32 1 0 2 17 2 18 5 48 0 17 3 18 4 1 2 0 48 1 5 16 2 33 21 0 1 4 0 16 0 16 1 16 3 1 1 0 16 2 52 3 0 6 32 13 0 1 4 0 16 0 16 1 16 3 52 3 0 4 50)} {:upvalue-count 3 :arity 0 :constants ("=" "a" "called" "list" make) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 1 48 0 32 1 0 2 5 18 0 48 0 17 0 18 1 48 0 5 18 2 1 2 0 48 1 33 16 0 18 0 48 0 17 1 18 1 48 0 5 16 1 32 1 0 2 17 1 16 1 33 14 0 1 4 0 16 0 16 1 52 3 0 3 32 9 0 1 4 0 16 0 52 3 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("=" "paren-open" "cons" install "list") :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 48 0 1 1 0 52 0 0 2 33 24 0 18 3 48 0 17 1 1 3 0 16 0 16 1 52 2 0 2 52 2 0 2 32 9 0 1 3 0 16 0 52 4 0 2 50)} {:upvalue-count 1 :arity 0 :constants ("list" measure "nil?" me) :bytecode (18 0 48 0 17 0 1 1 0 16 0 52 2 0 1 33 10 0 1 3 0 52 0 0 1 32 2 0 16 0 52 0 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("=" "keyword" "then" "end" "list" me "top" "bottom" "left" "right" scroll!) :bytecode (18 0 48 0 6 34 44 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 28 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 3 0 52 0 0 2 33 10 0 1 5 0 52 4 0 1 32 4 0 18 3 48 0 17 0 18 4 1 6 0 48 1 33 6 0 1 6 0 32 51 0 18 4 1 7 0 48 1 33 6 0 1 7 0 32 35 0 18 4 1 8 0 48 1 33 6 0 1 8 0 32 19 0 18 4 1 9 0 48 1 33 6 0 1 9 0 32 3 0 1 6 0 17 1 1 10 0 16 0 16 1 52 4 0 3 50)} {:upvalue-count 4 :arity 0 :constants ("=" "keyword" "then" "end" "list" me select!) :bytecode (18 0 48 0 6 34 44 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 28 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 3 0 52 0 0 2 33 10 0 1 5 0 52 4 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 4 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("=" "keyword" "then" "end" "list" me reset!) :bytecode (18 0 48 0 6 34 44 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 28 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 3 0 52 0 0 2 33 10 0 1 5 0 52 4 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 4 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("to" "list" default!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 50)} {:upvalue-count 1 :arity 0 :constants ("the" "event" "default" "list" halt!) :bytecode (18 0 1 0 0 48 1 6 33 20 0 5 18 0 1 1 0 48 1 6 34 8 0 5 18 0 1 2 0 48 1 17 0 1 4 0 16 0 33 6 0 1 1 0 32 3 0 1 2 0 52 3 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("=" "paren-open" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 1 49 0 32 4 0 52 2 0 0 50)} {:upvalue-count 4 :arity 0 :constants ("list" me "=" "keyword" "then" "end" focus!) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 60 0 18 1 48 0 1 3 0 52 2 0 2 6 33 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 0 0 2 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "keyword" "end" "nil?" "append" "list") :bytecode (18 0 48 0 6 34 28 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 2 48 0 1 2 0 52 0 0 2 33 5 0 16 0 32 36 0 18 3 48 0 17 1 16 1 52 3 0 1 33 5 0 16 0 32 16 0 18 4 16 0 16 1 52 5 0 1 52 4 0 2 49 1 50)} "list") :bytecode (51 0 0 0 0 0 1 0 2 0 3 1 0 17 0 5 16 0 52 1 0 0 49 1 50)} {:upvalue-count 5 :arity 0 :constants ("end" "list" def) :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 48 0 17 1 18 3 48 0 17 2 18 4 1 0 0 48 1 5 1 2 0 16 0 16 1 16 2 52 1 0 4 50)} {:upvalue-count 5 :arity 0 :constants ("end" "list" behavior) :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 48 0 17 1 18 3 48 0 17 2 18 4 1 0 0 48 1 5 1 2 0 16 0 16 1 16 2 52 1 0 4 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "local" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 38 0 18 1 48 0 17 1 18 2 48 0 5 18 3 48 0 17 2 18 4 16 0 16 1 16 2 52 3 0 2 52 2 0 2 49 1 32 2 0 16 0 50)} "list") :bytecode (51 0 0 0 0 0 1 0 2 0 3 1 0 17 0 5 16 0 52 1 0 0 49 1 50)} {:upvalue-count 6 :arity 0 :constants ("=" "component" "paren-open" "paren-close" "into" "before" "after" "list" render) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 16 0 18 1 48 0 17 0 18 2 48 0 5 16 0 32 66 0 18 0 48 0 1 2 0 52 0 0 2 33 39 0 18 2 48 0 5 18 3 48 0 17 0 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 13 0 18 1 48 0 17 0 18 2 48 0 5 16 0 17 0 18 4 48 0 17 1 18 5 1 4 0 48 1 33 6 0 1 4 0 32 33 0 18 5 1 5 0 48 1 33 6 0 1 5 0 32 17 0 18 5 1 6 0 48 1 33 6 0 1 6 0 32 1 0 2 17 2 16 2 33 7 0 18 3 48 0 32 1 0 2 17 3 16 2 33 18 0 1 8 0 16 0 16 1 16 2 16 3 52 7 0 5 32 11 0 1 8 0 16 0 16 1 52 7 0 3 50)} {:upvalue-count 5 :arity 0 :constants ("get" "pos" {:upvalue-count 6 :arity 1 :constants ("=" "paren-open" "+" 1 "paren-close" 0 "get" "pos" "-") :bytecode (18 0 48 0 33 5 0 18 1 32 123 0 18 2 48 0 1 1 0 52 0 0 2 33 21 0 18 3 48 0 5 18 4 16 0 1 3 0 52 2 0 2 49 1 32 88 0 18 2 48 0 1 4 0 52 0 0 2 33 63 0 16 0 1 5 0 52 0 0 2 33 30 0 18 5 48 0 1 7 0 52 6 0 2 1 3 0 52 2 0 2 17 1 18 3 48 0 5 16 1 32 18 0 18 3 48 0 5 18 4 16 0 1 3 0 52 8 0 2 49 1 32 11 0 18 3 48 0 5 18 4 16 0 49 1 50)} 0 "substring") :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 18 1 48 0 5 51 2 0 0 2 1 0 0 3 0 1 1 1 0 0 17 1 5 16 1 1 3 0 48 1 17 2 18 4 16 0 16 2 52 4 0 3 50)} {:upvalue-count 4 :arity 0 :constants ("list" sym "me" "=" "keyword" "then" "end" empty-target) :bytecode (18 0 48 0 33 13 0 1 1 0 1 2 0 52 0 0 2 32 63 0 18 1 48 0 1 4 0 52 3 0 2 6 33 28 0 5 18 2 48 0 1 5 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 6 0 52 3 0 2 33 13 0 1 1 0 1 2 0 52 0 0 2 32 4 0 18 3 48 0 17 0 1 7 0 16 0 52 0 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("with" "list" swap!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 50)} {:upvalue-count 4 :arity 0 :constants ("list" me "=" "keyword" "then" "end" open-element) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 60 0 18 1 48 0 1 3 0 52 2 0 2 6 33 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 0 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("list" me "=" "keyword" "then" "end" close-element) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 60 0 18 1 48 0 1 3 0 52 2 0 2 6 33 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 0 0 2 50)} {:upvalue-count 43 :arity 0 :constants ("=" "keyword" "catch" "finally" "end" "else" "otherwise" "add" "remove" "toggle" "set" "put" "if" "wait" "send" "trigger" "log" "increment" "decrement" "hide" "show" "transition" "repeat" "fetch" "call" "take" "settle" "list" settle "go" "return" "throw" "append" "tell" "for" "make" "install" "measure" "render" "scroll" "select" "reset" "default" "halt" "focus" "empty" "clear" "swap" "open" "close") :bytecode (18 0 48 0 17 0 18 1 48 0 17 1 16 0 1 1 0 52 0 0 2 6 33 66 0 5 16 1 1 2 0 52 0 0 2 6 34 52 0 5 16 1 1 3 0 52 0 0 2 6 34 38 0 5 16 1 1 4 0 52 0 0 2 6 34 24 0 5 16 1 1 5 0 52 0 0 2 6 34 10 0 5 16 1 1 6 0 52 0 0 2 33 4 0 2 32 29 6 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 7 0 52 0 0 2 33 12 0 18 2 48 0 5 18 3 49 0 32 247 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 8 0 52 0 0 2 33 12 0 18 2 48 0 5 18 4 49 0 32 209 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 9 0 52 0 0 2 33 12 0 18 2 48 0 5 18 5 49 0 32 171 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 10 0 52 0 0 2 33 12 0 18 2 48 0 5 18 6 49 0 32 133 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 11 0 52 0 0 2 33 12 0 18 2 48 0 5 18 7 49 0 32 95 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 12 0 52 0 0 2 33 12 0 18 2 48 0 5 18 8 49 0 32 57 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 13 0 52 0 0 2 33 12 0 18 2 48 0 5 18 9 49 0 32 19 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 14 0 52 0 0 2 33 12 0 18 2 48 0 5 18 10 49 0 32 237 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 15 0 52 0 0 2 33 12 0 18 2 48 0 5 18 11 49 0 32 199 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 16 0 52 0 0 2 33 12 0 18 2 48 0 5 18 12 49 0 32 161 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 17 0 52 0 0 2 33 12 0 18 2 48 0 5 18 13 49 0 32 123 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 18 0 52 0 0 2 33 12 0 18 2 48 0 5 18 14 49 0 32 85 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 19 0 52 0 0 2 33 12 0 18 2 48 0 5 18 15 49 0 32 47 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 20 0 52 0 0 2 33 12 0 18 2 48 0 5 18 16 49 0 32 9 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 21 0 52 0 0 2 33 12 0 18 2 48 0 5 18 17 49 0 32 227 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 22 0 52 0 0 2 33 12 0 18 2 48 0 5 18 18 49 0 32 189 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 23 0 52 0 0 2 33 12 0 18 2 48 0 5 18 19 49 0 32 151 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 24 0 52 0 0 2 33 12 0 18 2 48 0 5 18 20 49 0 32 113 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 25 0 52 0 0 2 33 12 0 18 2 48 0 5 18 21 49 0 32 75 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 26 0 52 0 0 2 33 15 0 18 2 48 0 5 1 28 0 52 27 0 1 32 34 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 29 0 52 0 0 2 33 12 0 18 2 48 0 5 18 22 49 0 32 252 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 30 0 52 0 0 2 33 12 0 18 2 48 0 5 18 23 49 0 32 214 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 31 0 52 0 0 2 33 12 0 18 2 48 0 5 18 24 49 0 32 176 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 32 0 52 0 0 2 33 12 0 18 2 48 0 5 18 25 49 0 32 138 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 33 0 52 0 0 2 33 12 0 18 2 48 0 5 18 26 49 0 32 100 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 34 0 52 0 0 2 33 12 0 18 2 48 0 5 18 27 49 0 32 62 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 35 0 52 0 0 2 33 12 0 18 2 48 0 5 18 28 49 0 32 24 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 36 0 52 0 0 2 33 12 0 18 2 48 0 5 18 29 49 0 32 242 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 37 0 52 0 0 2 33 12 0 18 2 48 0 5 18 30 49 0 32 204 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 38 0 52 0 0 2 33 12 0 18 2 48 0 5 18 31 49 0 32 166 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 39 0 52 0 0 2 33 12 0 18 2 48 0 5 18 32 49 0 32 128 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 40 0 52 0 0 2 33 12 0 18 2 48 0 5 18 33 49 0 32 90 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 41 0 52 0 0 2 33 12 0 18 2 48 0 5 18 34 49 0 32 52 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 42 0 52 0 0 2 33 12 0 18 2 48 0 5 18 35 49 0 32 14 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 43 0 52 0 0 2 33 12 0 18 2 48 0 5 18 36 49 0 32 232 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 44 0 52 0 0 2 33 12 0 18 2 48 0 5 18 37 49 0 32 194 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 45 0 52 0 0 2 33 12 0 18 2 48 0 5 18 38 49 0 32 156 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 46 0 52 0 0 2 33 12 0 18 2 48 0 5 18 38 49 0 32 118 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 47 0 52 0 0 2 33 12 0 18 2 48 0 5 18 39 49 0 32 80 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 48 0 52 0 0 2 33 12 0 18 2 48 0 5 18 40 49 0 32 42 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 49 0 52 0 0 2 33 12 0 18 2 48 0 5 18 41 49 0 32 4 0 18 42 49 0 50)} {:upvalue-count 5 :arity 2 :constants ({:upvalue-count 0 :arity 1 :constants ("=" "add" "remove" "toggle" "set" "put" "if" "wait" "send" "trigger" "log" "increment" "decrement" "hide" "show" "transition" "repeat" "fetch" "call" "take" "settle" "go" "return" "throw" "append" "tell" "for" "make" "install" "measure" "render" "halt" "default" "scroll" "select" "reset" "focus" "empty" "clear" "swap" "open" "close") :bytecode (16 0 1 1 0 52 0 0 2 6 34 44 2 5 16 0 1 2 0 52 0 0 2 6 34 30 2 5 16 0 1 3 0 52 0 0 2 6 34 16 2 5 16 0 1 4 0 52 0 0 2 6 34 2 2 5 16 0 1 5 0 52 0 0 2 6 34 244 1 5 16 0 1 6 0 52 0 0 2 6 34 230 1 5 16 0 1 7 0 52 0 0 2 6 34 216 1 5 16 0 1 8 0 52 0 0 2 6 34 202 1 5 16 0 1 9 0 52 0 0 2 6 34 188 1 5 16 0 1 10 0 52 0 0 2 6 34 174 1 5 16 0 1 11 0 52 0 0 2 6 34 160 1 5 16 0 1 12 0 52 0 0 2 6 34 146 1 5 16 0 1 13 0 52 0 0 2 6 34 132 1 5 16 0 1 14 0 52 0 0 2 6 34 118 1 5 16 0 1 15 0 52 0 0 2 6 34 104 1 5 16 0 1 16 0 52 0 0 2 6 34 90 1 5 16 0 1 17 0 52 0 0 2 6 34 76 1 5 16 0 1 18 0 52 0 0 2 6 34 62 1 5 16 0 1 19 0 52 0 0 2 6 34 48 1 5 16 0 1 20 0 52 0 0 2 6 34 34 1 5 16 0 1 21 0 52 0 0 2 6 34 20 1 5 16 0 1 22 0 52 0 0 2 6 34 6 1 5 16 0 1 23 0 52 0 0 2 6 34 248 0 5 16 0 1 24 0 52 0 0 2 6 34 234 0 5 16 0 1 25 0 52 0 0 2 6 34 220 0 5 16 0 1 26 0 52 0 0 2 6 34 206 0 5 16 0 1 27 0 52 0 0 2 6 34 192 0 5 16 0 1 28 0 52 0 0 2 6 34 178 0 5 16 0 1 29 0 52 0 0 2 6 34 164 0 5 16 0 1 30 0 52 0 0 2 6 34 150 0 5 16 0 1 31 0 52 0 0 2 6 34 136 0 5 16 0 1 32 0 52 0 0 2 6 34 122 0 5 16 0 1 33 0 52 0 0 2 6 34 108 0 5 16 0 1 34 0 52 0 0 2 6 34 94 0 5 16 0 1 35 0 52 0 0 2 6 34 80 0 5 16 0 1 36 0 52 0 0 2 6 34 66 0 5 16 0 1 37 0 52 0 0 2 6 34 52 0 5 16 0 1 38 0 52 0 0 2 6 34 38 0 5 16 0 1 39 0 52 0 0 2 6 34 24 0 5 16 0 1 40 0 52 0 0 2 6 34 10 0 5 16 0 1 41 0 52 0 0 2 50)} {:upvalue-count 7 :arity 1 :constants ("nil?" "append" "list" "then" __then__ "not" "=" "keyword") :bytecode (18 0 48 0 17 1 16 1 52 0 0 1 33 5 0 16 0 32 95 0 16 0 16 1 52 2 0 1 52 1 0 2 17 2 18 1 1 3 0 48 1 33 20 0 18 2 16 2 1 4 0 52 2 0 1 52 1 0 2 49 1 32 51 0 18 3 48 0 52 5 0 1 6 33 25 0 5 18 4 48 0 1 7 0 52 6 0 2 6 33 9 0 5 18 5 18 6 48 0 48 1 33 9 0 18 2 16 2 49 1 32 2 0 16 2 50)} "list" "=" "len" 0 1 "first" "cons" do "filter" {:upvalue-count 0 :arity 1 :constants ("not" "=" __then__) :bytecode (16 0 1 2 0 52 1 0 2 52 0 0 1 50)}) :bytecode (51 0 0 17 0 5 51 1 0 0 0 0 1 1 1 0 2 0 3 1 0 0 4 17 1 5 16 1 52 2 0 0 48 1 17 2 16 2 52 4 0 1 1 5 0 52 3 0 2 33 4 0 2 32 41 0 16 2 52 4 0 1 1 6 0 52 3 0 2 33 9 0 16 2 52 7 0 1 32 16 0 1 9 0 51 11 0 16 2 52 10 0 2 52 8 0 2 50)} {:upvalue-count 7 :arity 0 :constants ("every" "=" "bracket-open" "bracket-close" "from" "catch" "list" "finally" "end" on "append" "filter") :bytecode (18 0 1 0 0 48 1 17 0 18 1 48 0 17 1 18 2 48 0 1 2 0 52 1 0 2 33 39 0 18 3 48 0 5 18 4 48 0 17 2 18 2 48 0 1 3 0 52 1 0 2 33 7 0 18 3 48 0 32 1 0 2 5 16 2 32 1 0 2 17 2 18 0 1 4 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 3 18 5 48 0 17 4 18 0 1 5 0 48 1 33 32 0 18 6 48 0 17 5 18 3 48 0 5 16 5 17 5 18 5 48 0 17 6 16 5 16 6 52 6 0 2 32 1 0 2 17 5 18 0 1 7 0 48 1 33 7 0 18 5 48 0 32 1 0 2 17 6 18 0 1 8 0 48 1 5 1 9 0 16 1 52 6 0 2 17 7 16 0 33 17 0 16 7 1 0 0 3 52 6 0 2 52 10 0 2 32 2 0 16 7 17 8 16 2 33 18 0 16 8 1 11 0 16 2 52 6 0 2 52 10 0 2 32 2 0 16 8 17 9 16 3 33 18 0 16 9 1 4 0 16 3 52 6 0 2 52 10 0 2 32 2 0 16 9 17 10 16 5 33 18 0 16 10 1 5 0 16 5 52 6 0 2 52 10 0 2 32 2 0 16 10 17 11 16 6 33 18 0 16 11 1 7 0 16 6 52 6 0 2 52 10 0 2 32 2 0 16 11 17 12 16 12 16 4 52 6 0 1 52 10 0 2 17 13 16 13 50)} {:upvalue-count 2 :arity 0 :constants ("end" "list" init) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 1 2 0 16 0 52 1 0 2 50)} {:upvalue-count 7 :arity 0 :constants ("=" "on" "init" "def" "behavior") :bytecode (18 0 48 0 17 0 16 0 1 1 0 52 0 0 2 33 12 0 18 1 48 0 5 18 2 49 0 32 76 0 16 0 1 2 0 52 0 0 2 33 12 0 18 1 48 0 5 18 3 49 0 32 52 0 16 0 1 3 0 52 0 0 2 33 12 0 18 1 48 0 5 18 4 49 0 32 28 0 16 0 1 4 0 52 0 0 2 33 12 0 18 1 48 0 5 18 5 49 0 32 4 0 18 6 49 0 50)} {:upvalue-count 3 :arity 1 :constants ("nil?" "append" "list") :bytecode (18 0 48 0 33 5 0 16 0 32 36 0 18 1 48 0 17 1 16 1 52 0 0 1 33 5 0 16 0 32 16 0 18 2 16 0 16 1 52 2 0 1 52 1 0 2 49 1 50)} "list" "=" 1 "first" "cons" do) :bytecode (1 0 0 17 2 16 0 52 1 0 1 17 3 51 2 0 1 2 1 3 1 0 17 4 5 51 3 0 1 4 17 5 5 51 4 0 1 4 17 6 5 51 5 0 1 0 1 2 17 7 5 51 6 0 1 2 1 3 1 5 17 8 5 51 7 0 1 5 1 6 1 7 17 9 5 51 8 0 1 9 1 2 17 10 5 51 9 0 17 11 5 51 10 0 1 5 1 6 1 7 1 13 17 12 5 51 11 0 1 5 1 8 1 6 1 7 1 13 1 42 17 13 5 51 12 0 1 5 1 6 1 7 17 14 5 51 13 0 1 5 1 6 1 7 1 9 1 21 17 15 5 51 14 0 1 5 1 6 1 7 1 11 1 21 1 69 1 47 1 12 1 14 1 15 1 8 1 2 1 0 1 48 1 16 1 9 17 16 5 51 15 0 1 5 1 6 1 7 1 12 1 13 1 42 1 21 1 17 17 17 5 51 16 0 1 5 1 6 1 7 1 21 1 9 1 16 1 8 17 18 5 51 17 0 1 9 1 18 1 46 1 17 1 16 1 19 17 19 5 51 18 0 1 9 1 19 1 18 1 46 1 17 1 16 1 20 17 20 5 51 19 0 1 16 1 5 1 6 1 7 1 17 1 46 1 18 1 19 1 20 17 21 5 51 20 0 1 9 1 21 17 22 5 51 21 0 1 5 1 7 1 22 1 9 1 21 17 23 5 51 22 0 1 5 1 7 1 9 1 21 1 6 17 24 5 51 23 0 1 9 1 5 1 6 1 7 1 10 1 22 1 16 1 21 1 47 17 25 5 51 24 0 1 21 1 10 17 26 5 51 25 0 1 21 1 9 1 10 1 2 17 27 5 51 26 0 1 21 1 9 1 75 17 28 5 51 27 0 1 9 1 6 1 7 1 21 1 5 1 11 17 29 5 51 28 0 1 7 1 5 1 8 1 21 17 30 5 51 29 0 1 7 1 8 1 5 1 6 17 31 5 51 30 0 1 31 1 5 1 30 1 22 17 32 5 51 31 0 1 7 1 22 17 33 5 51 32 0 1 21 17 34 5 51 33 0 1 21 1 9 1 22 17 35 5 51 34 0 1 21 1 9 1 22 17 36 5 51 35 0 1 8 1 5 1 6 1 21 1 9 1 7 17 37 5 51 36 0 1 8 1 5 1 6 1 21 1 9 1 7 17 38 5 51 37 0 1 5 1 6 1 7 1 16 1 9 1 10 1 21 1 8 17 39 5 51 38 0 1 5 1 6 1 7 1 53 1 21 1 75 1 9 17 40 5 51 39 0 1 5 1 6 1 7 1 8 1 46 1 17 1 16 1 9 1 21 17 41 5 51 40 0 1 7 1 5 1 8 1 21 17 42 5 51 41 0 1 7 1 5 1 42 17 43 5 51 42 0 1 5 1 6 1 7 1 9 1 21 17 44 5 51 43 0 1 9 1 21 17 45 5 51 44 0 1 5 1 6 1 7 1 16 1 17 1 46 17 46 5 51 45 0 1 5 1 6 1 7 1 9 1 21 1 15 1 14 1 16 17 47 5 51 46 0 1 5 1 8 1 7 1 21 17 48 5 51 47 0 1 8 1 5 1 6 1 21 17 49 5 51 48 0 1 21 17 50 5 51 49 0 1 21 1 10 17 51 5 51 50 0 1 21 1 9 1 75 17 52 5 51 51 0 1 6 1 7 1 10 1 21 1 9 1 75 17 53 5 51 52 0 1 6 1 7 1 9 17 54 5 51 53 0 1 6 1 7 1 5 1 42 17 55 5 51 54 0 1 21 17 56 5 51 55 0 1 8 1 5 1 6 1 21 1 9 17 57 5 51 56 0 1 8 1 5 1 6 1 21 17 58 5 51 57 0 1 8 1 5 1 6 1 21 17 59 5 51 58 0 1 21 1 10 17 60 5 51 59 0 1 9 17 61 5 51 60 0 1 5 1 42 17 62 5 51 61 0 1 8 1 5 1 6 1 21 17 63 5 51 62 0 1 8 1 5 1 6 1 78 17 64 5 51 63 0 1 6 1 7 1 62 1 75 1 9 17 65 5 51 64 0 1 6 1 7 1 62 1 64 1 9 17 66 5 51 65 0 1 5 1 6 1 7 1 21 17 67 5 51 66 0 1 5 1 6 1 7 1 21 1 67 1 9 17 68 5 51 67 0 1 4 1 7 1 8 1 5 1 1 17 69 5 51 68 0 1 8 1 5 1 6 1 21 17 70 5 51 69 0 1 21 1 9 17 71 5 51 70 0 1 8 1 5 1 6 1 21 17 72 5 51 71 0 1 8 1 5 1 6 1 21 17 73 5 51 72 0 1 5 1 6 1 7 1 23 1 24 1 25 1 26 1 27 1 28 1 29 1 32 1 33 1 34 1 35 1 36 1 37 1 38 1 39 1 40 1 41 1 43 1 44 1 45 1 49 1 50 1 51 1 52 1 53 1 54 1 55 1 56 1 68 1 57 1 58 1 59 1 60 1 61 1 63 1 70 1 71 1 72 1 73 1 21 17 74 5 51 73 0 1 74 1 9 1 8 1 5 1 6 17 75 5 51 74 0 1 9 1 31 1 5 1 7 1 21 1 75 1 6 17 76 5 51 75 0 1 75 1 9 17 77 5 51 76 0 1 6 1 7 1 76 1 77 1 65 1 66 1 75 17 78 5 51 77 0 1 8 1 78 1 79 17 79 5 16 79 52 78 0 0 48 1 17 80 16 80 52 1 0 1 1 80 0 52 79 0 2 33 9 0 16 80 52 81 0 1 32 9 0 1 83 0 16 80 52 82 0 2 50)} "hs-compile" {:upvalue-count 0 :arity 1 :constants ("hs-parse" "hs-tokenize") :bytecode (20 0 0 20 1 0 16 0 48 1 16 0 49 2 50)}) :bytecode (51 1 0 128 0 0 5 51 3 0 128 2 0 50))) + :constants ("hs-parse" {:upvalue-count 0 :arity 2 :constants (0 "len" {:upvalue-count 3 :arity 0 :constants ("<" "nth") :bytecode (18 0 18 1 52 0 0 2 33 11 0 18 2 18 0 52 1 0 2 32 1 0 2 50)} {:upvalue-count 1 :arity 0 :constants ("get" "type" "eof") :bytecode (18 0 48 0 17 0 16 0 33 12 0 16 0 1 1 0 52 0 0 2 32 3 0 1 2 0 50)} {:upvalue-count 1 :arity 0 :constants ("get" "value") :bytecode (18 0 48 0 17 0 16 0 33 12 0 16 0 1 1 0 52 0 0 2 32 1 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("nth" "+" 1) :bytecode (18 0 18 1 52 0 0 2 17 0 18 1 1 2 0 52 1 0 2 19 1 5 16 0 50)} {:upvalue-count 3 :arity 0 :constants (">=" "=" "eof") :bytecode (18 0 18 1 52 0 0 2 6 34 12 0 5 18 2 48 0 1 2 0 52 1 0 2 50)} {:upvalue-count 3 :arity 1 :constants ("=" "keyword") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 11 0 5 18 1 48 0 16 0 52 0 0 2 33 9 0 18 2 48 0 5 3 32 1 0 2 50)} {:upvalue-count 2 :arity 1 :constants ("error" "str" "Expected '" "' at position ") :bytecode (18 0 16 0 48 1 33 4 0 3 32 18 0 1 2 0 16 0 1 3 0 18 1 52 1 0 4 52 0 0 1 50)} {:upvalue-count 0 :arity 1 :constants ("len" ">=" 3 "=" "substring" "-" 2 "ms" "parse-number" 0 "nth" 1 "s" "*" 1000) :bytecode (16 0 52 0 0 1 17 1 16 1 1 2 0 52 1 0 2 6 33 25 0 5 16 0 16 1 1 6 0 52 5 0 2 16 1 52 4 0 3 1 7 0 52 3 0 2 33 25 0 16 0 1 9 0 16 1 1 6 0 52 5 0 2 52 4 0 3 52 8 0 1 32 77 0 16 1 1 6 0 52 1 0 2 6 33 23 0 5 16 0 16 1 1 11 0 52 5 0 2 52 10 0 2 1 12 0 52 3 0 2 33 32 0 1 14 0 16 0 1 9 0 16 1 1 11 0 52 5 0 2 52 4 0 3 52 8 0 1 52 13 0 2 32 6 0 16 0 52 8 0 1 50)} {:upvalue-count 4 :arity 1 :constants ("=" "ident" "keyword" "list" . "attr" attr "class" "get" "value" "style" style) :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 6 34 10 0 5 16 1 1 2 0 52 0 0 2 33 23 0 18 2 48 0 5 18 3 1 4 0 16 0 16 2 52 3 0 3 49 1 32 107 0 16 1 1 5 0 52 0 0 2 33 19 0 18 2 48 0 5 1 6 0 16 2 16 0 52 3 0 3 32 76 0 16 1 1 7 0 52 0 0 2 33 31 0 18 2 48 0 1 9 0 52 8 0 2 17 3 18 3 1 4 0 16 0 16 3 52 3 0 3 49 1 32 33 0 16 1 1 10 0 52 0 0 2 33 19 0 18 2 48 0 5 1 11 0 16 2 16 0 52 3 0 3 32 2 0 16 0 50)} {:upvalue-count 6 :arity 1 :constants ("=" "class" "not" "list" "make-symbol" "." "paren-open" method-call) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 9 0 5 18 1 48 0 52 2 0 1 33 33 0 18 2 48 0 17 1 18 3 48 0 5 18 4 1 5 0 52 4 0 1 16 0 16 1 52 3 0 3 49 1 32 40 0 18 0 48 0 1 6 0 52 0 0 2 33 24 0 18 5 48 0 17 1 18 4 1 7 0 16 0 16 1 52 3 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 3 :arity 1 :constants ("=" "selector" "list" me "class" "str" "." "id" "#" "*") :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 33 23 0 18 2 48 0 5 16 0 16 2 1 3 0 52 2 0 1 52 2 0 3 32 100 0 16 1 1 4 0 52 0 0 2 33 30 0 18 2 48 0 5 16 0 1 6 0 16 2 52 5 0 2 1 3 0 52 2 0 1 52 2 0 3 32 58 0 16 1 1 7 0 52 0 0 2 33 30 0 18 2 48 0 5 16 0 1 8 0 16 2 52 5 0 2 1 3 0 52 2 0 1 52 2 0 3 32 16 0 16 0 1 9 0 1 3 0 52 2 0 1 52 2 0 3 50)} {:upvalue-count 5 :arity 1 :constants ("=" "selector" "class" "str" "." "id" "#" "*" "in" "list") :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 33 10 0 18 2 48 0 5 16 2 32 61 0 16 1 1 2 0 52 0 0 2 33 17 0 18 2 48 0 5 1 4 0 16 2 52 3 0 2 32 32 0 16 1 1 5 0 52 0 0 2 33 17 0 18 2 48 0 5 1 6 0 16 2 52 3 0 2 32 3 0 1 7 0 17 3 18 3 1 8 0 48 1 33 15 0 16 0 16 3 18 4 48 0 52 9 0 3 32 8 0 16 0 16 3 52 9 0 2 50)} {:upvalue-count 17 :arity 0 :constants ("=" "number" "string" "template" "list" template "keyword" "true" "false" "null" "nil" null-literal "undefined" "beep" "op" "!" beep! "not" not "no" no "eval" "paren-open" sx-eval "the" "me" me "I" "it" "result" it "event" event "target" "make-symbol" "." "detail" "my" "your" "its" "closest" closest "next" next "previous" previous "first" first "last" last "id" query "str" "#" "selector" "attr" attr "style" style "local" local "class" "ident" ref "paren-close" "brace-open" {:upvalue-count 6 :arity 1 :constants ("=" "brace-close" "string" "local" "true" "false" "null" "list" ref "colon" "comma" "cons") :bytecode (18 0 48 0 6 34 12 0 5 18 1 48 0 1 1 0 52 0 0 2 33 28 0 18 1 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 203 0 18 1 48 0 1 2 0 52 0 0 2 33 16 0 18 3 48 0 17 1 18 2 48 0 5 16 1 32 13 0 18 3 48 0 17 1 18 2 48 0 5 16 1 17 1 18 1 48 0 1 3 0 52 0 0 2 33 71 0 18 3 48 0 17 2 18 2 48 0 5 16 2 1 4 0 52 0 0 2 33 4 0 3 32 41 0 16 2 1 5 0 52 0 0 2 33 4 0 4 32 25 0 16 2 1 6 0 52 0 0 2 33 4 0 2 32 9 0 1 8 0 16 2 52 7 0 2 32 30 0 18 1 48 0 1 9 0 52 0 0 2 33 12 0 18 2 48 0 5 18 4 48 0 32 4 0 18 4 48 0 17 2 18 1 48 0 1 10 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 5 16 1 16 2 52 7 0 2 16 0 52 11 0 2 49 1 50)} object-literal "\\" {:upvalue-count 6 :arity 1 :constants ("=" "op" "-" "<" "+" 1 "len" "get" "nth" "value" ">" "ident" "comma" "append") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 76 0 18 2 1 5 0 52 4 0 2 18 3 52 6 0 1 52 3 0 2 6 33 30 0 5 18 3 18 2 1 5 0 52 4 0 2 52 8 0 2 1 9 0 52 7 0 2 1 10 0 52 0 0 2 33 15 0 18 4 48 0 5 18 4 48 0 5 16 0 32 2 0 16 0 32 65 0 18 0 48 0 1 11 0 52 0 0 2 33 49 0 18 1 48 0 17 1 18 4 48 0 5 18 0 48 0 1 12 0 52 0 0 2 33 7 0 18 4 48 0 32 1 0 2 5 18 5 16 0 16 1 52 13 0 2 49 1 32 2 0 16 0 50)} block-literal "bracket-open" "-" - 0 "component" component "some" ">" "len" "+" 1 "get" "nth" "value" "in" "with" some "every" every "type" call) :bytecode (18 0 48 0 17 0 18 1 48 0 17 1 16 0 1 1 0 52 0 0 2 33 14 0 18 2 48 0 5 18 3 16 1 49 1 32 186 7 16 0 1 2 0 52 0 0 2 33 10 0 18 2 48 0 5 16 1 32 164 7 16 0 1 3 0 52 0 0 2 33 17 0 18 2 48 0 5 1 5 0 16 1 52 4 0 2 32 135 7 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 7 0 52 0 0 2 33 9 0 18 2 48 0 5 3 32 100 7 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 8 0 52 0 0 2 33 9 0 18 2 48 0 5 4 32 65 7 16 0 1 6 0 52 0 0 2 6 33 24 0 5 16 1 1 9 0 52 0 0 2 6 34 10 0 5 16 1 1 10 0 52 0 0 2 33 15 0 18 2 48 0 5 1 11 0 52 4 0 1 32 10 7 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 12 0 52 0 0 2 33 15 0 18 2 48 0 5 1 11 0 52 4 0 1 32 225 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 13 0 52 0 0 2 33 58 0 18 2 48 0 5 18 0 48 0 1 14 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 15 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 1 16 0 18 4 48 0 52 4 0 2 32 141 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 17 0 52 0 0 2 33 19 0 18 2 48 0 5 1 18 0 18 4 48 0 52 4 0 2 32 96 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 19 0 52 0 0 2 33 19 0 18 2 48 0 5 1 20 0 18 4 48 0 52 4 0 2 32 51 6 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 21 0 52 0 0 2 33 47 0 18 2 48 0 5 18 0 48 0 1 22 0 52 0 0 2 33 14 0 1 23 0 18 5 48 0 52 4 0 2 32 11 0 1 23 0 18 4 48 0 52 4 0 2 32 234 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 24 0 52 0 0 2 33 12 0 18 2 48 0 5 18 6 49 0 32 196 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 25 0 52 0 0 2 33 15 0 18 2 48 0 5 1 26 0 52 4 0 1 32 155 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 27 0 52 0 0 2 33 15 0 18 2 48 0 5 1 26 0 52 4 0 1 32 114 5 16 0 1 6 0 52 0 0 2 6 33 24 0 5 16 1 1 28 0 52 0 0 2 6 34 10 0 5 16 1 1 29 0 52 0 0 2 33 15 0 18 2 48 0 5 1 30 0 52 4 0 1 32 59 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 31 0 52 0 0 2 33 15 0 18 2 48 0 5 1 32 0 52 4 0 1 32 18 5 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 33 0 52 0 0 2 33 29 0 18 2 48 0 5 1 35 0 52 34 0 1 1 32 0 52 4 0 1 1 33 0 52 4 0 3 32 219 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 36 0 52 0 0 2 33 29 0 18 2 48 0 5 1 35 0 52 34 0 1 1 32 0 52 4 0 1 1 36 0 52 4 0 3 32 164 4 16 0 1 6 0 52 0 0 2 6 33 24 0 5 16 1 1 37 0 52 0 0 2 6 34 10 0 5 16 1 1 38 0 52 0 0 2 33 19 0 18 2 48 0 5 18 7 1 26 0 52 4 0 1 49 1 32 105 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 39 0 52 0 0 2 33 19 0 18 2 48 0 5 18 7 1 30 0 52 4 0 1 49 1 32 60 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 40 0 52 0 0 2 33 15 0 18 2 48 0 5 18 8 1 41 0 49 1 32 19 4 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 42 0 52 0 0 2 33 15 0 18 2 48 0 5 18 8 1 43 0 49 1 32 234 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 44 0 52 0 0 2 33 15 0 18 2 48 0 5 18 8 1 45 0 49 1 32 193 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 46 0 52 0 0 2 33 15 0 18 2 48 0 5 18 9 1 47 0 49 1 32 152 3 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 48 0 52 0 0 2 33 15 0 18 2 48 0 5 18 9 1 49 0 49 1 32 111 3 16 0 1 50 0 52 0 0 2 33 24 0 18 2 48 0 5 1 51 0 1 53 0 16 1 52 52 0 2 52 4 0 2 32 75 3 16 0 1 54 0 52 0 0 2 33 17 0 18 2 48 0 5 1 51 0 16 1 52 4 0 2 32 46 3 16 0 1 55 0 52 0 0 2 33 24 0 18 2 48 0 5 1 56 0 16 1 1 26 0 52 4 0 1 52 4 0 3 32 10 3 16 0 1 57 0 52 0 0 2 33 24 0 18 2 48 0 5 1 58 0 16 1 1 26 0 52 4 0 1 52 4 0 3 32 230 2 16 0 1 59 0 52 0 0 2 33 17 0 18 2 48 0 5 1 60 0 16 1 52 4 0 2 32 201 2 16 0 1 61 0 52 0 0 2 33 24 0 18 2 48 0 5 1 51 0 1 35 0 16 1 52 52 0 2 52 4 0 2 32 165 2 16 0 1 62 0 52 0 0 2 33 17 0 18 2 48 0 5 1 63 0 16 1 52 4 0 2 32 136 2 16 0 1 22 0 52 0 0 2 33 39 0 18 2 48 0 5 18 4 48 0 17 2 18 0 48 0 1 64 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 2 32 85 2 16 0 1 65 0 52 0 0 2 33 41 0 18 2 48 0 5 51 66 0 0 10 0 0 0 2 0 1 0 4 1 2 17 2 5 1 67 0 16 2 52 4 0 0 48 1 52 4 0 2 32 32 2 16 0 1 14 0 52 0 0 2 6 33 10 0 5 16 1 1 68 0 52 0 0 2 33 49 0 18 2 48 0 5 51 69 0 0 0 0 1 0 11 0 12 0 2 1 3 17 3 5 16 3 52 4 0 0 48 1 17 4 1 70 0 16 4 18 4 48 0 52 4 0 3 32 213 1 16 0 1 71 0 52 0 0 2 33 12 0 18 2 48 0 5 18 13 49 0 32 189 1 16 0 1 14 0 52 0 0 2 6 33 10 0 5 16 1 1 72 0 52 0 0 2 33 26 0 18 2 48 0 5 18 14 48 0 17 4 1 73 0 1 74 0 16 4 52 4 0 3 32 137 1 16 0 1 75 0 52 0 0 2 33 17 0 18 2 48 0 5 1 76 0 16 1 52 4 0 2 32 108 1 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 77 0 52 0 0 2 33 149 0 18 2 48 0 5 18 0 48 0 1 62 0 52 0 0 2 6 33 54 0 5 18 12 52 79 0 1 18 11 1 81 0 52 80 0 2 52 78 0 2 6 33 30 0 5 18 12 18 11 1 81 0 52 80 0 2 52 83 0 2 1 84 0 52 82 0 2 1 85 0 52 0 0 2 33 51 0 18 1 48 0 17 4 18 2 48 0 5 18 15 1 85 0 48 1 5 18 4 48 0 17 5 18 15 1 86 0 48 1 5 1 87 0 16 4 16 5 18 4 48 0 52 4 0 4 32 18 0 1 18 0 1 20 0 18 4 48 0 52 4 0 2 52 4 0 2 32 189 0 16 0 1 6 0 52 0 0 2 6 33 10 0 5 16 1 1 88 0 52 0 0 2 33 56 0 18 2 48 0 5 18 1 48 0 17 4 18 2 48 0 5 18 15 1 85 0 48 1 5 18 4 48 0 17 5 18 15 1 86 0 48 1 5 1 89 0 16 4 16 5 18 4 48 0 52 4 0 4 32 107 0 16 0 1 6 0 52 0 0 2 6 33 54 0 5 18 12 52 79 0 1 18 11 1 81 0 52 80 0 2 52 78 0 2 6 33 30 0 5 18 12 18 11 1 81 0 52 80 0 2 52 83 0 2 1 90 0 52 82 0 2 1 22 0 52 0 0 2 33 36 0 18 2 48 0 5 16 1 17 4 18 16 48 0 17 5 1 91 0 1 63 0 16 4 52 4 0 2 16 5 52 4 0 3 32 1 0 2 50)} {:upvalue-count 8 :arity 1 :constants ("=" "op" "'s" "class" "paren-open" "list" call "bracket-open" ".." "bracket-close" array-slice array-index) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 14 0 18 2 48 0 5 18 3 16 0 49 1 32 74 1 18 0 48 0 1 3 0 52 0 0 2 33 9 0 18 4 16 0 49 1 32 51 1 18 0 48 0 1 4 0 52 0 0 2 33 20 0 18 5 48 0 17 1 1 6 0 16 0 16 1 52 5 0 3 32 17 1 18 0 48 0 1 7 0 52 0 0 2 33 1 1 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 8 0 52 0 0 2 33 53 0 18 2 48 0 5 18 6 48 0 17 1 18 0 48 0 1 9 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 7 1 10 0 16 0 2 16 1 52 5 0 4 49 1 32 166 0 18 6 48 0 17 1 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 8 0 52 0 0 2 33 92 0 18 2 48 0 5 18 0 48 0 1 9 0 52 0 0 2 33 24 0 18 2 48 0 5 18 7 1 10 0 16 0 16 1 2 52 5 0 4 49 1 32 46 0 18 6 48 0 17 2 18 0 48 0 1 9 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 7 1 10 0 16 0 16 1 16 2 52 5 0 4 49 1 32 38 0 18 0 48 0 1 9 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 7 1 11 0 16 0 16 1 52 5 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 7 :arity 1 :constants ("=" "op" "==" "!=" "<" ">" "<=" ">=" "===" "!==" "list" = strict-eq not "keyword" "is" "not" "empty" empty? "in" not-in? "between" "and" and >= <= "really" "equal" "to" "a" "an" "!" type-check-strict type-check "ignoring" "case" eq-ignore-case "less" "than" "or" < "greater" > in? "ident" "hs-keyword?" prop-is "am" "exists" exists? "starts" "with" starts-with-ic? starts-with? "ends" ends-with-ic? ends-with? "matches" matches-ignore-case? matches? "contains" contains-ignore-case? contains? "as" "colon" as "str" ":" "of" "list?" "first" ref "make-symbol" "." "nth" 1 of "does" "exist" "match" "contain" "include" "includes" "start" "end" "equals" "precedes" precedes? "follows" follows?) :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 6 33 108 0 5 16 2 1 2 0 52 0 0 2 6 34 94 0 5 16 2 1 3 0 52 0 0 2 6 34 80 0 5 16 2 1 4 0 52 0 0 2 6 34 66 0 5 16 2 1 5 0 52 0 0 2 6 34 52 0 5 16 2 1 6 0 52 0 0 2 6 34 38 0 5 16 2 1 7 0 52 0 0 2 6 34 24 0 5 16 2 1 8 0 52 0 0 2 6 34 10 0 5 16 2 1 9 0 52 0 0 2 33 109 0 18 2 48 0 5 18 3 48 0 17 3 16 2 1 2 0 52 0 0 2 33 14 0 1 11 0 16 0 16 3 52 10 0 3 32 69 0 16 2 1 8 0 52 0 0 2 33 14 0 1 12 0 16 0 16 3 52 10 0 3 32 43 0 16 2 1 9 0 52 0 0 2 33 21 0 1 13 0 1 12 0 16 0 16 3 52 10 0 3 52 10 0 2 32 10 0 16 2 16 0 16 3 52 10 0 3 32 54 10 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 15 0 52 0 0 2 33 244 3 18 2 48 0 5 18 4 1 16 0 48 1 33 166 1 18 4 1 17 0 48 1 33 19 0 1 13 0 1 18 0 16 0 52 10 0 2 52 10 0 2 32 134 1 18 4 1 19 0 48 1 33 16 0 1 20 0 16 0 18 3 48 0 52 10 0 3 32 108 1 18 4 1 21 0 48 1 33 59 0 18 5 48 0 17 3 18 4 1 22 0 48 1 5 18 5 48 0 17 4 1 13 0 1 23 0 1 24 0 16 0 16 3 52 10 0 3 1 25 0 16 0 16 4 52 10 0 3 52 10 0 3 52 10 0 2 32 39 1 18 4 1 26 0 48 1 33 39 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 13 0 1 12 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 246 0 18 4 1 27 0 48 1 33 31 0 18 4 1 28 0 48 1 5 1 13 0 1 11 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 205 0 18 1 48 0 1 29 0 52 0 0 2 6 34 12 0 5 18 1 48 0 1 30 0 52 0 0 2 6 33 7 0 5 18 2 48 0 5 3 33 101 0 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 31 0 52 0 0 2 17 4 16 4 33 7 0 18 2 48 0 32 1 0 2 5 16 4 33 21 0 1 13 0 1 32 0 16 0 16 3 52 10 0 3 52 10 0 2 32 18 0 1 13 0 1 33 0 16 0 16 3 52 10 0 3 52 10 0 2 32 63 0 18 3 48 0 17 3 18 4 1 34 0 48 1 33 29 0 18 4 1 35 0 48 1 5 1 13 0 1 36 0 16 0 16 3 52 10 0 3 52 10 0 2 32 18 0 1 13 0 1 11 0 16 0 16 3 52 10 0 3 52 10 0 2 32 60 2 18 4 1 17 0 48 1 33 12 0 1 18 0 16 0 52 10 0 2 32 38 2 18 4 1 37 0 48 1 33 66 0 18 4 1 38 0 48 1 5 18 4 1 39 0 48 1 33 32 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 25 0 16 0 18 3 48 0 52 10 0 3 32 13 0 1 40 0 16 0 18 3 48 0 52 10 0 3 32 218 1 18 4 1 41 0 48 1 33 66 0 18 4 1 38 0 48 1 5 18 4 1 39 0 48 1 33 32 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 24 0 16 0 18 3 48 0 52 10 0 3 32 13 0 1 42 0 16 0 18 3 48 0 52 10 0 3 32 142 1 18 4 1 21 0 48 1 33 52 0 18 5 48 0 17 3 18 4 1 22 0 48 1 5 18 5 48 0 17 4 1 23 0 1 24 0 16 0 16 3 52 10 0 3 1 25 0 16 0 16 4 52 10 0 3 52 10 0 3 32 80 1 18 4 1 19 0 48 1 33 16 0 1 43 0 16 0 18 3 48 0 52 10 0 3 32 54 1 18 4 1 26 0 48 1 33 32 0 18 4 1 27 0 48 1 5 18 4 1 28 0 48 1 5 1 12 0 16 0 18 3 48 0 52 10 0 3 32 12 1 18 4 1 27 0 48 1 33 24 0 18 4 1 28 0 48 1 5 1 11 0 16 0 18 3 48 0 52 10 0 3 32 234 0 18 1 48 0 1 29 0 52 0 0 2 6 34 12 0 5 18 1 48 0 1 30 0 52 0 0 2 6 33 7 0 5 18 2 48 0 5 3 33 87 0 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 31 0 52 0 0 2 17 4 16 4 33 7 0 18 2 48 0 32 1 0 2 5 16 4 33 14 0 1 32 0 16 0 16 3 52 10 0 3 32 11 0 1 33 0 16 0 16 3 52 10 0 3 32 106 0 18 0 48 0 1 44 0 52 0 0 2 6 33 14 0 5 20 45 0 18 1 48 0 48 1 52 16 0 1 33 25 0 18 1 48 0 17 3 18 2 48 0 5 1 46 0 16 0 16 3 52 10 0 3 32 49 0 18 3 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 36 0 16 0 16 3 52 10 0 3 32 11 0 1 11 0 16 0 16 3 52 10 0 3 32 40 6 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 47 0 52 0 0 2 33 165 0 18 2 48 0 5 18 4 1 16 0 48 1 33 82 0 18 4 1 19 0 48 1 33 16 0 1 20 0 16 0 18 3 48 0 52 10 0 3 32 53 0 18 4 1 17 0 48 1 33 19 0 1 13 0 1 18 0 16 0 52 10 0 2 52 10 0 2 32 24 0 18 3 48 0 17 3 1 13 0 1 11 0 16 0 16 3 52 10 0 3 52 10 0 2 32 65 0 18 4 1 19 0 48 1 33 16 0 1 43 0 16 0 18 3 48 0 52 10 0 3 32 39 0 18 4 1 17 0 48 1 33 12 0 1 18 0 16 0 52 10 0 2 32 17 0 18 3 48 0 17 3 1 11 0 16 0 16 3 52 10 0 3 32 105 5 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 48 0 52 0 0 2 33 17 0 18 2 48 0 5 1 49 0 16 0 52 10 0 2 32 62 5 16 1 1 14 0 52 0 0 2 6 34 10 0 5 16 1 1 44 0 52 0 0 2 6 33 10 0 5 16 2 1 50 0 52 0 0 2 33 65 0 18 2 48 0 5 18 4 1 51 0 48 1 5 18 5 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 52 0 16 0 16 3 52 10 0 3 32 11 0 1 53 0 16 0 16 3 52 10 0 3 32 213 4 16 1 1 14 0 52 0 0 2 6 34 10 0 5 16 1 1 44 0 52 0 0 2 6 33 10 0 5 16 2 1 54 0 52 0 0 2 33 65 0 18 2 48 0 5 18 4 1 51 0 48 1 5 18 5 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 55 0 16 0 16 3 52 10 0 3 32 11 0 1 56 0 16 0 16 3 52 10 0 3 32 108 4 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 57 0 52 0 0 2 33 57 0 18 2 48 0 5 18 3 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 58 0 16 0 16 3 52 10 0 3 32 11 0 1 59 0 16 0 16 3 52 10 0 3 32 25 4 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 60 0 52 0 0 2 33 57 0 18 2 48 0 5 18 3 48 0 17 3 18 4 1 34 0 48 1 33 22 0 18 4 1 35 0 48 1 5 1 61 0 16 0 16 3 52 10 0 3 32 11 0 1 62 0 16 0 16 3 52 10 0 3 32 198 3 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 63 0 52 0 0 2 33 135 0 18 2 48 0 5 18 1 48 0 1 29 0 52 0 0 2 6 34 12 0 5 18 1 48 0 1 30 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 64 0 52 0 0 2 6 33 9 0 5 18 6 48 0 52 16 0 1 33 39 0 18 2 48 0 5 18 1 48 0 17 4 18 2 48 0 5 1 65 0 16 0 16 3 1 67 0 16 4 52 66 0 3 52 10 0 3 32 11 0 1 65 0 16 0 16 3 52 10 0 3 32 37 3 16 1 1 64 0 52 0 0 2 33 92 0 18 2 48 0 5 18 1 48 0 17 3 18 2 48 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 31 0 52 0 0 2 17 4 16 4 33 7 0 18 2 48 0 32 1 0 2 5 16 4 33 14 0 1 32 0 16 0 16 3 52 10 0 3 32 11 0 1 33 0 16 0 16 3 52 10 0 3 32 189 2 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 68 0 52 0 0 2 33 77 0 18 2 48 0 5 18 3 48 0 17 3 16 0 52 69 0 1 6 33 14 0 5 16 0 52 70 0 1 1 71 0 52 0 0 2 33 25 0 1 73 0 52 72 0 1 16 3 16 0 1 75 0 52 74 0 2 52 10 0 3 32 11 0 1 76 0 16 0 16 3 52 10 0 3 32 86 2 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 19 0 52 0 0 2 33 21 0 18 2 48 0 5 1 43 0 16 0 18 3 48 0 52 10 0 3 32 39 2 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 77 0 52 0 0 2 33 252 0 18 2 48 0 5 18 4 1 16 0 48 1 5 18 4 1 78 0 48 1 33 19 0 1 13 0 1 49 0 16 0 52 10 0 2 52 10 0 2 32 207 0 18 4 1 79 0 48 1 33 23 0 1 13 0 1 59 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 174 0 18 4 1 80 0 48 1 6 34 8 0 5 18 4 1 60 0 48 1 33 23 0 1 13 0 1 62 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 129 0 18 4 1 81 0 48 1 6 34 8 0 5 18 4 1 82 0 48 1 33 23 0 1 13 0 1 62 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 84 0 18 4 1 83 0 48 1 33 31 0 18 4 1 51 0 48 1 5 1 13 0 1 53 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 43 0 18 4 1 84 0 48 1 33 31 0 18 4 1 51 0 48 1 5 1 13 0 1 56 0 16 0 18 3 48 0 52 10 0 3 52 10 0 2 32 2 0 16 0 32 17 1 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 85 0 52 0 0 2 33 21 0 18 2 48 0 5 1 11 0 16 0 18 3 48 0 52 10 0 3 32 226 0 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 26 0 52 0 0 2 33 29 0 18 2 48 0 5 18 4 1 85 0 48 1 5 1 12 0 16 0 18 3 48 0 52 10 0 3 32 171 0 16 1 1 14 0 52 0 0 2 6 33 38 0 5 16 2 1 80 0 52 0 0 2 6 34 24 0 5 16 2 1 81 0 52 0 0 2 6 34 10 0 5 16 2 1 82 0 52 0 0 2 33 21 0 18 2 48 0 5 1 62 0 16 0 18 3 48 0 52 10 0 3 32 96 0 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 86 0 52 0 0 2 33 21 0 18 2 48 0 5 1 87 0 16 0 18 5 48 0 52 10 0 3 32 49 0 16 1 1 14 0 52 0 0 2 6 33 10 0 5 16 2 1 88 0 52 0 0 2 33 21 0 18 2 48 0 5 1 89 0 16 0 18 5 48 0 52 10 0 3 32 2 0 16 0 50)} {:upvalue-count 6 :arity 1 :constants ("where" "list" coll-where "sorted" "by" "descending" "not" "ascending" coll-sorted-desc coll-sorted "mapped" "to" coll-mapped "split" coll-split "joined" coll-joined) :bytecode (18 0 1 0 0 48 1 33 36 0 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 2 0 16 0 16 1 52 1 0 3 49 1 32 11 1 18 0 1 3 0 48 1 33 93 0 18 0 1 4 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 0 1 5 0 48 1 17 2 16 2 52 6 0 1 33 10 0 18 0 1 7 0 48 1 32 1 0 2 5 18 5 16 2 33 14 0 1 8 0 16 0 16 1 52 1 0 3 32 11 0 1 9 0 16 0 16 1 52 1 0 3 49 1 32 164 0 18 0 1 10 0 48 1 33 44 0 18 0 1 11 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 12 0 16 0 16 1 52 1 0 3 49 1 32 110 0 18 0 1 13 0 48 1 33 44 0 18 0 1 4 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 14 0 16 0 16 1 52 1 0 3 49 1 32 56 0 18 0 1 15 0 48 1 33 44 0 18 0 1 4 0 48 1 5 18 1 18 2 18 3 18 4 48 0 48 1 48 1 48 1 17 1 18 5 1 16 0 16 0 16 1 52 1 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 7 :arity 1 :constants ("and" "list" and "or" or) :bytecode (18 0 1 0 0 48 1 33 40 0 18 1 18 2 18 3 18 4 18 5 48 0 48 1 48 1 48 1 48 1 17 1 18 6 1 2 0 16 0 16 1 52 1 0 3 49 1 32 52 0 18 0 1 3 0 48 1 33 40 0 18 1 18 2 18 3 18 4 18 5 48 0 48 1 48 1 48 1 48 1 17 1 18 6 1 4 0 16 0 16 1 52 1 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 9 :arity 0 :constants ("nil?" "number?" "=" "ident" "not" "starts" "ends" "contains" "matches" "is" "does" "in" "precedes" "follows" "list" string-postfix "then" "end" "else" "otherwise" "op" "%") :bytecode (18 0 48 0 17 0 16 0 52 0 0 1 33 4 0 2 32 134 1 16 0 52 1 0 1 6 33 160 0 5 18 1 48 0 1 3 0 52 2 0 2 6 33 144 0 5 18 2 48 0 1 5 0 52 2 0 2 6 34 124 0 5 18 2 48 0 1 6 0 52 2 0 2 6 34 108 0 5 18 2 48 0 1 7 0 52 2 0 2 6 34 92 0 5 18 2 48 0 1 8 0 52 2 0 2 6 34 76 0 5 18 2 48 0 1 9 0 52 2 0 2 6 34 60 0 5 18 2 48 0 1 10 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 11 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 12 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 13 0 52 2 0 2 52 4 0 1 33 27 0 18 2 48 0 17 1 18 3 48 0 5 1 15 0 16 0 16 1 52 14 0 3 17 0 32 1 0 2 5 18 4 16 0 48 1 17 1 18 5 16 1 48 1 17 2 18 6 16 2 48 1 17 3 18 7 16 3 48 1 17 4 18 8 16 4 48 1 17 5 16 5 6 33 112 0 5 18 1 48 0 1 3 0 52 2 0 2 6 33 64 0 5 18 2 48 0 1 16 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 17 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 18 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 19 0 52 2 0 2 52 4 0 1 6 34 28 0 5 18 1 48 0 1 20 0 52 2 0 2 6 33 12 0 5 18 2 48 0 1 21 0 52 2 0 2 33 25 0 18 2 48 0 17 6 18 3 48 0 5 1 15 0 16 5 16 6 52 14 0 3 32 2 0 16 5 50)} {:upvalue-count 2 :arity 2 :constants () :bytecode (18 0 16 0 48 1 33 7 0 18 1 49 0 32 2 0 16 1 50)} {:upvalue-count 6 :arity 0 :constants ("=" "class" "get" "value" "list" {:upvalue-count 4 :arity 0 :constants ("=" "class" "append" "list" "get" "value") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 31 0 18 1 18 2 48 0 1 5 0 52 4 0 2 52 3 0 1 52 2 0 2 19 1 5 18 3 49 0 32 1 0 2 50)} "to" me "when" "empty?" add-class-when add-class multi-add-class-when "cons" multi-add-class "style" "local" set-style "brace-open" {:upvalue-count 6 :arity 0 :constants ("not" "=" "brace-close" "get" "value" "colon" "cons" "list") :bytecode (18 0 48 0 1 2 0 52 1 0 2 52 0 0 1 6 33 9 0 5 18 1 48 0 52 0 0 1 33 71 0 18 2 48 0 1 4 0 52 3 0 2 17 0 18 0 48 0 1 5 0 52 1 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 3 48 0 17 1 18 2 48 0 5 16 0 16 1 52 7 0 2 18 4 52 6 0 2 19 4 5 18 5 49 0 32 1 0 2 50)} "brace-close" set-styles "reverse" add-value) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 175 0 18 1 48 0 1 3 0 52 2 0 2 17 0 52 4 0 0 17 1 51 5 0 0 0 1 1 0 1 1 2 17 2 5 16 2 48 0 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 7 0 1 7 0 52 4 0 1 17 3 18 2 1 8 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 4 16 1 52 9 0 1 33 35 0 16 4 33 16 0 1 10 0 16 0 16 3 16 4 52 4 0 4 32 11 0 1 11 0 16 0 16 3 52 4 0 3 32 44 0 16 4 33 18 0 1 12 0 16 3 16 4 16 0 16 1 52 4 0 5 32 21 0 1 14 0 16 3 16 0 16 1 52 13 0 2 52 13 0 2 52 13 0 2 32 255 0 18 0 48 0 1 15 0 52 0 0 2 33 89 0 18 1 48 0 1 3 0 52 2 0 2 17 0 18 0 48 0 1 16 0 52 0 0 2 33 14 0 18 1 48 0 1 3 0 52 2 0 2 32 4 0 18 3 48 0 17 1 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 7 0 1 7 0 52 4 0 1 17 2 1 17 0 16 0 16 1 16 2 52 4 0 4 32 152 0 18 0 48 0 1 18 0 52 0 0 2 33 101 0 18 1 48 0 5 52 4 0 0 17 0 51 19 0 0 0 0 4 0 1 0 5 1 0 1 1 17 1 5 16 1 48 0 5 18 0 48 0 1 20 0 52 0 0 2 33 7 0 18 1 48 0 32 1 0 2 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 7 0 1 7 0 52 4 0 1 17 2 1 21 0 16 0 52 22 0 1 16 2 52 4 0 3 32 37 0 18 3 48 0 17 0 18 2 1 6 0 48 1 33 20 0 18 3 48 0 17 1 1 23 0 16 0 16 1 52 4 0 3 32 1 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("=" "class" "get" "value" "list" {:upvalue-count 4 :arity 0 :constants ("=" "class" "append" "list" "get" "value") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 31 0 18 1 18 2 48 0 1 5 0 52 4 0 2 52 3 0 1 52 2 0 2 19 1 5 18 3 49 0 32 1 0 2 50)} "from" "empty?" remove-class "cons" multi-remove-class "bracket-open" "[" "attr" "]" remove-attr "{" {:upvalue-count 4 :arity 0 :constants ("not" "=" "}" ";" "append" "list" "get" "value") :bytecode (18 0 48 0 1 2 0 52 1 0 2 52 0 0 1 33 76 0 18 0 48 0 1 3 0 52 1 0 2 33 7 0 18 1 48 0 32 1 0 2 5 18 0 48 0 1 2 0 52 1 0 2 52 0 0 1 33 31 0 18 2 18 1 48 0 1 7 0 52 6 0 2 52 5 0 1 52 4 0 2 19 2 5 18 3 49 0 32 1 0 2 32 1 0 2 50)} "}" remove-css remove-value remove-element) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 105 0 18 1 48 0 1 3 0 52 2 0 2 17 0 52 4 0 0 17 1 51 5 0 0 0 1 1 0 1 1 2 17 2 5 16 2 48 0 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 3 16 1 52 7 0 1 33 14 0 1 8 0 16 0 16 3 52 4 0 3 32 21 0 1 10 0 16 3 16 0 16 1 52 9 0 2 52 9 0 2 52 9 0 2 32 239 0 18 0 48 0 1 11 0 52 0 0 2 6 33 12 0 5 18 4 48 0 1 12 0 52 0 0 2 33 78 0 18 1 48 0 5 18 0 48 0 1 13 0 52 0 0 2 33 55 0 18 1 48 0 1 3 0 52 2 0 2 17 0 18 2 1 14 0 48 1 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 1 1 15 0 16 0 16 1 52 4 0 3 32 1 0 2 32 131 0 18 4 48 0 1 16 0 52 0 0 2 33 72 0 18 1 48 0 5 52 4 0 0 17 0 51 17 0 0 4 0 1 1 0 1 1 17 1 5 16 1 48 0 5 18 2 1 18 0 48 1 5 18 2 1 6 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 2 1 19 0 16 0 16 2 52 4 0 3 32 45 0 18 3 48 0 17 0 18 2 1 6 0 48 1 33 20 0 18 3 48 0 17 1 1 20 0 16 0 16 1 52 4 0 3 32 9 0 1 21 0 16 0 52 4 0 2 50)} {:upvalue-count 9 :arity 0 :constants ("between" "=" "class" "and" "on" "list" me toggle-between "for" toggle-class-for toggle-class "style" "get" "value" "of" toggle-style-cycle toggle-style-between toggle-style "attr" toggle-attr-between toggle-attr "keyword" "my" "the" "list?" "first" style "nth" 1 2 attr has-class?) :bytecode (18 0 1 0 0 48 1 33 106 0 18 1 48 0 1 2 0 52 1 0 2 33 88 0 18 2 48 0 17 0 18 3 48 0 5 16 0 17 0 18 4 1 3 0 48 1 5 18 1 48 0 1 2 0 52 1 0 2 33 47 0 18 2 48 0 17 1 18 3 48 0 5 16 1 17 1 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 2 1 7 0 16 0 16 1 16 2 52 5 0 4 32 1 0 2 32 1 0 2 32 139 3 18 1 48 0 1 2 0 52 1 0 2 33 77 0 18 2 48 0 17 0 18 3 48 0 5 16 0 17 0 18 5 1 4 0 1 6 0 52 5 0 1 48 2 17 1 18 0 1 8 0 48 1 33 22 0 18 6 48 0 17 2 1 9 0 16 0 16 1 16 2 52 5 0 4 32 11 0 1 10 0 16 0 16 1 52 5 0 3 32 48 3 18 1 48 0 1 11 0 52 1 0 2 33 175 0 18 3 48 0 1 13 0 52 12 0 2 17 0 18 0 1 14 0 48 1 33 7 0 18 6 48 0 32 7 0 1 6 0 52 5 0 1 17 1 18 0 1 0 0 48 1 33 112 0 18 7 48 0 17 2 18 4 1 3 0 48 1 5 18 7 48 0 17 3 18 0 1 3 0 48 1 33 64 0 18 7 48 0 17 4 18 0 1 3 0 48 1 33 28 0 18 7 48 0 17 5 1 15 0 16 0 16 1 16 2 16 3 16 4 16 5 52 5 0 7 32 17 0 1 15 0 16 0 16 1 16 2 16 3 16 4 52 5 0 6 32 15 0 1 16 0 16 0 16 2 16 3 16 1 52 5 0 5 32 11 0 1 17 0 16 0 16 1 52 5 0 3 32 115 2 18 1 48 0 1 18 0 52 1 0 2 33 101 0 18 3 48 0 1 13 0 52 12 0 2 17 0 18 0 1 4 0 48 1 33 7 0 18 6 48 0 32 7 0 1 6 0 52 5 0 1 17 1 18 0 1 0 0 48 1 33 38 0 18 6 48 0 17 2 18 4 1 3 0 48 1 5 18 6 48 0 17 3 1 19 0 16 0 16 2 16 3 16 1 52 5 0 5 32 11 0 1 20 0 16 0 16 1 52 5 0 3 32 0 2 18 1 48 0 1 21 0 52 1 0 2 6 33 12 0 5 18 2 48 0 1 22 0 52 1 0 2 33 199 0 18 3 48 0 5 18 1 48 0 1 11 0 52 1 0 2 33 115 0 18 3 48 0 1 13 0 52 12 0 2 17 0 18 0 1 0 0 48 1 33 58 0 18 6 48 0 17 1 18 4 1 3 0 48 1 5 18 6 48 0 17 2 18 0 1 4 0 48 1 33 7 0 18 6 48 0 32 1 0 2 17 3 1 16 0 16 0 16 1 16 2 16 3 52 5 0 5 32 31 0 18 0 1 4 0 48 1 33 7 0 18 6 48 0 32 1 0 2 17 1 1 17 0 16 0 16 1 52 5 0 3 32 62 0 18 1 48 0 1 18 0 52 1 0 2 33 47 0 18 3 48 0 1 13 0 52 12 0 2 17 0 18 0 1 4 0 48 1 33 7 0 18 6 48 0 32 1 0 2 17 1 1 20 0 16 0 16 1 52 5 0 3 32 1 0 2 32 27 1 18 1 48 0 1 21 0 52 1 0 2 6 33 12 0 5 18 2 48 0 1 23 0 52 1 0 2 33 252 0 18 3 48 0 5 18 8 48 0 17 0 16 0 52 24 0 1 6 33 14 0 5 16 0 52 25 0 1 1 26 0 52 1 0 2 33 84 0 16 0 1 28 0 52 27 0 2 17 1 16 0 1 29 0 52 27 0 2 17 2 18 0 1 0 0 48 1 33 38 0 18 6 48 0 17 3 18 4 1 3 0 48 1 5 18 6 48 0 17 4 1 16 0 16 1 16 3 16 4 16 2 52 5 0 5 32 11 0 1 17 0 16 1 16 2 52 5 0 3 32 127 0 16 0 52 24 0 1 6 33 14 0 5 16 0 52 25 0 1 1 30 0 52 1 0 2 33 36 0 16 0 1 28 0 52 27 0 2 17 1 16 0 1 29 0 52 27 0 2 17 2 1 20 0 16 1 16 2 52 5 0 3 32 64 0 16 0 52 24 0 1 6 33 14 0 5 16 0 52 25 0 1 1 31 0 52 1 0 2 33 36 0 16 0 1 28 0 52 27 0 2 17 1 16 0 1 29 0 52 27 0 2 17 2 1 10 0 16 2 16 1 52 5 0 3 32 1 0 2 32 1 0 2 50)} {:upvalue-count 3 :arity 0 :constants ("to" "list" set! "on" set-on "error" "str" "Expected to/on at position ") :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 20 0 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 32 43 0 18 1 1 3 0 48 1 33 20 0 18 0 48 0 17 1 1 4 0 16 0 16 1 52 1 0 3 32 13 0 1 7 0 18 2 52 6 0 2 52 5 0 1 50)} {:upvalue-count 4 :arity 0 :constants ("into" "list" set! "before" put! "after" "at" "the" "start" "of" "end" "error" "str" "Expected start/end after at, position " "Expected into/before/after/at at position ") :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 16 0 1 2 0 18 0 48 0 16 0 52 1 0 3 32 179 0 18 1 1 3 0 48 1 33 19 0 1 4 0 16 0 1 3 0 18 0 48 0 52 1 0 4 32 150 0 18 1 1 5 0 48 1 33 19 0 1 4 0 16 0 1 5 0 18 0 48 0 52 1 0 4 32 121 0 18 1 1 6 0 48 1 33 98 0 18 1 1 7 0 48 1 5 18 1 1 8 0 48 1 33 27 0 18 2 1 9 0 48 1 5 1 4 0 16 0 1 8 0 18 0 48 0 52 1 0 4 32 50 0 18 1 1 10 0 48 1 33 27 0 18 2 1 9 0 48 1 5 1 4 0 16 0 1 10 0 18 0 48 0 52 1 0 4 32 13 0 1 13 0 18 3 52 12 0 2 52 11 0 1 32 13 0 1 14 0 18 3 52 12 0 2 52 11 0 1 50)} {:upvalue-count 3 :arity 0 :constants ("then" "else" "otherwise" "end" "list" if) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 2 48 0 17 1 18 1 1 1 0 48 1 6 34 8 0 5 18 1 1 2 0 48 1 33 7 0 18 2 48 0 32 1 0 2 17 2 18 1 1 3 0 48 1 5 16 2 33 16 0 1 5 0 16 0 16 1 16 2 52 4 0 4 32 11 0 1 5 0 16 0 16 1 52 4 0 3 50)} {:upvalue-count 6 :arity 0 :constants ("for" "from" "list" wait-for "=" "number" wait "get" "value" 0) :bytecode (18 0 1 0 0 48 1 33 65 0 18 1 48 0 17 0 18 2 48 0 5 18 0 1 1 0 48 1 33 7 0 18 3 48 0 32 1 0 2 17 1 16 1 33 17 0 1 3 0 16 0 1 1 0 16 1 52 2 0 4 32 9 0 1 3 0 16 0 52 2 0 2 32 53 0 18 4 48 0 1 5 0 52 4 0 2 33 29 0 18 2 48 0 17 0 1 6 0 18 5 16 0 1 8 0 52 7 0 2 48 1 52 2 0 2 32 10 0 1 6 0 1 9 0 52 2 0 2 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "paren-close" "get" "value" "colon" "comma" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 34 5 0 5 18 1 48 0 33 28 0 18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 83 0 18 2 48 0 1 3 0 52 2 0 2 17 1 18 0 48 0 1 4 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 3 48 0 17 2 18 0 48 0 1 5 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 4 16 0 16 1 16 2 52 7 0 2 52 6 0 2 49 1 50)} "cons" dict "list") :bytecode (18 0 48 0 5 51 0 0 0 1 0 2 0 0 0 3 1 0 17 0 5 1 2 0 16 0 52 3 0 0 48 1 52 1 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("get" "value" {:upvalue-count 6 :arity 0 :constants ("not" "=" "class" "str" "." "local" ":") :bytecode (18 0 48 0 52 0 0 1 33 96 0 18 1 48 0 1 2 0 52 1 0 2 33 32 0 18 2 48 0 17 0 18 3 48 0 5 18 4 1 4 0 16 0 52 3 0 3 19 4 5 18 5 49 0 32 47 0 18 1 48 0 1 5 0 52 1 0 2 33 32 0 18 2 48 0 17 0 18 3 48 0 5 18 4 1 6 0 16 0 52 3 0 3 19 4 5 18 5 49 0 32 1 0 2 32 1 0 2 50)}) :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 51 2 0 0 1 0 2 0 3 0 0 1 0 1 1 17 1 5 16 1 48 0 5 16 0 50)} {:upvalue-count 4 :arity 0 :constants ("=" "paren-open" "to" "list" me send) :bytecode (18 0 48 0 17 0 18 1 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 17 1 18 3 1 2 0 1 4 0 52 3 0 1 48 2 17 2 16 1 33 16 0 1 5 0 16 0 16 1 16 2 52 3 0 4 32 11 0 1 5 0 16 0 16 2 52 3 0 3 50)} {:upvalue-count 2 :arity 0 :constants ("get" "value" "on" "list" me trigger) :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 18 1 1 2 0 1 4 0 52 3 0 1 48 2 17 1 1 5 0 16 0 16 1 52 3 0 3 50)} {:upvalue-count 1 :arity 0 :constants ("list" log) :bytecode (1 1 0 18 0 48 0 52 0 0 2 50)} {:upvalue-count 3 :arity 0 :constants ("by" 1 "on" "list" me increment!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 7 0 18 0 48 0 32 3 0 1 1 0 17 1 18 2 1 2 0 1 4 0 52 3 0 1 48 2 17 2 1 5 0 16 0 16 1 16 2 52 3 0 4 50)} {:upvalue-count 3 :arity 0 :constants ("by" 1 "on" "list" me decrement!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 7 0 18 0 48 0 32 3 0 1 1 0 17 1 18 2 1 2 0 1 4 0 52 3 0 1 48 2 17 2 1 5 0 16 0 16 1 16 2 52 3 0 4 50)} {:upvalue-count 6 :arity 0 :constants ("list" me "=" "keyword" "then" "end" "with" "add" "remove" "set" "put" "toggle" "hide" "show" "display" hide) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 188 0 18 1 48 0 1 3 0 52 2 0 2 6 33 156 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 140 0 5 18 2 48 0 1 5 0 52 2 0 2 6 34 124 0 5 18 2 48 0 1 6 0 52 2 0 2 6 34 108 0 5 18 2 48 0 1 7 0 52 2 0 2 6 34 92 0 5 18 2 48 0 1 8 0 52 2 0 2 6 34 76 0 5 18 2 48 0 1 9 0 52 2 0 2 6 34 60 0 5 18 2 48 0 1 10 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 11 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 12 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 13 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 18 4 1 6 0 48 1 33 29 0 18 0 48 0 33 6 0 1 14 0 32 13 0 18 2 48 0 17 1 18 5 48 0 5 16 1 32 3 0 1 14 0 17 1 1 15 0 16 0 16 1 52 0 0 3 50)} {:upvalue-count 6 :arity 0 :constants ("list" me "=" "keyword" "then" "end" "with" "add" "remove" "set" "put" "toggle" "hide" "show" "display" show) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 188 0 18 1 48 0 1 3 0 52 2 0 2 6 33 156 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 140 0 5 18 2 48 0 1 5 0 52 2 0 2 6 34 124 0 5 18 2 48 0 1 6 0 52 2 0 2 6 34 108 0 5 18 2 48 0 1 7 0 52 2 0 2 6 34 92 0 5 18 2 48 0 1 8 0 52 2 0 2 6 34 76 0 5 18 2 48 0 1 9 0 52 2 0 2 6 34 60 0 5 18 2 48 0 1 10 0 52 2 0 2 6 34 44 0 5 18 2 48 0 1 11 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 12 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 13 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 18 4 1 6 0 48 1 33 29 0 18 0 48 0 33 6 0 1 14 0 32 13 0 18 2 48 0 17 1 18 5 48 0 5 16 1 32 3 0 1 14 0 17 1 1 15 0 16 0 16 1 52 0 0 3 50)} {:upvalue-count 8 :arity 0 :constants ("=" "ident" "element" "id" "class" "selector" {:upvalue-count 8 :arity 0 :constants ("=" "style" "get" "value" "my" "'s" "of" "from" "ident" "not" "hs-keyword?" "list" string-postfix "to" "over" "number?" "using" transition-from transition) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 14 0 18 1 48 0 1 3 0 52 2 0 2 32 133 0 18 2 48 0 1 4 0 52 0 0 2 33 47 0 18 1 48 0 5 18 0 48 0 1 1 0 52 0 0 2 33 14 0 18 1 48 0 1 3 0 52 2 0 2 32 11 0 18 1 48 0 1 3 0 52 2 0 2 32 72 0 18 2 48 0 1 5 0 52 0 0 2 33 47 0 18 1 48 0 5 18 0 48 0 1 1 0 52 0 0 2 33 14 0 18 1 48 0 1 3 0 52 2 0 2 32 11 0 18 1 48 0 1 3 0 52 2 0 2 32 11 0 18 1 48 0 1 3 0 52 2 0 2 17 0 18 3 1 6 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 1 16 1 33 5 0 16 1 32 2 0 18 5 17 2 18 3 1 7 0 48 1 33 77 0 18 6 48 0 17 3 16 3 6 33 30 0 5 18 0 48 0 1 8 0 52 0 0 2 6 33 14 0 5 20 10 0 18 2 48 0 48 1 52 9 0 1 33 27 0 18 1 48 0 1 3 0 52 2 0 2 17 4 1 12 0 16 3 16 4 52 11 0 3 32 2 0 16 3 32 1 0 2 17 3 18 7 1 13 0 48 1 5 18 6 48 0 17 4 16 4 6 33 30 0 5 18 0 48 0 1 8 0 52 0 0 2 6 33 14 0 5 20 10 0 18 2 48 0 48 1 52 9 0 1 33 27 0 18 1 48 0 1 3 0 52 2 0 2 17 5 1 12 0 16 4 16 5 52 11 0 3 32 2 0 16 4 17 4 18 3 1 14 0 48 1 33 81 0 18 6 48 0 17 5 16 5 52 15 0 1 6 33 30 0 5 18 0 48 0 1 8 0 52 0 0 2 6 33 14 0 5 20 10 0 18 2 48 0 48 1 52 9 0 1 33 27 0 18 1 48 0 1 3 0 52 2 0 2 17 6 1 12 0 16 5 16 6 52 11 0 3 32 2 0 16 5 32 1 0 2 17 5 18 3 1 16 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 6 16 3 33 20 0 1 17 0 16 0 16 3 16 4 16 5 16 2 52 11 0 6 32 15 0 1 18 0 16 0 16 4 16 5 16 2 52 11 0 5 50)} {:upvalue-count 5 :arity 1 :constants ("not" "=" "ident" "hs-keyword?" "append" "list") :bytecode (18 0 48 0 52 0 0 1 6 33 30 0 5 18 1 48 0 1 2 0 52 1 0 2 6 33 14 0 5 20 3 0 18 2 48 0 48 1 52 0 0 1 33 21 0 18 3 16 0 18 4 48 0 52 5 0 1 52 4 0 2 49 1 32 2 0 16 0 50)} "list" "len" 1 "first" "cons" do) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 12 0 18 2 48 0 5 18 3 48 0 32 64 0 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 3 48 0 32 43 0 18 0 48 0 1 4 0 52 0 0 2 33 7 0 18 3 48 0 32 22 0 18 0 48 0 1 5 0 52 0 0 2 33 7 0 18 3 48 0 32 1 0 2 17 0 51 6 0 0 0 0 2 0 1 0 4 0 5 1 0 0 3 0 6 17 1 5 16 1 48 0 17 2 51 7 0 0 7 0 0 0 1 1 3 1 1 17 3 5 16 3 16 2 52 8 0 1 48 1 17 4 16 4 52 9 0 1 1 10 0 52 0 0 2 33 9 0 16 4 52 11 0 1 32 9 0 1 13 0 16 4 52 12 0 2 50)} {:upvalue-count 7 :arity 0 :constants ("=" "keyword" "for" "in" "end" "list" for "it" "forever" forever "while" while "until" until "times" times "then" repeat-until repeat-while repeat) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 12 0 18 2 48 0 5 18 3 49 0 32 30 1 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 3 0 52 0 0 2 33 42 0 18 2 48 0 5 18 4 48 0 17 0 18 5 48 0 17 1 18 6 1 4 0 48 1 5 1 6 0 1 7 0 16 0 16 1 52 5 0 4 32 214 0 18 6 1 8 0 48 1 33 10 0 1 9 0 52 5 0 1 32 83 0 18 6 1 10 0 48 1 33 14 0 1 11 0 18 4 48 0 52 5 0 2 32 59 0 18 6 1 12 0 48 1 33 14 0 1 13 0 18 4 48 0 52 5 0 2 32 35 0 18 4 48 0 17 0 18 6 1 14 0 48 1 33 12 0 1 15 0 16 0 52 5 0 2 32 7 0 1 9 0 52 5 0 1 17 0 18 6 1 16 0 48 1 5 18 5 48 0 17 1 18 6 1 12 0 48 1 33 28 0 18 4 48 0 17 2 18 6 1 4 0 48 1 5 1 17 0 16 2 16 1 52 5 0 3 32 57 0 18 6 1 10 0 48 1 33 28 0 18 4 48 0 17 2 18 6 1 4 0 48 1 5 1 18 0 16 2 16 1 52 5 0 3 32 19 0 18 6 1 4 0 48 1 5 1 19 0 16 0 16 1 52 5 0 3 50)} {:upvalue-count 9 :arity 0 :constants ("=" "keyword" "gql" "brace-open" {:upvalue-count 5 :arity 2 :constants ("join" " " "=" "brace-open" "append" "list" "{" "+" 1 "brace-close" 0 "}" "-" "") :bytecode (18 0 48 0 33 12 0 1 1 0 16 0 52 0 0 2 32 165 0 18 1 48 0 1 3 0 52 2 0 2 33 34 0 18 2 48 0 5 18 3 16 0 1 6 0 52 5 0 1 52 4 0 2 16 1 1 8 0 52 7 0 2 49 2 32 117 0 18 1 48 0 1 9 0 52 2 0 2 33 63 0 16 1 1 10 0 52 2 0 2 33 17 0 18 2 48 0 5 1 1 0 16 0 52 0 0 2 32 31 0 18 2 48 0 5 18 3 16 0 1 11 0 52 5 0 1 52 4 0 2 16 1 1 8 0 52 12 0 2 49 2 32 40 0 18 4 48 0 17 2 18 2 48 0 5 18 3 16 0 16 2 33 5 0 16 2 32 3 0 1 13 0 52 5 0 1 52 4 0 2 16 1 49 2 50)} "str" "{ " "list" 0 " }" "query" "mutation" "subscription" " { " "" "from" fetch-gql "op" "/" {:upvalue-count 6 :arity 0 :constants ("not" "=" "ident" "op" "dot" "number" "append!") :bytecode (18 0 48 0 52 0 0 1 6 33 60 0 5 18 1 48 0 1 2 0 52 1 0 2 6 34 44 0 5 18 1 48 0 1 3 0 52 1 0 2 6 34 28 0 5 18 1 48 0 1 4 0 52 1 0 2 6 34 12 0 5 18 1 48 0 1 5 0 52 1 0 2 33 23 0 18 2 18 3 48 0 52 6 0 2 5 18 4 48 0 5 18 5 49 0 32 1 0 2 50)} "join" "nil?" "as" "with" "not" "text" fetch) :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 2 0 52 0 0 2 33 58 1 18 2 48 0 5 18 0 48 0 1 3 0 52 0 0 2 33 45 0 18 2 48 0 5 51 4 0 0 3 0 0 0 2 1 0 0 1 17 0 5 1 6 0 16 0 52 7 0 0 1 8 0 48 2 1 9 0 52 5 0 3 32 181 0 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 10 0 52 0 0 2 6 34 60 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 11 0 52 0 0 2 6 34 28 0 5 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 12 0 52 0 0 2 33 84 0 18 1 48 0 17 1 18 2 48 0 5 18 0 48 0 1 3 0 52 0 0 2 33 47 0 18 2 48 0 5 51 4 0 0 3 0 0 0 2 1 2 0 1 17 2 5 16 1 1 13 0 16 2 52 7 0 0 1 8 0 48 2 1 9 0 52 5 0 4 32 9 0 16 1 1 14 0 52 5 0 2 32 3 0 1 14 0 17 1 18 0 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 15 0 52 0 0 2 33 20 0 18 2 48 0 5 18 4 18 5 18 6 48 0 48 1 48 1 32 1 0 2 17 2 1 16 0 16 1 16 2 52 7 0 3 32 17 1 18 0 48 0 1 17 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 18 0 52 0 0 2 33 49 0 18 2 48 0 5 1 18 0 52 7 0 1 17 0 51 19 0 0 3 0 0 1 0 0 1 0 2 1 1 17 1 5 16 1 48 0 5 1 14 0 16 0 52 20 0 2 32 4 0 18 6 48 0 17 0 16 0 52 21 0 1 33 5 0 16 0 32 10 0 18 4 18 5 16 0 48 1 48 1 17 1 18 7 1 22 0 48 1 33 16 0 18 1 48 0 17 2 18 2 48 0 5 16 2 32 1 0 2 17 2 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 8 48 0 32 1 0 2 5 18 7 1 23 0 48 1 33 28 0 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 8 48 0 32 4 0 18 8 48 0 32 1 0 2 5 16 2 52 24 0 1 6 33 8 0 5 18 7 1 22 0 48 1 33 16 0 18 1 48 0 17 3 18 2 48 0 5 16 3 32 1 0 2 17 3 16 2 6 34 11 0 5 16 3 6 34 4 0 5 1 25 0 17 4 1 26 0 16 1 16 4 52 7 0 3 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "paren-close" "comma" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 34 5 0 5 18 1 48 0 33 28 0 18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 45 0 18 3 48 0 17 1 18 0 48 0 1 2 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 4 16 0 16 1 52 4 0 1 52 3 0 2 49 1 50)} "list") :bytecode (18 0 48 0 5 51 0 0 0 1 0 2 0 0 0 3 1 0 17 0 5 16 0 52 1 0 0 49 1 50)} {:upvalue-count 3 :arity 0 :constants ("get" "value" "=" "paren-open" "cons" call "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 18 1 48 0 1 3 0 52 2 0 2 33 24 0 18 2 48 0 17 1 1 5 0 16 0 16 1 52 4 0 2 52 4 0 2 32 9 0 1 5 0 16 0 52 6 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("=" "class" "from" "for" "list" take! "attr" "get" "value" "op" "with") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 74 0 18 1 48 0 17 0 18 2 48 0 5 16 0 17 0 18 3 1 2 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 1 18 3 1 3 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 2 1 5 0 1 1 0 16 0 16 1 16 2 52 4 0 5 32 163 0 18 0 48 0 1 6 0 52 0 0 2 33 148 0 18 2 48 0 1 8 0 52 7 0 2 17 0 18 0 48 0 1 9 0 52 0 0 2 6 33 12 0 5 18 1 48 0 1 0 0 52 0 0 2 33 19 0 18 2 48 0 5 18 2 48 0 1 8 0 52 7 0 2 32 1 0 2 17 1 18 3 1 10 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 2 18 3 1 2 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 3 18 3 1 3 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 4 1 5 0 1 6 0 16 0 16 3 16 4 16 1 16 2 52 4 0 7 32 1 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("to" "list" go) :bytecode (18 0 1 0 0 48 1 5 1 2 0 18 1 48 0 52 1 0 2 50)} {:upvalue-count 6 :arity 1 :constants ("=" "op" "+" "-" "*" "/" "%" "keyword" "mod" + - * / "make-symbol" "nil?" "list") :bytecode (18 0 48 0 17 1 18 1 48 0 17 2 16 1 1 1 0 52 0 0 2 6 33 66 0 5 16 2 1 2 0 52 0 0 2 6 34 52 0 5 16 2 1 3 0 52 0 0 2 6 34 38 0 5 16 2 1 4 0 52 0 0 2 6 34 24 0 5 16 2 1 5 0 52 0 0 2 6 34 10 0 5 16 2 1 6 0 52 0 0 2 6 34 24 0 5 16 1 1 7 0 52 0 0 2 6 33 10 0 5 16 2 1 8 0 52 0 0 2 33 161 0 18 2 48 0 5 16 2 1 2 0 52 0 0 2 33 6 0 1 9 0 32 91 0 16 2 1 3 0 52 0 0 2 33 6 0 1 10 0 32 73 0 16 2 1 4 0 52 0 0 2 33 6 0 1 11 0 32 55 0 16 2 1 5 0 52 0 0 2 33 6 0 1 12 0 32 37 0 16 2 1 6 0 52 0 0 2 6 34 10 0 5 16 2 1 8 0 52 0 0 2 33 10 0 1 6 0 52 13 0 1 32 1 0 2 17 3 18 3 48 0 17 4 16 4 52 14 0 1 33 5 0 16 4 32 6 0 18 4 16 4 48 1 17 4 18 5 16 3 16 0 16 4 52 15 0 3 49 1 32 2 0 16 0 50)} {:upvalue-count 8 :arity 0 :constants ("=" "style" "of" "list" style me "attr" attr "class" has-class? "selector" "in" in? query "ident" "keyword" "make-symbol" "." "result" it "first" first "last" last "closest" closest "next" next "previous" previous ref) :bytecode (18 0 48 0 17 0 18 1 48 0 17 1 16 0 1 1 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 2 0 48 1 33 16 0 1 4 0 16 1 18 4 48 0 52 3 0 3 32 16 0 1 4 0 16 1 1 5 0 52 3 0 1 52 3 0 3 32 139 1 16 0 1 6 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 2 0 48 1 33 16 0 1 7 0 16 1 18 4 48 0 52 3 0 3 32 16 0 1 7 0 16 1 1 5 0 52 3 0 1 52 3 0 3 32 77 1 16 0 1 8 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 2 0 48 1 33 16 0 1 9 0 18 4 48 0 16 1 52 3 0 3 32 16 0 1 9 0 1 5 0 52 3 0 1 16 1 52 3 0 3 32 15 1 16 0 1 10 0 52 0 0 2 33 50 0 18 2 48 0 5 18 3 1 11 0 48 1 33 23 0 1 12 0 1 13 0 16 1 52 3 0 2 18 4 48 0 52 3 0 3 32 9 0 1 13 0 16 1 52 3 0 2 32 209 0 16 0 1 14 0 52 0 0 2 6 34 10 0 5 16 0 1 15 0 52 0 0 2 33 179 0 18 2 48 0 5 18 3 1 2 0 48 1 33 20 0 1 17 0 52 16 0 1 18 4 48 0 16 1 52 3 0 3 32 141 0 16 1 1 18 0 52 0 0 2 33 10 0 1 19 0 52 3 0 1 32 119 0 16 1 1 20 0 52 0 0 2 33 10 0 18 5 1 21 0 49 1 32 97 0 16 1 1 22 0 52 0 0 2 33 10 0 18 5 1 23 0 49 1 32 75 0 16 1 1 24 0 52 0 0 2 33 10 0 18 6 1 25 0 49 1 32 53 0 16 1 1 26 0 52 0 0 2 33 10 0 18 6 1 27 0 49 1 32 31 0 16 1 1 28 0 52 0 0 2 33 10 0 18 6 1 29 0 49 1 32 9 0 1 30 0 16 1 52 3 0 2 32 4 0 18 7 49 0 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "bracket-close" "comma" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 6 34 5 0 5 18 1 48 0 33 28 0 18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 45 0 18 3 48 0 17 1 18 0 48 0 1 2 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 18 4 16 0 16 1 52 4 0 1 52 3 0 2 49 1 50)} "cons" array "list") :bytecode (51 0 0 0 0 0 1 0 2 0 3 1 0 17 0 5 1 2 0 16 0 52 3 0 0 48 1 52 1 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("=" "keyword" "end" "then" "else" "list" return) :bytecode (18 0 48 0 6 34 60 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 44 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 28 0 5 18 2 48 0 1 3 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 4 0 52 0 0 2 33 11 0 1 6 0 2 52 5 0 2 32 11 0 1 6 0 18 3 48 0 52 5 0 2 50)} {:upvalue-count 1 :arity 0 :constants ("list" throw) :bytecode (1 1 0 18 0 48 0 52 0 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("to" "list" append! it) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 33 20 0 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 32 16 0 1 2 0 16 0 1 3 0 52 1 0 1 52 1 0 3 50)} {:upvalue-count 3 :arity 0 :constants ("then" "end" "list" tell) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 2 48 0 17 1 18 1 1 1 0 48 1 5 1 3 0 16 0 16 1 52 2 0 3 50)} {:upvalue-count 6 :arity 0 :constants ("in" "index" "indexed" "by" "then" "end" "list" for) :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 1 0 0 48 1 5 18 3 48 0 17 1 18 4 1 1 0 48 1 33 16 0 18 0 48 0 17 2 18 1 48 0 5 16 2 32 35 0 18 4 1 2 0 48 1 33 24 0 18 4 1 3 0 48 1 5 18 0 48 0 17 2 18 1 48 0 5 16 2 32 1 0 2 17 2 18 4 1 4 0 48 1 5 18 5 48 0 17 3 18 4 1 5 0 48 1 5 16 2 33 21 0 1 7 0 16 0 16 1 16 3 1 1 0 16 2 52 6 0 6 32 13 0 1 7 0 16 0 16 1 16 3 52 6 0 4 50)} {:upvalue-count 3 :arity 0 :constants ("=" "a" "called" "list" make) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 1 48 0 32 1 0 2 5 18 0 48 0 17 0 18 1 48 0 5 18 2 1 2 0 48 1 33 16 0 18 0 48 0 17 1 18 1 48 0 5 16 1 32 1 0 2 17 1 16 1 33 14 0 1 4 0 16 0 16 1 52 3 0 3 32 9 0 1 4 0 16 0 52 3 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("=" "paren-open" "cons" install "list") :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 48 0 1 1 0 52 0 0 2 33 24 0 18 3 48 0 17 1 1 3 0 16 0 16 1 52 2 0 2 52 2 0 2 32 9 0 1 3 0 16 0 52 4 0 2 50)} {:upvalue-count 1 :arity 0 :constants ("list" measure "nil?" me) :bytecode (18 0 48 0 17 0 1 1 0 16 0 52 2 0 1 33 10 0 1 3 0 52 0 0 1 32 2 0 16 0 52 0 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("=" "keyword" "then" "end" "list" me "top" "bottom" "left" "right" scroll!) :bytecode (18 0 48 0 6 34 44 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 28 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 3 0 52 0 0 2 33 10 0 1 5 0 52 4 0 1 32 4 0 18 3 48 0 17 0 18 4 1 6 0 48 1 33 6 0 1 6 0 32 51 0 18 4 1 7 0 48 1 33 6 0 1 7 0 32 35 0 18 4 1 8 0 48 1 33 6 0 1 8 0 32 19 0 18 4 1 9 0 48 1 33 6 0 1 9 0 32 3 0 1 6 0 17 1 1 10 0 16 0 16 1 52 4 0 3 50)} {:upvalue-count 4 :arity 0 :constants ("=" "keyword" "then" "end" "list" me select!) :bytecode (18 0 48 0 6 34 44 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 28 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 3 0 52 0 0 2 33 10 0 1 5 0 52 4 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 4 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("=" "keyword" "then" "end" "list" me reset!) :bytecode (18 0 48 0 6 34 44 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 28 0 5 18 2 48 0 1 2 0 52 0 0 2 6 34 12 0 5 18 2 48 0 1 3 0 52 0 0 2 33 10 0 1 5 0 52 4 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 4 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("to" "list" default!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 50)} {:upvalue-count 3 :arity 0 :constants ("the" "event" "'s" "default" "=" "bubbling" "list" halt!) :bytecode (18 0 1 0 0 48 1 33 22 0 18 0 1 1 0 48 1 5 18 0 1 2 0 48 1 5 1 1 0 32 89 0 18 0 1 3 0 48 1 6 34 23 0 5 18 1 48 0 1 3 0 52 4 0 2 6 33 7 0 5 18 2 48 0 5 3 33 6 0 1 3 0 32 46 0 18 0 1 5 0 48 1 6 34 23 0 5 18 1 48 0 1 5 0 52 4 0 2 6 33 7 0 5 18 2 48 0 5 3 33 6 0 1 5 0 32 3 0 1 1 0 17 0 1 7 0 16 0 52 6 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("=" "paren-open" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 7 0 18 1 49 0 32 4 0 52 2 0 0 50)} {:upvalue-count 4 :arity 0 :constants ("list" me "=" "keyword" "then" "end" focus!) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 60 0 18 1 48 0 1 3 0 52 2 0 2 6 33 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 0 0 2 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "keyword" "end" "nil?" "append" "list") :bytecode (18 0 48 0 6 34 28 0 5 18 1 48 0 1 1 0 52 0 0 2 6 33 12 0 5 18 2 48 0 1 2 0 52 0 0 2 33 5 0 16 0 32 36 0 18 3 48 0 17 1 16 1 52 3 0 1 33 5 0 16 0 32 16 0 18 4 16 0 16 1 52 5 0 1 52 4 0 2 49 1 50)} "list") :bytecode (51 0 0 0 0 0 1 0 2 0 3 1 0 17 0 5 16 0 52 1 0 0 49 1 50)} {:upvalue-count 5 :arity 0 :constants ("end" "list" def) :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 48 0 17 1 18 3 48 0 17 2 18 4 1 0 0 48 1 5 1 2 0 16 0 16 1 16 2 52 1 0 4 50)} {:upvalue-count 5 :arity 0 :constants ("end" "list" behavior) :bytecode (18 0 48 0 17 0 18 1 48 0 5 18 2 48 0 17 1 18 3 48 0 17 2 18 4 1 0 0 48 1 5 1 2 0 16 0 16 1 16 2 52 1 0 4 50)} {:upvalue-count 4 :arity 1 :constants ({:upvalue-count 5 :arity 1 :constants ("=" "local" "append" "list") :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 38 0 18 1 48 0 17 1 18 2 48 0 5 18 3 48 0 17 2 18 4 16 0 16 1 16 2 52 3 0 2 52 2 0 2 49 1 32 2 0 16 0 50)} "list") :bytecode (51 0 0 0 0 0 1 0 2 0 3 1 0 17 0 5 16 0 52 1 0 0 49 1 50)} {:upvalue-count 6 :arity 0 :constants ("=" "component" "paren-open" "paren-close" "into" "before" "after" "list" render) :bytecode (18 0 48 0 1 1 0 52 0 0 2 33 16 0 18 1 48 0 17 0 18 2 48 0 5 16 0 32 66 0 18 0 48 0 1 2 0 52 0 0 2 33 39 0 18 2 48 0 5 18 3 48 0 17 0 18 0 48 0 1 3 0 52 0 0 2 33 7 0 18 2 48 0 32 1 0 2 5 16 0 32 13 0 18 1 48 0 17 0 18 2 48 0 5 16 0 17 0 18 4 48 0 17 1 18 5 1 4 0 48 1 33 6 0 1 4 0 32 33 0 18 5 1 5 0 48 1 33 6 0 1 5 0 32 17 0 18 5 1 6 0 48 1 33 6 0 1 6 0 32 1 0 2 17 2 16 2 33 7 0 18 3 48 0 32 1 0 2 17 3 16 2 33 18 0 1 8 0 16 0 16 1 16 2 16 3 52 7 0 5 32 11 0 1 8 0 16 0 16 1 52 7 0 3 50)} {:upvalue-count 5 :arity 0 :constants ("get" "pos" {:upvalue-count 6 :arity 1 :constants ("=" "paren-open" "+" 1 "paren-close" 0 "get" "pos" "-") :bytecode (18 0 48 0 33 5 0 18 1 32 123 0 18 2 48 0 1 1 0 52 0 0 2 33 21 0 18 3 48 0 5 18 4 16 0 1 3 0 52 2 0 2 49 1 32 88 0 18 2 48 0 1 4 0 52 0 0 2 33 63 0 16 0 1 5 0 52 0 0 2 33 30 0 18 5 48 0 1 7 0 52 6 0 2 1 3 0 52 2 0 2 17 1 18 3 48 0 5 16 1 32 18 0 18 3 48 0 5 18 4 16 0 1 3 0 52 8 0 2 49 1 32 11 0 18 3 48 0 5 18 4 16 0 49 1 50)} 0 "substring") :bytecode (18 0 48 0 1 1 0 52 0 0 2 17 0 18 1 48 0 5 51 2 0 0 2 1 0 0 3 0 1 1 1 0 0 17 1 5 16 1 1 3 0 48 1 17 2 18 4 16 0 16 2 52 4 0 3 50)} {:upvalue-count 4 :arity 0 :constants ("list" sym "me" "=" "keyword" "then" "end" empty-target) :bytecode (18 0 48 0 33 13 0 1 1 0 1 2 0 52 0 0 2 32 63 0 18 1 48 0 1 4 0 52 3 0 2 6 33 28 0 5 18 2 48 0 1 5 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 6 0 52 3 0 2 33 13 0 1 1 0 1 2 0 52 0 0 2 32 4 0 18 3 48 0 17 0 1 7 0 16 0 52 0 0 2 50)} {:upvalue-count 2 :arity 0 :constants ("with" "list" swap!) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 18 0 48 0 17 1 1 2 0 16 0 16 1 52 1 0 3 50)} {:upvalue-count 4 :arity 0 :constants ("list" me "=" "keyword" "then" "end" open-element) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 60 0 18 1 48 0 1 3 0 52 2 0 2 6 33 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 0 0 2 50)} {:upvalue-count 4 :arity 0 :constants ("list" me "=" "keyword" "then" "end" close-element) :bytecode (18 0 48 0 33 10 0 1 1 0 52 0 0 1 32 60 0 18 1 48 0 1 3 0 52 2 0 2 6 33 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 10 0 1 1 0 52 0 0 1 32 4 0 18 3 48 0 17 0 1 6 0 16 0 52 0 0 2 50)} {:upvalue-count 43 :arity 0 :constants ("=" "keyword" "catch" "finally" "end" "else" "otherwise" "add" "remove" "toggle" "set" "put" "if" "wait" "send" "trigger" "log" "increment" "decrement" "hide" "show" "transition" "repeat" "fetch" "call" "take" "settle" "list" settle "go" "return" "throw" "append" "tell" "for" "make" "install" "measure" "render" "scroll" "select" "reset" "default" "halt" "focus" "empty" "clear" "swap" "open" "close" "break" break "continue" continue "exit" exit) :bytecode (18 0 48 0 17 0 18 1 48 0 17 1 16 0 1 1 0 52 0 0 2 6 33 66 0 5 16 1 1 2 0 52 0 0 2 6 34 52 0 5 16 1 1 3 0 52 0 0 2 6 34 38 0 5 16 1 1 4 0 52 0 0 2 6 34 24 0 5 16 1 1 5 0 52 0 0 2 6 34 10 0 5 16 1 1 6 0 52 0 0 2 33 4 0 2 32 166 6 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 7 0 52 0 0 2 33 12 0 18 2 48 0 5 18 3 49 0 32 128 6 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 8 0 52 0 0 2 33 12 0 18 2 48 0 5 18 4 49 0 32 90 6 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 9 0 52 0 0 2 33 12 0 18 2 48 0 5 18 5 49 0 32 52 6 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 10 0 52 0 0 2 33 12 0 18 2 48 0 5 18 6 49 0 32 14 6 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 11 0 52 0 0 2 33 12 0 18 2 48 0 5 18 7 49 0 32 232 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 12 0 52 0 0 2 33 12 0 18 2 48 0 5 18 8 49 0 32 194 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 13 0 52 0 0 2 33 12 0 18 2 48 0 5 18 9 49 0 32 156 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 14 0 52 0 0 2 33 12 0 18 2 48 0 5 18 10 49 0 32 118 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 15 0 52 0 0 2 33 12 0 18 2 48 0 5 18 11 49 0 32 80 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 16 0 52 0 0 2 33 12 0 18 2 48 0 5 18 12 49 0 32 42 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 17 0 52 0 0 2 33 12 0 18 2 48 0 5 18 13 49 0 32 4 5 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 18 0 52 0 0 2 33 12 0 18 2 48 0 5 18 14 49 0 32 222 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 19 0 52 0 0 2 33 12 0 18 2 48 0 5 18 15 49 0 32 184 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 20 0 52 0 0 2 33 12 0 18 2 48 0 5 18 16 49 0 32 146 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 21 0 52 0 0 2 33 12 0 18 2 48 0 5 18 17 49 0 32 108 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 22 0 52 0 0 2 33 12 0 18 2 48 0 5 18 18 49 0 32 70 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 23 0 52 0 0 2 33 12 0 18 2 48 0 5 18 19 49 0 32 32 4 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 24 0 52 0 0 2 33 12 0 18 2 48 0 5 18 20 49 0 32 250 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 25 0 52 0 0 2 33 12 0 18 2 48 0 5 18 21 49 0 32 212 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 26 0 52 0 0 2 33 15 0 18 2 48 0 5 1 28 0 52 27 0 1 32 171 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 29 0 52 0 0 2 33 12 0 18 2 48 0 5 18 22 49 0 32 133 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 30 0 52 0 0 2 33 12 0 18 2 48 0 5 18 23 49 0 32 95 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 31 0 52 0 0 2 33 12 0 18 2 48 0 5 18 24 49 0 32 57 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 32 0 52 0 0 2 33 12 0 18 2 48 0 5 18 25 49 0 32 19 3 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 33 0 52 0 0 2 33 12 0 18 2 48 0 5 18 26 49 0 32 237 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 34 0 52 0 0 2 33 12 0 18 2 48 0 5 18 27 49 0 32 199 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 35 0 52 0 0 2 33 12 0 18 2 48 0 5 18 28 49 0 32 161 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 36 0 52 0 0 2 33 12 0 18 2 48 0 5 18 29 49 0 32 123 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 37 0 52 0 0 2 33 12 0 18 2 48 0 5 18 30 49 0 32 85 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 38 0 52 0 0 2 33 12 0 18 2 48 0 5 18 31 49 0 32 47 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 39 0 52 0 0 2 33 12 0 18 2 48 0 5 18 32 49 0 32 9 2 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 40 0 52 0 0 2 33 12 0 18 2 48 0 5 18 33 49 0 32 227 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 41 0 52 0 0 2 33 12 0 18 2 48 0 5 18 34 49 0 32 189 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 42 0 52 0 0 2 33 12 0 18 2 48 0 5 18 35 49 0 32 151 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 43 0 52 0 0 2 33 12 0 18 2 48 0 5 18 36 49 0 32 113 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 44 0 52 0 0 2 33 12 0 18 2 48 0 5 18 37 49 0 32 75 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 45 0 52 0 0 2 33 12 0 18 2 48 0 5 18 38 49 0 32 37 1 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 46 0 52 0 0 2 33 12 0 18 2 48 0 5 18 38 49 0 32 255 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 47 0 52 0 0 2 33 12 0 18 2 48 0 5 18 39 49 0 32 217 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 48 0 52 0 0 2 33 12 0 18 2 48 0 5 18 40 49 0 32 179 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 49 0 52 0 0 2 33 12 0 18 2 48 0 5 18 41 49 0 32 141 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 50 0 52 0 0 2 33 15 0 18 2 48 0 5 1 51 0 52 27 0 1 32 100 0 16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 1 1 52 0 52 0 0 2 33 15 0 18 2 48 0 5 1 53 0 52 27 0 1 32 59 0 16 0 1 1 0 52 0 0 2 6 33 24 0 5 16 1 1 54 0 52 0 0 2 6 34 10 0 5 16 1 1 43 0 52 0 0 2 33 15 0 18 2 48 0 5 1 55 0 52 27 0 1 32 4 0 18 42 49 0 50)} {:upvalue-count 5 :arity 2 :constants ({:upvalue-count 0 :arity 1 :constants ("=" "add" "remove" "toggle" "set" "put" "if" "wait" "send" "trigger" "log" "increment" "decrement" "hide" "show" "transition" "repeat" "fetch" "call" "take" "settle" "go" "return" "throw" "append" "tell" "for" "make" "install" "measure" "render" "halt" "default" "scroll" "select" "reset" "focus" "empty" "clear" "swap" "open" "close") :bytecode (16 0 1 1 0 52 0 0 2 6 34 44 2 5 16 0 1 2 0 52 0 0 2 6 34 30 2 5 16 0 1 3 0 52 0 0 2 6 34 16 2 5 16 0 1 4 0 52 0 0 2 6 34 2 2 5 16 0 1 5 0 52 0 0 2 6 34 244 1 5 16 0 1 6 0 52 0 0 2 6 34 230 1 5 16 0 1 7 0 52 0 0 2 6 34 216 1 5 16 0 1 8 0 52 0 0 2 6 34 202 1 5 16 0 1 9 0 52 0 0 2 6 34 188 1 5 16 0 1 10 0 52 0 0 2 6 34 174 1 5 16 0 1 11 0 52 0 0 2 6 34 160 1 5 16 0 1 12 0 52 0 0 2 6 34 146 1 5 16 0 1 13 0 52 0 0 2 6 34 132 1 5 16 0 1 14 0 52 0 0 2 6 34 118 1 5 16 0 1 15 0 52 0 0 2 6 34 104 1 5 16 0 1 16 0 52 0 0 2 6 34 90 1 5 16 0 1 17 0 52 0 0 2 6 34 76 1 5 16 0 1 18 0 52 0 0 2 6 34 62 1 5 16 0 1 19 0 52 0 0 2 6 34 48 1 5 16 0 1 20 0 52 0 0 2 6 34 34 1 5 16 0 1 21 0 52 0 0 2 6 34 20 1 5 16 0 1 22 0 52 0 0 2 6 34 6 1 5 16 0 1 23 0 52 0 0 2 6 34 248 0 5 16 0 1 24 0 52 0 0 2 6 34 234 0 5 16 0 1 25 0 52 0 0 2 6 34 220 0 5 16 0 1 26 0 52 0 0 2 6 34 206 0 5 16 0 1 27 0 52 0 0 2 6 34 192 0 5 16 0 1 28 0 52 0 0 2 6 34 178 0 5 16 0 1 29 0 52 0 0 2 6 34 164 0 5 16 0 1 30 0 52 0 0 2 6 34 150 0 5 16 0 1 31 0 52 0 0 2 6 34 136 0 5 16 0 1 32 0 52 0 0 2 6 34 122 0 5 16 0 1 33 0 52 0 0 2 6 34 108 0 5 16 0 1 34 0 52 0 0 2 6 34 94 0 5 16 0 1 35 0 52 0 0 2 6 34 80 0 5 16 0 1 36 0 52 0 0 2 6 34 66 0 5 16 0 1 37 0 52 0 0 2 6 34 52 0 5 16 0 1 38 0 52 0 0 2 6 34 38 0 5 16 0 1 39 0 52 0 0 2 6 34 24 0 5 16 0 1 40 0 52 0 0 2 6 34 10 0 5 16 0 1 41 0 52 0 0 2 50)} {:upvalue-count 7 :arity 1 :constants ("nil?" "append" "list" "then" __then__ "not" "=" "keyword") :bytecode (18 0 48 0 17 1 16 1 52 0 0 1 33 5 0 16 0 32 95 0 16 0 16 1 52 2 0 1 52 1 0 2 17 2 18 1 1 3 0 48 1 33 20 0 18 2 16 2 1 4 0 52 2 0 1 52 1 0 2 49 1 32 51 0 18 3 48 0 52 5 0 1 6 33 25 0 5 18 4 48 0 1 7 0 52 6 0 2 6 33 9 0 5 18 5 18 6 48 0 48 1 33 9 0 18 2 16 2 49 1 32 2 0 16 2 50)} "list" "=" "len" 0 1 "first" "cons" do "filter" {:upvalue-count 0 :arity 1 :constants ("not" "=" __then__) :bytecode (16 0 1 2 0 52 1 0 2 52 0 0 1 50)}) :bytecode (51 0 0 17 0 5 51 1 0 0 0 0 1 1 1 0 2 0 3 1 0 0 4 17 1 5 16 1 52 2 0 0 48 1 17 2 16 2 52 4 0 1 1 5 0 52 3 0 2 33 4 0 2 32 41 0 16 2 52 4 0 1 1 6 0 52 3 0 2 33 9 0 16 2 52 7 0 1 32 16 0 1 9 0 51 11 0 16 2 52 10 0 2 52 8 0 2 50)} {:upvalue-count 7 :arity 0 :constants ("every" "=" "bracket-open" "bracket-close" "from" "catch" "list" "finally" "end" on "append" "filter") :bytecode (18 0 1 0 0 48 1 17 0 18 1 48 0 17 1 18 2 48 0 1 2 0 52 1 0 2 33 39 0 18 3 48 0 5 18 4 48 0 17 2 18 2 48 0 1 3 0 52 1 0 2 33 7 0 18 3 48 0 32 1 0 2 5 16 2 32 1 0 2 17 2 18 0 1 4 0 48 1 33 7 0 18 4 48 0 32 1 0 2 17 3 18 5 48 0 17 4 18 0 1 5 0 48 1 33 32 0 18 6 48 0 17 5 18 3 48 0 5 16 5 17 5 18 5 48 0 17 6 16 5 16 6 52 6 0 2 32 1 0 2 17 5 18 0 1 7 0 48 1 33 7 0 18 5 48 0 32 1 0 2 17 6 18 0 1 8 0 48 1 5 1 9 0 16 1 52 6 0 2 17 7 16 0 33 17 0 16 7 1 0 0 3 52 6 0 2 52 10 0 2 32 2 0 16 7 17 8 16 2 33 18 0 16 8 1 11 0 16 2 52 6 0 2 52 10 0 2 32 2 0 16 8 17 9 16 3 33 18 0 16 9 1 4 0 16 3 52 6 0 2 52 10 0 2 32 2 0 16 9 17 10 16 5 33 18 0 16 10 1 5 0 16 5 52 6 0 2 52 10 0 2 32 2 0 16 10 17 11 16 6 33 18 0 16 11 1 7 0 16 6 52 6 0 2 52 10 0 2 32 2 0 16 11 17 12 16 12 16 4 52 6 0 1 52 10 0 2 17 13 16 13 50)} {:upvalue-count 2 :arity 0 :constants ("end" "list" init) :bytecode (18 0 48 0 17 0 18 1 1 0 0 48 1 5 1 2 0 16 0 52 1 0 2 50)} {:upvalue-count 7 :arity 0 :constants ("=" "on" "init" "def" "behavior") :bytecode (18 0 48 0 17 0 16 0 1 1 0 52 0 0 2 33 12 0 18 1 48 0 5 18 2 49 0 32 76 0 16 0 1 2 0 52 0 0 2 33 12 0 18 1 48 0 5 18 3 49 0 32 52 0 16 0 1 3 0 52 0 0 2 33 12 0 18 1 48 0 5 18 4 49 0 32 28 0 16 0 1 4 0 52 0 0 2 33 12 0 18 1 48 0 5 18 5 49 0 32 4 0 18 6 49 0 50)} {:upvalue-count 3 :arity 1 :constants ("nil?" "append" "list") :bytecode (18 0 48 0 33 5 0 16 0 32 36 0 18 1 48 0 17 1 16 1 52 0 0 1 33 5 0 16 0 32 16 0 18 2 16 0 16 1 52 2 0 1 52 1 0 2 49 1 50)} "list" "=" 1 "first" "cons" do) :bytecode (1 0 0 17 2 16 0 52 1 0 1 17 3 51 2 0 1 2 1 3 1 0 17 4 5 51 3 0 1 4 17 5 5 51 4 0 1 4 17 6 5 51 5 0 1 0 1 2 17 7 5 51 6 0 1 2 1 3 1 5 17 8 5 51 7 0 1 5 1 6 1 7 17 9 5 51 8 0 1 9 1 2 17 10 5 51 9 0 17 11 5 51 10 0 1 5 1 6 1 7 1 13 17 12 5 51 11 0 1 5 1 8 1 6 1 7 1 13 1 42 17 13 5 51 12 0 1 5 1 6 1 7 17 14 5 51 13 0 1 5 1 6 1 7 1 9 1 21 17 15 5 51 14 0 1 5 1 6 1 7 1 11 1 21 1 69 1 47 1 12 1 14 1 15 1 8 1 2 1 0 1 48 1 16 1 9 1 42 17 16 5 51 15 0 1 5 1 6 1 7 1 12 1 13 1 42 1 21 1 17 17 17 5 51 16 0 1 5 1 6 1 7 1 21 1 9 1 16 1 8 17 18 5 51 17 0 1 9 1 18 1 46 1 17 1 16 1 19 17 19 5 51 18 0 1 9 1 19 1 18 1 46 1 17 1 16 1 20 17 20 5 51 19 0 1 16 1 5 1 6 1 7 1 17 1 46 1 18 1 19 1 20 17 21 5 51 20 0 1 9 1 21 17 22 5 51 21 0 1 5 1 7 1 9 1 21 1 8 1 6 17 23 5 51 22 0 1 5 1 7 1 9 1 21 1 6 17 24 5 51 23 0 1 9 1 5 1 6 1 7 1 10 1 22 1 21 1 16 1 47 17 25 5 51 24 0 1 21 1 9 1 2 17 26 5 51 25 0 1 21 1 9 1 10 1 2 17 27 5 51 26 0 1 21 1 9 1 75 17 28 5 51 27 0 1 9 1 6 1 7 1 21 1 5 1 11 17 29 5 51 28 0 1 7 1 5 1 8 1 21 17 30 5 51 29 0 1 7 1 8 1 5 1 6 17 31 5 51 30 0 1 31 1 5 1 30 1 22 17 32 5 51 31 0 1 7 1 22 17 33 5 51 32 0 1 21 17 34 5 51 33 0 1 21 1 9 1 22 17 35 5 51 34 0 1 21 1 9 1 22 17 36 5 51 35 0 1 8 1 5 1 6 1 21 1 9 1 7 17 37 5 51 36 0 1 8 1 5 1 6 1 21 1 9 1 7 17 38 5 51 37 0 1 5 1 6 1 7 1 16 1 9 1 21 1 10 1 8 17 39 5 51 38 0 1 5 1 6 1 7 1 53 1 21 1 75 1 9 17 40 5 51 39 0 1 5 1 6 1 7 1 8 1 46 1 17 1 16 1 9 1 21 17 41 5 51 40 0 1 7 1 5 1 8 1 21 17 42 5 51 41 0 1 7 1 5 1 42 17 43 5 51 42 0 1 5 1 6 1 7 1 9 1 21 17 44 5 51 43 0 1 9 1 21 17 45 5 51 44 0 1 5 1 6 1 7 1 16 1 17 1 46 17 46 5 51 45 0 1 5 1 6 1 7 1 9 1 21 1 15 1 14 1 16 17 47 5 51 46 0 1 5 1 8 1 7 1 21 17 48 5 51 47 0 1 8 1 5 1 6 1 21 17 49 5 51 48 0 1 21 17 50 5 51 49 0 1 21 1 9 17 51 5 51 50 0 1 21 1 9 1 75 17 52 5 51 51 0 1 6 1 7 1 10 1 21 1 9 1 75 17 53 5 51 52 0 1 6 1 7 1 9 17 54 5 51 53 0 1 6 1 7 1 5 1 42 17 55 5 51 54 0 1 21 17 56 5 51 55 0 1 8 1 5 1 6 1 21 1 9 17 57 5 51 56 0 1 8 1 5 1 6 1 21 17 58 5 51 57 0 1 8 1 5 1 6 1 21 17 59 5 51 58 0 1 21 1 10 17 60 5 51 59 0 1 9 1 6 1 7 17 61 5 51 60 0 1 5 1 42 17 62 5 51 61 0 1 8 1 5 1 6 1 21 17 63 5 51 62 0 1 8 1 5 1 6 1 78 17 64 5 51 63 0 1 6 1 7 1 62 1 75 1 9 17 65 5 51 64 0 1 6 1 7 1 62 1 64 1 9 17 66 5 51 65 0 1 5 1 6 1 7 1 21 17 67 5 51 66 0 1 5 1 6 1 7 1 21 1 67 1 9 17 68 5 51 67 0 1 4 1 7 1 8 1 5 1 1 17 69 5 51 68 0 1 8 1 5 1 6 1 21 17 70 5 51 69 0 1 21 1 9 17 71 5 51 70 0 1 8 1 5 1 6 1 21 17 72 5 51 71 0 1 8 1 5 1 6 1 21 17 73 5 51 72 0 1 5 1 6 1 7 1 23 1 24 1 25 1 26 1 27 1 28 1 29 1 32 1 33 1 34 1 35 1 36 1 37 1 38 1 39 1 40 1 41 1 43 1 44 1 45 1 49 1 50 1 51 1 52 1 53 1 54 1 55 1 56 1 68 1 57 1 58 1 59 1 60 1 61 1 63 1 70 1 71 1 72 1 73 1 21 17 74 5 51 73 0 1 74 1 9 1 8 1 5 1 6 17 75 5 51 74 0 1 9 1 31 1 5 1 7 1 21 1 75 1 6 17 76 5 51 75 0 1 75 1 9 17 77 5 51 76 0 1 6 1 7 1 76 1 77 1 65 1 66 1 75 17 78 5 51 77 0 1 8 1 78 1 79 17 79 5 16 79 52 78 0 0 48 1 17 80 16 80 52 1 0 1 1 80 0 52 79 0 2 33 9 0 16 80 52 81 0 1 32 9 0 1 83 0 16 80 52 82 0 2 50)} "hs-compile" {:upvalue-count 0 :arity 1 :constants ("hs-parse" "hs-tokenize") :bytecode (20 0 0 20 1 0 16 0 48 1 16 0 49 2 50)}) :bytecode (51 1 0 128 0 0 5 51 3 0 128 2 0 50))) diff --git a/shared/static/wasm/sx/hs-runtime.sx b/shared/static/wasm/sx/hs-runtime.sx index 27962e61..8ccdf9a3 100644 --- a/shared/static/wasm/sx/hs-runtime.sx +++ b/shared/static/wasm/sx/hs-runtime.sx @@ -99,6 +99,39 @@ ;; ── Navigation / traversal ────────────────────────────────────── ;; Navigate to a URL. +(define + hs-toggle-style-between! + (fn + (target prop val1 val2) + (let + ((cur (dom-get-style target prop))) + (if + (= cur val1) + (dom-set-style target prop val2) + (dom-set-style target prop val1))))) + +;; Find next sibling matching a selector (or any sibling). +(define + hs-toggle-style-cycle! + (fn + (target prop vals) + (let + ((cur (dom-get-style target prop))) + (define + find-next + (fn + (remaining) + (cond + ((empty? remaining) (first vals)) + ((= cur (first remaining)) + (if + (empty? (rest remaining)) + (first vals) + (first (rest remaining)))) + (true (find-next (rest remaining)))))) + (dom-set-style target prop (find-next vals))))) + +;; Find previous sibling matching a selector. (define hs-take! (fn @@ -122,20 +155,29 @@ (dom-set-attr target name attr-val) (dom-set-attr target name "")))))))) -;; Find next sibling matching a selector (or any sibling). +;; First element matching selector within a scope. (define hs-put! (fn (value pos target) (cond - ((= pos "into") (dom-set-inner-html target value)) + ((= pos "into") + (if (list? target) target (dom-set-inner-html target value))) ((= pos "before") (dom-insert-adjacent-html target "beforebegin" value)) ((= pos "after") (dom-insert-adjacent-html target "afterend" value)) - ((= pos "start") (dom-insert-adjacent-html target "afterbegin" value)) - ((= pos "end") (dom-insert-adjacent-html target "beforeend" value))))) + ((= pos "start") + (if + (list? target) + (append! target value 0) + (dom-insert-adjacent-html target "afterbegin" value))) + ((= pos "end") + (if + (list? target) + (append! target value) + (dom-insert-adjacent-html target "beforeend" value)))))) -;; Find previous sibling matching a selector. +;; Last element matching selector. (define hs-add-to! (fn @@ -145,7 +187,7 @@ (append target (list value)) (host-call target "push" value)))) -;; First element matching selector within a scope. +;; First/last within a specific scope. (define hs-remove-from! (fn @@ -155,16 +197,18 @@ (filter (fn (x) (not (= x value))) target) (host-call target "splice" (host-call target "indexOf" value) 1)))) -;; Last element matching selector. (define hs-set-on! (fn (props target) (for-each (fn (k) (host-set! target k (get props k))) (keys props)))) -;; First/last within a specific scope. +;; ── Iteration ─────────────────────────────────────────────────── + +;; Repeat a thunk N times. (define hs-navigate! (fn (url) (perform (list (quote io-navigate) url)))) +;; Repeat forever (until break — relies on exception/continuation). (define hs-scroll! (fn @@ -177,31 +221,41 @@ ((= position "bottom") (dict :block "end")) (true (dict :block "start"))))))) -;; ── Iteration ─────────────────────────────────────────────────── +;; ── Fetch ─────────────────────────────────────────────────────── -;; Repeat a thunk N times. +;; Fetch a URL, parse response according to format. +;; (hs-fetch url format) — format is "json" | "text" | "html" (define hs-halt! (fn (mode) (when event - (host-call event "preventDefault" (list)) - (when (= mode "event") (host-call event "stopPropagation" (list)))))) - -;; Repeat forever (until break — relies on exception/continuation). -(define hs-select! (fn (target) (host-call target "select" (list)))) - -;; ── Fetch ─────────────────────────────────────────────────────── - -;; Fetch a URL, parse response according to format. -;; (hs-fetch url format) — format is "json" | "text" | "html" -(define hs-reset! (fn (target) (host-call target "reset" (list)))) + (cond + ((= mode "default") (host-call event "preventDefault")) + ((= mode "bubbling") (host-call event "stopPropagation")) + (true + (do + (host-call event "preventDefault") + (host-call event "stopPropagation"))))))) ;; ── Type coercion ─────────────────────────────────────────────── ;; Coerce a value to a type by name. ;; (hs-coerce value type-name) — type-name is "Int", "Float", "String", etc. +(define hs-select! (fn (target) (host-call target "select" (list)))) + +;; ── Object creation ───────────────────────────────────────────── + +;; Make a new object of a given type. +;; (hs-make type-name) — creates empty object/collection +(define hs-reset! (fn (target) (host-call target "reset" (list)))) + +;; ── Behavior installation ─────────────────────────────────────── + +;; Install a behavior on an element. +;; A behavior is a function that takes (me ...params) and sets up features. +;; (hs-install behavior-fn me ...args) (define hs-next (fn @@ -221,10 +275,10 @@ (true (find-next (dom-next-sibling el)))))) (find-next sibling))))) -;; ── Object creation ───────────────────────────────────────────── +;; ── Measurement ───────────────────────────────────────────────── -;; Make a new object of a given type. -;; (hs-make type-name) — creates empty object/collection +;; Measure an element's bounding rect, store as local variables. +;; Returns a dict with x, y, width, height, top, left, right, bottom. (define hs-previous (fn @@ -244,27 +298,18 @@ (true (find-prev (dom-get-prop el "previousElementSibling")))))) (find-prev sibling))))) -;; ── Behavior installation ─────────────────────────────────────── - -;; Install a behavior on an element. -;; A behavior is a function that takes (me ...params) and sets up features. -;; (hs-install behavior-fn me ...args) -(define - hs-query-all - (fn (sel) (host-call (dom-body) "querySelectorAll" sel))) - -;; ── Measurement ───────────────────────────────────────────────── - -;; Measure an element's bounding rect, store as local variables. -;; Returns a dict with x, y, width, height, top, left, right, bottom. -(define - hs-query-first - (fn (sel) (host-call (host-global "document") "querySelector" sel))) - ;; ── Transition ────────────────────────────────────────────────── ;; Transition a CSS property to a value, optionally with duration. ;; (hs-transition target prop value duration) +(define + hs-query-all + (fn (sel) (host-call (dom-body) "querySelectorAll" sel))) + +(define + hs-query-first + (fn (sel) (host-call (host-global "document") "querySelector" sel))) + (define hs-query-last (fn @@ -289,21 +334,95 @@ (n thunk) (define do-repeat - (fn (i) (when (< i n) (do (thunk) (do-repeat (+ i 1)))))) + (fn + (i) + (when + (< i n) + (let + ((signal (guard (e ((or (= (str e) "hs-break") (= (str e) "hs-continue")) (str e)) (true (raise e))) (do (thunk) nil)))) + (cond + ((= signal "hs-break") nil) + ((= signal "hs-continue") (do-repeat (+ i 1))) + (true (do-repeat (+ i 1)))))))) (do-repeat 0))) (define hs-repeat-forever (fn (thunk) - (define do-forever (fn () (thunk) (do-forever))) + (define + do-forever + (fn + () + (let + ((signal (guard (e ((or (= (str e) "hs-break") (= (str e) "hs-continue")) (str e)) (true (raise e))) (do (thunk) nil)))) + (cond + ((= signal "hs-break") nil) + ((= signal "hs-continue") (do-forever)) + (true (do-forever)))))) (do-forever))) (define hs-repeat-while (fn (cond-fn thunk) - (when (cond-fn) (thunk) (hs-repeat-while cond-fn thunk)))) + (when + (cond-fn) + (let + ((signal (guard (e ((or (= (str e) "hs-break") (= (str e) "hs-continue")) (str e)) (true (raise e))) (do (thunk) nil)))) + (cond + ((= signal "hs-break") nil) + ((= signal "hs-continue") (hs-repeat-while cond-fn thunk)) + (true (hs-repeat-while cond-fn thunk))))))) + +(define + hs-repeat-until + (fn + (cond-fn thunk) + (let + ((signal (guard (e ((or (= (str e) "hs-break") (= (str e) "hs-continue")) (str e)) (true (raise e))) (do (thunk) nil)))) + (cond + ((= signal "hs-break") nil) + ((= signal "hs-continue") + (if (cond-fn) nil (hs-repeat-until cond-fn thunk))) + (true (if (cond-fn) nil (hs-repeat-until cond-fn thunk))))))) + +(define + hs-for-each + (fn + (fn-body collection) + (let + ((items (cond ((list? collection) collection) ((dict? collection) (keys collection)) ((nil? collection) (list)) (true (list))))) + (define + do-loop + (fn + (remaining) + (when + (not (empty? remaining)) + (let + ((signal (guard (e ((or (= (str e) "hs-break") (= (str e) "hs-continue")) (str e)) (true (raise e))) (do (fn-body (first remaining)) nil)))) + (cond + ((= signal "hs-break") nil) + ((= signal "hs-continue") (do-loop (rest remaining))) + (true (do-loop (rest remaining)))))))) + (do-loop items)))) + +(begin + (define + hs-append + (fn + (target value) + (cond + ((string? target) (str target value)) + ((list? target) (append target (list value))) + (true (str target value))))) + (define + hs-append! + (fn (value target) (dom-insert-adjacent-html target "beforeend" value)))) + + + + (define hs-fetch @@ -399,7 +518,8 @@ (map (fn (k) (list k (get value k))) (keys value)) value)) (true value)))) - +;; ── Sandbox/test runtime additions ────────────────────────────── +;; Property access — dot notation and .length (define hs-add (fn @@ -409,7 +529,7 @@ ((list? b) (cons a b)) ((or (string? a) (string? b)) (str a b)) (true (+ a b))))) - +;; DOM query stub — sandbox returns empty list (define hs-make (fn @@ -420,17 +540,15 @@ ((= type-name "Set") (list)) ((= type-name "Map") (dict)) (true (dict))))) - +;; Method dispatch — obj.method(args) (define hs-install (fn (behavior-fn) (behavior-fn me))) - - - - +;; ── 0.9.90 features ───────────────────────────────────────────── +;; beep! — debug logging, returns value unchanged (define hs-measure (fn (target) (perform (list (quote io-measure) target)))) - +;; Property-based is — check obj.key truthiness (define hs-transition (fn @@ -443,8 +561,7 @@ (str prop " " (/ duration 1000) "s"))) (dom-set-style target prop value) (when duration (hs-settle target)))) -;; ── Sandbox/test runtime additions ────────────────────────────── -;; Property access — dot notation and .length +;; Array slicing (inclusive both ends) (define hs-transition-from (fn @@ -458,7 +575,7 @@ (str prop " " (/ duration 1000) "s"))) (dom-set-style target prop (str to-val)) (when duration (hs-settle target)))) -;; DOM query stub — sandbox returns empty list +;; Collection: sorted by (define hs-type-check (fn @@ -478,33 +595,31 @@ (= (host-typeof value) "element") (= (host-typeof value) "text"))) (true (= (host-typeof value) (downcase type-name))))))) -;; Method dispatch — obj.method(args) +;; Collection: sorted by descending (define hs-type-check-strict (fn (value type-name) (if (nil? value) false (hs-type-check value type-name)))) - -;; ── 0.9.90 features ───────────────────────────────────────────── -;; beep! — debug logging, returns value unchanged +;; Collection: split by (define hs-strict-eq (fn (a b) (and (= (type-of a) (type-of b)) (= a b)))) -;; Property-based is — check obj.key truthiness +;; Collection: joined by (define hs-eq-ignore-case (fn (a b) (= (downcase (str a)) (downcase (str b))))) -;; Array slicing (inclusive both ends) + (define hs-starts-with-ic? (fn (str prefix) (starts-with? (downcase str) (downcase prefix)))) -;; Collection: sorted by + (define hs-contains-ignore-case? (fn (haystack needle) (contains? (downcase (str haystack)) (downcase (str needle))))) -;; Collection: sorted by descending + (define hs-falsy? (fn @@ -516,7 +631,7 @@ ((and (list? v) (= (len v) 0)) true) ((= v 0) true) (true false)))) -;; Collection: split by + (define hs-matches? (fn @@ -527,7 +642,7 @@ ((= (host-typeof target) "element") (if (string? pattern) (host-call target "matches" pattern) false)) (true false)))) -;; Collection: joined by + (define hs-contains? (fn diff --git a/shared/static/wasm/sx/hs-runtime.sxbc b/shared/static/wasm/sx/hs-runtime.sxbc index 2c942f43..b0535f59 100644 --- a/shared/static/wasm/sx/hs-runtime.sxbc +++ b/shared/static/wasm/sx/hs-runtime.sxbc @@ -1,3 +1,3 @@ -(sxbc 1 "999c32d583e8f902" +(sxbc 1 "d0fcc22cbe0ba27f" (code - :constants ("hs-each" {:upvalue-count 0 :arity 2 :constants ("list?" "for-each") :bytecode (16 0 52 0 0 1 33 11 0 16 1 16 0 52 1 0 2 32 6 0 16 1 16 0 49 1 50)} "hs-on" {:upvalue-count 0 :arity 3 :constants ("dom-listen") :bytecode (20 0 0 16 0 16 1 16 2 49 3 50)} "hs-on-every" "hs-init" {:upvalue-count 0 :arity 1 :constants () :bytecode (16 0 49 0 50)} "hs-wait" {:upvalue-count 0 :arity 1 :constants ("list" io-sleep) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-wait-for" {:upvalue-count 0 :arity 2 :constants ("list" io-wait-event) :bytecode (1 1 0 16 0 16 1 52 0 0 3 112 50)} "hs-settle" {:upvalue-count 0 :arity 1 :constants ("list" io-settle) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-toggle-class!" {:upvalue-count 0 :arity 2 :constants ("host-call" "host-get" "classList" "toggle") :bytecode (16 0 1 2 0 52 1 0 2 1 3 0 16 1 52 0 0 3 50)} "hs-toggle-between!" {:upvalue-count 0 :arity 3 :constants ("dom-has-class?" "dom-remove-class" "dom-add-class") :bytecode (20 0 0 16 0 16 1 48 2 33 22 0 20 1 0 16 0 16 1 48 2 5 20 2 0 16 0 16 2 49 2 32 19 0 20 1 0 16 0 16 2 48 2 5 20 2 0 16 0 16 1 49 2 50)} "hs-toggle-style!" {:upvalue-count 0 :arity 2 :constants ("dom-get-style" "=" "visibility" "hidden" "dom-set-style" "visible" "display" "opacity" "none" "0" "1" "") :bytecode (20 0 0 16 0 16 1 48 2 17 2 16 1 1 2 0 52 1 0 2 33 42 0 16 2 1 3 0 52 1 0 2 33 15 0 20 4 0 16 0 16 1 1 5 0 49 3 32 12 0 20 4 0 16 0 16 1 1 3 0 49 3 32 169 0 16 1 1 6 0 52 1 0 2 6 34 10 0 5 16 1 1 7 0 52 1 0 2 33 92 0 16 2 1 8 0 52 1 0 2 6 34 10 0 5 16 2 1 9 0 52 1 0 2 33 33 0 20 4 0 16 0 16 1 16 1 1 7 0 52 1 0 2 33 6 0 1 10 0 32 3 0 1 11 0 49 3 32 30 0 20 4 0 16 0 16 1 16 1 1 6 0 52 1 0 2 33 6 0 1 8 0 32 3 0 1 9 0 49 3 32 51 0 16 2 1 11 0 52 1 0 2 6 34 8 0 5 16 2 2 52 1 0 2 33 15 0 20 4 0 16 0 16 1 1 3 0 49 3 32 12 0 20 4 0 16 0 16 1 1 11 0 49 3 50)} "hs-take!" {:upvalue-count 0 :arity 5 :constants ("list?" "list" "dom-parent" "dom-child-list" "=" "class" "for-each" {:upvalue-count 1 :arity 1 :constants ("dom-remove-class") :bytecode (20 0 0 16 0 18 0 49 2 50)} "dom-add-class" ">" "len" 0 "first" 1 "nth" {:upvalue-count 2 :arity 1 :constants ("dom-set-attr") :bytecode (20 0 0 16 0 18 0 18 1 49 3 50)} "dom-set-attr" "") :rest-arity 4 :bytecode (16 3 33 23 0 16 3 52 0 0 1 33 5 0 16 3 32 6 0 16 3 52 1 0 1 32 28 0 20 2 0 16 0 48 1 17 5 16 5 33 10 0 20 3 0 16 5 48 1 32 4 0 52 1 0 0 17 5 16 1 1 5 0 52 4 0 2 33 24 0 51 7 0 1 2 16 5 52 6 0 2 5 20 8 0 16 0 16 2 49 2 32 113 0 16 4 52 10 0 1 1 11 0 52 9 0 2 33 9 0 16 4 52 12 0 1 32 1 0 2 17 6 16 4 52 10 0 1 1 13 0 52 9 0 2 33 12 0 16 4 1 13 0 52 14 0 2 32 1 0 2 17 7 16 7 33 16 0 51 15 0 1 2 1 7 16 5 52 6 0 2 32 1 0 2 5 16 6 33 14 0 20 16 0 16 0 16 2 16 6 49 3 32 12 0 20 16 0 16 0 16 2 1 17 0 49 3 50)} "hs-put!" {:upvalue-count 0 :arity 3 :constants ("=" "into" "dom-set-inner-html" "before" "dom-insert-adjacent-html" "beforebegin" "after" "afterend" "start" "afterbegin" "end" "beforeend") :bytecode (16 1 1 1 0 52 0 0 2 33 12 0 20 2 0 16 2 16 0 49 2 32 109 0 16 1 1 3 0 52 0 0 2 33 15 0 20 4 0 16 2 1 5 0 16 0 49 3 32 82 0 16 1 1 6 0 52 0 0 2 33 15 0 20 4 0 16 2 1 7 0 16 0 49 3 32 55 0 16 1 1 8 0 52 0 0 2 33 15 0 20 4 0 16 2 1 9 0 16 0 49 3 32 28 0 16 1 1 10 0 52 0 0 2 33 15 0 20 4 0 16 2 1 11 0 16 0 49 3 32 1 0 2 50)} "hs-navigate!" {:upvalue-count 0 :arity 1 :constants ("list" io-navigate) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-scroll!" {:upvalue-count 0 :arity 2 :constants ("host-call" "scrollIntoView" "list" "=" "bottom" "dict" "block" "end" "start") :bytecode (16 0 1 1 0 16 1 1 4 0 52 3 0 2 33 13 0 1 6 0 1 7 0 52 5 0 2 32 10 0 1 6 0 1 8 0 52 5 0 2 52 2 0 1 52 0 0 3 50)} "hs-halt!" {:upvalue-count 0 :arity 1 :constants ("event" "host-call" "preventDefault" "list" "=" "stopPropagation") :bytecode (20 0 0 33 48 0 20 0 0 1 2 0 52 3 0 0 52 1 0 3 5 16 0 1 0 0 52 4 0 2 33 17 0 20 0 0 1 5 0 52 3 0 0 52 1 0 3 32 1 0 2 32 1 0 2 50)} "hs-select!" {:upvalue-count 0 :arity 1 :constants ("host-call" "select" "list") :bytecode (16 0 1 1 0 52 2 0 0 52 0 0 3 50)} "hs-reset!" {:upvalue-count 0 :arity 1 :constants ("host-call" "reset" "list") :bytecode (16 0 1 1 0 52 2 0 0 52 0 0 3 50)} "hs-next" {:upvalue-count 0 :arity 2 :constants ("=" "*" "dom-next-sibling" {:upvalue-count 2 :arity 1 :constants ("nil?" "dom-matches?" "dom-next-sibling") :bytecode (16 0 52 0 0 1 33 4 0 2 32 28 0 20 1 0 16 0 18 0 48 2 33 5 0 16 0 32 11 0 18 1 20 2 0 16 0 48 1 49 1 50)}) :bytecode (16 1 1 1 0 52 0 0 2 33 10 0 20 2 0 16 0 49 1 32 25 0 20 2 0 16 0 48 1 17 2 51 3 0 1 1 1 3 17 3 5 16 3 16 2 49 1 50)} "hs-previous" {:upvalue-count 0 :arity 2 :constants ("=" "*" "dom-get-prop" "previousElementSibling" {:upvalue-count 2 :arity 1 :constants ("nil?" "dom-matches?" "dom-get-prop" "previousElementSibling") :bytecode (16 0 52 0 0 1 33 4 0 2 32 31 0 20 1 0 16 0 18 0 48 2 33 5 0 16 0 32 14 0 18 1 20 2 0 16 0 1 3 0 48 2 49 1 50)}) :bytecode (16 1 1 1 0 52 0 0 2 33 13 0 20 2 0 16 0 1 3 0 49 2 32 28 0 20 2 0 16 0 1 3 0 48 2 17 2 51 4 0 1 1 1 3 17 3 5 16 3 16 2 49 1 50)} "hs-query-all" {:upvalue-count 0 :arity 1 :constants ("host-call" "dom-body" "querySelectorAll") :bytecode (20 1 0 48 0 1 2 0 16 0 52 0 0 3 50)} "hs-query-first" {:upvalue-count 0 :arity 1 :constants ("host-call" "host-global" "document" "querySelector") :bytecode (1 2 0 52 1 0 1 1 3 0 16 0 52 0 0 3 50)} "hs-query-last" {:upvalue-count 0 :arity 1 :constants ("dom-query-all" "dom-body" ">" "len" 0 "nth" "-" 1) :bytecode (20 0 0 20 1 0 48 0 16 0 48 2 17 1 16 1 52 3 0 1 1 4 0 52 2 0 2 33 22 0 16 1 16 1 52 3 0 1 1 7 0 52 6 0 2 52 5 0 2 32 1 0 2 50)} "hs-first" {:upvalue-count 0 :arity 2 :constants ("dom-query-all") :bytecode (20 0 0 16 0 16 1 49 2 50)} "hs-last" {:upvalue-count 0 :arity 2 :constants ("dom-query-all" ">" "len" 0 "nth" "-" 1) :bytecode (20 0 0 16 0 16 1 48 2 17 2 16 2 52 2 0 1 1 3 0 52 1 0 2 33 22 0 16 2 16 2 52 2 0 1 1 6 0 52 5 0 2 52 4 0 2 32 1 0 2 50)} "hs-repeat-times" {:upvalue-count 0 :arity 3 :constants ({:upvalue-count 3 :arity 1 :constants ("<" "+" 1) :bytecode (16 0 18 0 52 0 0 2 33 21 0 18 1 48 0 5 18 2 16 0 1 2 0 52 1 0 2 49 1 32 1 0 2 50)} 0) :bytecode (51 0 0 1 0 1 1 1 2 17 2 5 16 2 1 1 0 49 1 50)} "hs-repeat-forever" {:upvalue-count 0 :arity 2 :constants ({:upvalue-count 2 :arity 0 :constants () :bytecode (18 0 48 0 5 18 1 49 0 50)}) :bytecode (51 0 0 1 0 1 1 17 1 5 16 1 49 0 50)} "hs-repeat-while" {:upvalue-count 0 :arity 2 :constants ("hs-repeat-while") :bytecode (16 0 48 0 33 17 0 16 1 48 0 5 20 0 0 16 0 16 1 49 2 32 1 0 2 50)} "hs-fetch" {:upvalue-count 0 :arity 2 :constants ("list" "io-fetch" "text") :bytecode (1 1 0 16 0 16 1 33 5 0 16 1 32 3 0 1 2 0 52 0 0 3 112 50)} "hs-coerce" {:upvalue-count 0 :arity 2 :constants ("=" "Int" "floor" "+" 0 "Integer" "Float" "Number" "String" "str" "Bool" "not" "hs-falsy?" "Boolean" "Array" "list?" "list" "HTML" "JSON" "string?" "host-call" "host-global" "stringify" "Object" "parse" "Fixed" "Fixed:" ">" "string-length" 6 "substring" "**" 10 "/" "*" 0.5 "Selector" "Fragment" "Values" "dict?" "map" {:upvalue-count 1 :arity 1 :constants ("get") :bytecode (18 0 16 0 52 0 0 2 50)} "keys" "Keys" "Entries" {:upvalue-count 1 :arity 1 :constants ("list" "get") :bytecode (16 0 18 0 16 0 52 1 0 2 52 0 0 2 50)} "Reversed" "reverse" "Unique" "reduce" {:upvalue-count 0 :arity 2 :constants ("some" {:upvalue-count 1 :arity 1 :constants ("=") :bytecode (16 0 18 0 52 0 0 2 50)} "append" "list") :bytecode (51 1 0 1 1 16 0 52 0 0 2 33 5 0 16 0 32 12 0 16 0 16 1 52 3 0 1 52 2 0 2 50)} "Flattened" "Flat" {:upvalue-count 0 :arity 2 :constants ("list?" "append" "list") :bytecode (16 1 52 0 0 1 33 11 0 16 0 16 1 52 1 0 2 32 12 0 16 0 16 1 52 2 0 1 52 1 0 2 50)} "Set" "Map") :bytecode (16 1 1 1 0 52 0 0 2 33 16 0 16 0 1 4 0 52 3 0 2 52 2 0 1 32 61 3 16 1 1 5 0 52 0 0 2 33 16 0 16 0 1 4 0 52 3 0 2 52 2 0 1 32 33 3 16 1 1 6 0 52 0 0 2 33 12 0 16 0 1 4 0 52 3 0 2 32 9 3 16 1 1 7 0 52 0 0 2 33 12 0 16 0 1 4 0 52 3 0 2 32 241 2 16 1 1 8 0 52 0 0 2 33 9 0 16 0 52 9 0 1 32 220 2 16 1 1 10 0 52 0 0 2 33 14 0 20 12 0 16 0 48 1 52 11 0 1 32 194 2 16 1 1 13 0 52 0 0 2 33 14 0 20 12 0 16 0 48 1 52 11 0 1 32 168 2 16 1 1 14 0 52 0 0 2 33 23 0 16 0 52 15 0 1 33 5 0 16 0 32 6 0 16 0 52 16 0 1 32 133 2 16 1 1 17 0 52 0 0 2 33 9 0 16 0 52 9 0 1 32 112 2 16 1 1 18 0 52 0 0 2 33 33 0 16 0 52 19 0 1 33 5 0 16 0 32 16 0 1 18 0 52 21 0 1 1 22 0 16 0 52 20 0 3 32 67 2 16 1 1 23 0 52 0 0 2 33 33 0 16 0 52 19 0 1 33 19 0 1 18 0 52 21 0 1 1 24 0 16 0 52 20 0 3 32 2 0 16 0 32 22 2 16 1 1 25 0 52 0 0 2 6 34 10 0 5 16 1 1 26 0 52 0 0 2 33 126 0 16 1 52 28 0 1 1 29 0 52 27 0 2 33 25 0 16 1 1 29 0 16 1 52 28 0 1 52 30 0 3 1 4 0 52 3 0 2 32 3 0 1 4 0 17 2 16 0 1 4 0 52 3 0 2 17 3 16 2 1 4 0 52 0 0 2 33 13 0 16 3 52 2 0 1 52 9 0 1 32 41 0 20 31 0 1 32 0 16 2 48 2 17 4 16 3 16 4 52 34 0 2 1 35 0 52 3 0 2 52 2 0 1 16 4 52 33 0 2 52 9 0 1 32 126 1 16 1 1 36 0 52 0 0 2 33 9 0 16 0 52 9 0 1 32 105 1 16 1 1 37 0 52 0 0 2 33 5 0 16 0 32 88 1 16 1 1 38 0 52 0 0 2 33 32 0 16 0 52 39 0 1 33 18 0 51 41 0 1 0 16 0 52 42 0 1 52 40 0 2 32 2 0 16 0 32 44 1 16 1 1 43 0 52 0 0 2 33 23 0 16 0 52 39 0 1 33 9 0 16 0 52 42 0 1 32 2 0 16 0 32 9 1 16 1 1 44 0 52 0 0 2 33 32 0 16 0 52 39 0 1 33 18 0 51 45 0 1 0 16 0 52 42 0 1 52 40 0 2 32 2 0 16 0 32 221 0 16 1 1 46 0 52 0 0 2 33 23 0 16 0 52 15 0 1 33 9 0 16 0 52 47 0 1 32 2 0 16 0 32 186 0 16 1 1 48 0 52 0 0 2 33 30 0 16 0 52 15 0 1 33 16 0 51 50 0 52 16 0 0 16 0 52 49 0 3 32 2 0 16 0 32 144 0 16 1 1 51 0 52 0 0 2 6 34 10 0 5 16 1 1 52 0 52 0 0 2 33 30 0 16 0 52 15 0 1 33 16 0 51 53 0 52 16 0 0 16 0 52 49 0 3 32 2 0 16 0 32 88 0 16 1 1 54 0 52 0 0 2 33 30 0 16 0 52 15 0 1 33 16 0 51 50 0 52 16 0 0 16 0 52 49 0 3 32 2 0 16 0 32 46 0 16 1 1 55 0 52 0 0 2 33 32 0 16 0 52 39 0 1 33 18 0 51 45 0 1 0 16 0 52 42 0 1 52 40 0 2 32 2 0 16 0 32 2 0 16 0 50)} "hs-add" {:upvalue-count 0 :arity 2 :constants ("list?" "append" "list" "cons" "string?" "str" "+") :bytecode (16 0 52 0 0 1 33 35 0 16 1 52 0 0 1 33 11 0 16 0 16 1 52 1 0 2 32 12 0 16 0 16 1 52 2 0 1 52 1 0 2 32 59 0 16 1 52 0 0 1 33 11 0 16 0 16 1 52 3 0 2 32 39 0 16 0 52 4 0 1 6 34 7 0 5 16 1 52 4 0 1 33 11 0 16 0 16 1 52 5 0 2 32 8 0 16 0 16 1 52 6 0 2 50)} "hs-make" {:upvalue-count 0 :arity 1 :constants ("=" "Object" "dict" "Array" "list" "Set" "Map") :bytecode (16 0 1 1 0 52 0 0 2 33 7 0 52 2 0 0 32 61 0 16 0 1 3 0 52 0 0 2 33 7 0 52 4 0 0 32 42 0 16 0 1 5 0 52 0 0 2 33 7 0 52 4 0 0 32 23 0 16 0 1 6 0 52 0 0 2 33 7 0 52 2 0 0 32 4 0 52 2 0 0 50)} "hs-install" {:upvalue-count 0 :arity 1 :constants ("me") :bytecode (16 0 20 0 0 49 1 50)} "hs-measure" {:upvalue-count 0 :arity 1 :constants ("list" io-measure) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-transition" {:upvalue-count 0 :arity 4 :constants ("dom-set-style" "transition" "str" " " "/" 1000 "s" "hs-settle") :bytecode (16 3 33 34 0 20 0 0 16 0 1 1 0 16 1 1 3 0 16 3 1 5 0 52 4 0 2 1 6 0 52 2 0 4 48 3 32 1 0 2 5 20 0 0 16 0 16 1 16 2 48 3 5 16 3 33 10 0 20 7 0 16 0 49 1 32 1 0 2 50)} "hs-transition-from" {:upvalue-count 0 :arity 5 :constants ("dom-set-style" "str" "transition" " " "/" 1000 "s" "hs-settle") :bytecode (20 0 0 16 0 16 1 16 2 52 1 0 1 48 3 5 16 4 33 34 0 20 0 0 16 0 1 2 0 16 1 1 3 0 16 4 1 5 0 52 4 0 2 1 6 0 52 1 0 4 48 3 32 1 0 2 5 20 0 0 16 0 16 1 16 3 52 1 0 1 48 3 5 16 4 33 10 0 20 7 0 16 0 49 1 32 1 0 2 50)} "hs-type-check" {:upvalue-count 0 :arity 2 :constants ("nil?" "=" "Number" "number?" "String" "string?" "Boolean" "Array" "list?" "Object" "dict?" "Element" "host-typeof" "element" "Node" "text" "downcase") :bytecode (16 0 52 0 0 1 33 4 0 3 32 208 0 16 1 1 2 0 52 1 0 2 33 9 0 16 0 52 3 0 1 32 187 0 16 1 1 4 0 52 1 0 2 33 9 0 16 0 52 5 0 1 32 166 0 16 1 1 6 0 52 1 0 2 33 22 0 16 0 3 52 1 0 2 6 34 8 0 5 16 0 4 52 1 0 2 32 132 0 16 1 1 7 0 52 1 0 2 33 9 0 16 0 52 8 0 1 32 111 0 16 1 1 9 0 52 1 0 2 33 9 0 16 0 52 10 0 1 32 90 0 16 1 1 11 0 52 1 0 2 33 16 0 16 0 52 12 0 1 1 13 0 52 1 0 2 32 62 0 16 1 1 14 0 52 1 0 2 33 34 0 16 0 52 12 0 1 1 13 0 52 1 0 2 6 34 14 0 5 16 0 52 12 0 1 1 15 0 52 1 0 2 32 16 0 16 0 52 12 0 1 16 1 52 16 0 1 52 1 0 2 50)} "hs-type-check-strict" {:upvalue-count 0 :arity 2 :constants ("nil?" "hs-type-check") :bytecode (16 0 52 0 0 1 33 4 0 4 32 9 0 20 1 0 16 0 16 1 49 2 50)} "hs-strict-eq" {:upvalue-count 0 :arity 2 :constants ("=" "type-of") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 6 33 9 0 5 16 0 16 1 52 0 0 2 50)} "hs-eq-ignore-case" {:upvalue-count 0 :arity 2 :constants ("=" "downcase" "str") :bytecode (16 0 52 2 0 1 52 1 0 1 16 1 52 2 0 1 52 1 0 1 52 0 0 2 50)} "hs-starts-with-ic?" {:upvalue-count 0 :arity 2 :constants ("starts-with?" "downcase") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 50)} "hs-contains-ignore-case?" {:upvalue-count 0 :arity 2 :constants ("contains?" "downcase" "str") :bytecode (16 0 52 2 0 1 52 1 0 1 16 1 52 2 0 1 52 1 0 1 52 0 0 2 50)} "hs-falsy?" {:upvalue-count 0 :arity 1 :constants ("nil?" "=" "string?" "" "list?" "len" 0) :bytecode (16 0 52 0 0 1 33 4 0 3 32 89 0 16 0 4 52 1 0 2 33 4 0 3 32 75 0 16 0 52 2 0 1 6 33 10 0 5 16 0 1 3 0 52 1 0 2 33 4 0 3 32 48 0 16 0 52 4 0 1 6 33 14 0 5 16 0 52 5 0 1 1 6 0 52 1 0 2 33 4 0 3 32 17 0 16 0 1 6 0 52 1 0 2 33 4 0 3 32 1 0 4 50)} "hs-matches?" {:upvalue-count 0 :arity 2 :constants ("string?" "=" ".*" "string-contains?" "host-typeof" "element" "host-call" "matches") :bytecode (16 0 52 0 0 1 33 27 0 16 1 1 2 0 52 1 0 2 33 4 0 3 32 8 0 16 0 16 1 52 3 0 2 32 44 0 16 0 52 4 0 1 1 5 0 52 1 0 2 33 27 0 16 1 52 0 0 1 33 14 0 16 0 1 7 0 16 1 52 6 0 3 32 1 0 4 32 1 0 4 50)} "hs-contains?" {:upvalue-count 0 :arity 2 :constants ("nil?" "string?" "string-contains?" "str" "list?" "filter" {:upvalue-count 1 :arity 1 :constants ("hs-contains?") :bytecode (20 0 0 18 0 16 0 49 2 50)} "=" "len" 0 "first" "hs-contains?" "rest") :bytecode (16 0 52 0 0 1 33 4 0 4 32 112 0 16 0 52 1 0 1 33 15 0 16 0 16 1 52 3 0 1 52 2 0 2 32 88 0 16 0 52 4 0 1 33 78 0 16 1 52 4 0 1 33 14 0 51 6 0 1 0 16 1 52 5 0 2 32 52 0 16 0 52 8 0 1 1 9 0 52 7 0 2 33 4 0 4 32 32 0 16 0 52 10 0 1 16 1 52 7 0 2 33 4 0 3 32 13 0 20 11 0 16 0 52 12 0 1 16 1 49 2 32 1 0 4 50)} "precedes?" {:upvalue-count 0 :arity 2 :constants ("<" "str") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 50)} "hs-empty?" {:upvalue-count 0 :arity 1 :constants ("nil?" "string?" "=" "len" 0 "list?" "dict?" "keys") :bytecode (16 0 52 0 0 1 33 4 0 3 32 80 0 16 0 52 1 0 1 33 16 0 16 0 52 3 0 1 1 4 0 52 2 0 2 32 55 0 16 0 52 5 0 1 33 16 0 16 0 52 3 0 1 1 4 0 52 2 0 2 32 30 0 16 0 52 6 0 1 33 20 0 16 0 52 7 0 1 52 3 0 1 1 4 0 52 2 0 2 32 1 0 4 50)} "hs-empty-target!" {:upvalue-count 0 :arity 1 :constants ("list?" "for-each" {:upvalue-count 0 :arity 1 :constants ("hs-empty-target!") :bytecode (20 0 0 16 0 49 1 50)} "nil?" "dom-get-prop" "tagName" "=" "INPUT" "TEXTAREA" "type" "checkbox" "radio" "dom-set-prop" "checked" "value" "" "FORM" "dom-set-inner-html" "host-call" "querySelectorAll" "input, textarea, select") :bytecode (16 0 52 0 0 1 33 12 0 51 2 0 16 0 52 1 0 2 32 192 0 16 0 52 3 0 1 33 4 0 2 32 179 0 20 4 0 16 0 1 5 0 48 2 17 1 16 1 1 7 0 52 6 0 2 6 34 10 0 5 16 1 1 8 0 52 6 0 2 33 68 0 20 4 0 16 0 1 9 0 48 2 17 2 16 2 1 10 0 52 6 0 2 6 34 10 0 5 16 2 1 11 0 52 6 0 2 33 14 0 20 12 0 16 0 1 13 0 4 49 3 32 13 0 20 12 0 16 0 1 14 0 1 15 0 49 3 32 73 0 16 1 1 16 0 52 6 0 2 33 13 0 20 17 0 16 0 1 15 0 49 2 32 48 0 16 1 1 16 0 52 6 0 2 33 26 0 16 0 1 19 0 1 20 0 52 18 0 3 17 2 51 2 0 16 2 52 1 0 2 32 10 0 20 17 0 16 0 1 15 0 49 2 50)} "hs-open!" {:upvalue-count 0 :arity 1 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "host-call" "showModal" "dom-set-prop" "open") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 1 3 0 52 2 0 2 33 12 0 16 0 1 5 0 52 4 0 2 32 11 0 20 6 0 16 0 1 7 0 3 49 3 50)} "hs-close!" {:upvalue-count 0 :arity 1 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "host-call" "close" "dom-set-prop" "open") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 1 3 0 52 2 0 2 33 12 0 16 0 1 5 0 52 4 0 2 32 11 0 20 6 0 16 0 1 7 0 4 49 3 50)} "hs-hide!" {:upvalue-count 0 :arity 2 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "dom-has-attr?" "open" "host-call" "close" "DETAILS" "dom-set-prop" "opacity" "dom-set-style" "0" "visibility" "hidden" "display" "none") :bytecode (20 0 0 16 0 1 1 0 48 2 17 2 16 2 1 3 0 52 2 0 2 33 29 0 20 4 0 16 0 1 5 0 48 2 33 12 0 16 0 1 7 0 52 6 0 2 32 1 0 2 32 95 0 16 2 1 8 0 52 2 0 2 33 14 0 20 9 0 16 0 1 5 0 4 49 3 32 69 0 16 1 1 10 0 52 2 0 2 33 16 0 20 11 0 16 0 1 10 0 1 12 0 49 3 32 41 0 16 1 1 13 0 52 2 0 2 33 16 0 20 11 0 16 0 1 13 0 1 14 0 49 3 32 13 0 20 11 0 16 0 1 15 0 1 16 0 49 3 50)} "hs-show!" {:upvalue-count 0 :arity 2 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "not" "dom-has-attr?" "open" "host-call" "showModal" "DETAILS" "dom-set-prop" "opacity" "dom-set-style" "1" "visibility" "visible" "display" "") :bytecode (20 0 0 16 0 1 1 0 48 2 17 2 16 2 1 3 0 52 2 0 2 33 33 0 20 5 0 16 0 1 6 0 48 2 52 4 0 1 33 12 0 16 0 1 8 0 52 7 0 2 32 1 0 2 32 95 0 16 2 1 9 0 52 2 0 2 33 14 0 20 10 0 16 0 1 6 0 3 49 3 32 69 0 16 1 1 11 0 52 2 0 2 33 16 0 20 12 0 16 0 1 11 0 1 13 0 49 3 32 41 0 16 1 1 14 0 52 2 0 2 33 16 0 20 12 0 16 0 1 14 0 1 15 0 49 3 32 13 0 20 12 0 16 0 1 16 0 1 17 0 49 3 50)} {:upvalue-count 0 :arity 1 :constants ("first") :bytecode (16 0 52 0 0 1 50)} {:upvalue-count 0 :arity 1 :constants ("last") :bytecode (16 0 52 0 0 1 50)} "hs-template" {:upvalue-count 0 :arity 1 :constants ("" 0 "len" {:upvalue-count 5 :arity 0 :constants ("<" "nth" "=" "$" "+" 1 "{" 2 {:upvalue-count 3 :arity 2 :constants (">=" "=" "nth" "}" 1 "+" "-" "{") :bytecode (16 0 18 0 52 0 0 2 33 5 0 16 0 32 118 0 18 1 16 0 52 2 0 2 1 3 0 52 1 0 2 33 42 0 16 1 1 4 0 52 1 0 2 33 5 0 16 0 32 22 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 6 0 2 49 2 32 58 0 18 1 16 0 52 2 0 2 1 7 0 52 1 0 2 33 25 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 5 0 2 49 2 32 15 0 18 2 16 0 1 4 0 52 5 0 2 16 1 49 2 50)} "slice" "str" "cek-eval" "hs-to-sx" "hs-compile" {:upvalue-count 3 :arity 1 :constants ("<" "nth" ">=" "a" "<=" "z" "A" "Z" "0" "9" "=" "_" "." "+" 1) :bytecode (16 0 18 0 52 0 0 2 6 33 118 0 5 18 1 16 0 52 1 0 2 17 1 16 1 1 3 0 52 2 0 2 6 33 10 0 5 16 1 1 5 0 52 4 0 2 6 34 80 0 5 16 1 1 6 0 52 2 0 2 6 33 10 0 5 16 1 1 7 0 52 4 0 2 6 34 52 0 5 16 1 1 8 0 52 2 0 2 6 33 10 0 5 16 1 1 9 0 52 4 0 2 6 34 24 0 5 16 1 1 11 0 52 10 0 2 6 34 10 0 5 16 1 1 12 0 52 10 0 2 33 16 0 18 2 16 0 1 14 0 52 13 0 2 49 1 32 2 0 16 0 50)}) :bytecode (18 0 18 1 52 0 0 2 33 13 1 18 2 18 0 52 1 0 2 17 0 16 0 1 3 0 52 2 0 2 6 33 16 0 5 18 0 1 5 0 52 4 0 2 18 1 52 0 0 2 33 197 0 18 2 18 0 1 5 0 52 4 0 2 52 1 0 2 1 6 0 52 2 0 2 33 91 0 18 0 1 7 0 52 4 0 2 17 1 51 8 0 0 1 0 2 1 2 17 2 5 16 2 16 1 1 5 0 48 2 17 3 18 2 16 1 16 3 52 9 0 3 17 4 18 3 20 11 0 20 12 0 20 13 0 16 4 48 1 48 1 48 1 52 10 0 2 19 3 5 16 3 1 5 0 52 4 0 2 19 0 5 18 4 49 0 32 78 0 18 0 1 5 0 52 4 0 2 17 1 51 14 0 0 1 0 2 1 2 17 2 5 16 2 16 1 48 1 17 3 18 2 16 1 16 3 52 9 0 3 17 4 18 3 20 11 0 20 12 0 20 13 0 16 4 48 1 48 1 48 1 52 10 0 2 19 3 5 16 3 19 0 5 18 4 49 0 32 27 0 18 3 16 0 52 10 0 2 19 3 5 18 0 1 5 0 52 4 0 2 19 0 5 18 4 49 0 32 1 0 2 50)}) :bytecode (1 0 0 17 1 1 1 0 17 2 16 0 52 2 0 1 17 3 51 3 0 1 2 1 3 1 0 1 1 1 4 17 4 5 16 4 48 0 5 16 1 50)} "hs-make-object" {:upvalue-count 0 :arity 1 :constants ("for-each" {:upvalue-count 1 :arity 1 :constants ("dict-set!" "first" "nth" 1) :bytecode (18 0 16 0 52 1 0 1 16 0 1 3 0 52 2 0 2 52 0 0 3 50)}) :bytecode (65 0 0 17 1 51 1 0 1 1 16 0 52 0 0 2 5 16 1 50)} "hs-method-call" {:upvalue-count 0 :arity 3 :constants ("=" "map" "first" "push" "append!" "filter" "join" "indexOf" {:upvalue-count 2 :arity 2 :constants ("=" "len" 0 -1 "first" "rest" "+" 1) :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 6 0 1 3 0 32 39 0 16 0 52 4 0 1 18 0 52 0 0 2 33 5 0 16 1 32 19 0 18 1 16 0 52 5 0 1 16 1 1 7 0 52 6 0 2 49 2 50)} 0) :rest-arity 2 :bytecode (16 1 1 1 0 52 0 0 2 33 15 0 16 2 52 2 0 1 16 0 52 1 0 2 32 127 0 16 1 1 3 0 52 0 0 2 33 18 0 16 0 16 2 52 2 0 1 52 4 0 2 5 16 0 32 97 0 16 1 1 5 0 52 0 0 2 33 15 0 16 2 52 2 0 1 16 0 52 5 0 2 32 70 0 16 1 1 6 0 52 0 0 2 33 15 0 16 0 16 2 52 2 0 1 52 6 0 2 32 43 0 16 1 1 7 0 52 0 0 2 33 30 0 16 2 52 2 0 1 17 3 51 8 0 1 3 1 4 17 4 5 16 4 16 0 1 9 0 49 2 32 1 0 2 50)} "hs-beep" {:upvalue-count 0 :arity 1 :constants () :bytecode (16 0 50)} "hs-prop-is" {:upvalue-count 0 :arity 2 :constants ("not" "hs-falsy?" "host-get") :bytecode (20 1 0 16 0 16 1 52 2 0 2 48 1 52 0 0 1 50)} "hs-slice" {:upvalue-count 0 :arity 3 :constants ("nil?" 0 "len" "+" 1 "slice") :bytecode (16 1 52 0 0 1 33 6 0 1 1 0 32 2 0 16 1 17 3 16 2 52 0 0 1 33 9 0 16 0 52 2 0 1 32 9 0 16 2 1 4 0 52 3 0 2 17 4 16 0 16 3 16 4 52 5 0 3 50)} "hs-sorted-by" {:upvalue-count 0 :arity 2 :constants ("map" {:upvalue-count 1 :arity 1 :constants ("list") :bytecode (18 0 16 0 48 1 16 0 52 0 0 2 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1) :bytecode (16 0 1 1 0 52 0 0 2 50)} "sort" {:upvalue-count 0 :arity 2 :constants ("<" "first") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 33 4 0 3 32 1 0 4 50)}) :bytecode (51 1 0 1 1 16 0 52 0 0 2 17 2 51 2 0 51 4 0 16 2 52 3 0 2 52 0 0 2 50)} "hs-sorted-by-desc" {:upvalue-count 0 :arity 2 :constants ("map" {:upvalue-count 1 :arity 1 :constants ("list") :bytecode (18 0 16 0 48 1 16 0 52 0 0 2 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1) :bytecode (16 0 1 1 0 52 0 0 2 50)} "sort" {:upvalue-count 0 :arity 2 :constants (">" "first") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 33 4 0 3 32 1 0 4 50)}) :bytecode (51 1 0 1 1 16 0 52 0 0 2 17 2 51 2 0 51 4 0 16 2 52 3 0 2 52 0 0 2 50)} "hs-split-by" {:upvalue-count 0 :arity 2 :constants ("split") :bytecode (16 0 16 1 52 0 0 2 50)} "hs-joined-by" {:upvalue-count 0 :arity 2 :constants ("join") :bytecode (16 1 16 0 52 0 0 2 50)} {:upvalue-count 0 :arity 2 :constants ("map" {:upvalue-count 1 :arity 1 :constants ("list") :bytecode (18 0 16 0 48 1 16 0 52 0 0 2 50)} "sort" "first" {:upvalue-count 1 :arity 3 :constants ("=" "len" 0 "first" {:upvalue-count 2 :arity 1 :constants ("=" "len" 0 "first" "rest") :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 4 0 2 32 38 0 16 0 52 3 0 1 52 3 0 1 18 0 52 0 0 2 33 9 0 16 0 52 3 0 1 32 10 0 18 1 16 0 52 4 0 1 49 1 50)} "rest" "append" "list" "nth" 1 "filter" {:upvalue-count 1 :arity 1 :constants ("not" "=") :bytecode (16 0 18 0 52 1 0 2 52 0 0 1 50)}) :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 5 0 16 1 32 66 0 16 0 52 3 0 1 17 3 51 4 0 1 3 1 4 17 4 5 16 4 16 2 48 1 17 5 18 0 16 0 52 5 0 1 16 1 16 5 1 9 0 52 8 0 2 52 7 0 1 52 6 0 2 51 11 0 1 5 16 2 52 10 0 2 49 3 50)} "list") :bytecode (51 1 0 1 1 16 0 52 0 0 2 17 2 20 3 0 16 2 52 0 0 2 52 2 0 1 17 3 51 4 0 1 4 17 4 5 16 4 16 3 52 5 0 0 16 2 49 3 50)} {:upvalue-count 0 :arity 2 :constants ("reverse" "hs-sorted-by") :bytecode (20 1 0 16 0 16 1 48 2 52 0 0 1 50)}) :bytecode (51 1 0 128 0 0 5 51 3 0 128 2 0 5 51 3 0 128 4 0 5 51 6 0 128 5 0 5 51 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 51 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 5 51 72 0 128 71 0 5 51 74 0 128 73 0 5 51 76 0 128 75 0 5 51 78 0 128 77 0 5 51 80 0 128 79 0 5 51 82 0 128 81 0 5 51 84 0 128 83 0 5 51 86 0 128 85 0 5 51 88 0 128 87 0 5 51 90 0 128 89 0 5 51 92 0 128 91 0 5 51 94 0 128 93 0 5 51 96 0 128 95 0 5 51 98 0 128 97 0 5 51 100 0 128 99 0 5 51 101 0 128 43 0 5 51 102 0 128 45 0 5 51 104 0 128 103 0 5 51 106 0 128 105 0 5 51 108 0 128 107 0 5 51 110 0 128 109 0 5 51 112 0 128 111 0 5 51 114 0 128 113 0 5 51 116 0 128 115 0 5 51 118 0 128 117 0 5 51 120 0 128 119 0 5 51 122 0 128 121 0 5 51 123 0 128 115 0 5 51 124 0 128 117 0 50))) + :constants ("hs-each" {:upvalue-count 0 :arity 2 :constants ("list?" "for-each") :bytecode (16 0 52 0 0 1 33 11 0 16 1 16 0 52 1 0 2 32 6 0 16 1 16 0 49 1 50)} "hs-on" {:upvalue-count 0 :arity 3 :constants ("dom-listen") :bytecode (20 0 0 16 0 16 1 16 2 49 3 50)} "hs-on-every" "hs-init" {:upvalue-count 0 :arity 1 :constants () :bytecode (16 0 49 0 50)} "hs-wait" {:upvalue-count 0 :arity 1 :constants ("list" io-sleep) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-wait-for" {:upvalue-count 0 :arity 2 :constants ("list" io-wait-event) :bytecode (1 1 0 16 0 16 1 52 0 0 3 112 50)} "hs-settle" {:upvalue-count 0 :arity 1 :constants ("list" io-settle) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-toggle-class!" {:upvalue-count 0 :arity 2 :constants ("host-call" "host-get" "classList" "toggle") :bytecode (16 0 1 2 0 52 1 0 2 1 3 0 16 1 52 0 0 3 50)} "hs-toggle-between!" {:upvalue-count 0 :arity 3 :constants ("dom-has-class?" "dom-remove-class" "dom-add-class") :bytecode (20 0 0 16 0 16 1 48 2 33 22 0 20 1 0 16 0 16 1 48 2 5 20 2 0 16 0 16 2 49 2 32 19 0 20 1 0 16 0 16 2 48 2 5 20 2 0 16 0 16 1 49 2 50)} "hs-toggle-style!" {:upvalue-count 0 :arity 2 :constants ("dom-get-style" "=" "visibility" "hidden" "dom-set-style" "visible" "display" "opacity" "none" "0" "1" "") :bytecode (20 0 0 16 0 16 1 48 2 17 2 16 1 1 2 0 52 1 0 2 33 42 0 16 2 1 3 0 52 1 0 2 33 15 0 20 4 0 16 0 16 1 1 5 0 49 3 32 12 0 20 4 0 16 0 16 1 1 3 0 49 3 32 169 0 16 1 1 6 0 52 1 0 2 6 34 10 0 5 16 1 1 7 0 52 1 0 2 33 92 0 16 2 1 8 0 52 1 0 2 6 34 10 0 5 16 2 1 9 0 52 1 0 2 33 33 0 20 4 0 16 0 16 1 16 1 1 7 0 52 1 0 2 33 6 0 1 10 0 32 3 0 1 11 0 49 3 32 30 0 20 4 0 16 0 16 1 16 1 1 6 0 52 1 0 2 33 6 0 1 8 0 32 3 0 1 9 0 49 3 32 51 0 16 2 1 11 0 52 1 0 2 6 34 8 0 5 16 2 2 52 1 0 2 33 15 0 20 4 0 16 0 16 1 1 3 0 49 3 32 12 0 20 4 0 16 0 16 1 1 11 0 49 3 50)} "hs-toggle-style-between!" {:upvalue-count 0 :arity 4 :constants ("dom-get-style" "=" "dom-set-style") :bytecode (20 0 0 16 0 16 1 48 2 17 4 16 4 16 2 52 1 0 2 33 14 0 20 2 0 16 0 16 1 16 3 49 3 32 11 0 20 2 0 16 0 16 1 16 2 49 3 50)} "hs-toggle-style-cycle!" {:upvalue-count 0 :arity 3 :constants ("dom-get-style" {:upvalue-count 3 :arity 1 :constants ("empty?" "first" "=" "rest") :bytecode (16 0 52 0 0 1 33 9 0 18 0 52 1 0 1 32 60 0 18 1 16 0 52 1 0 1 52 2 0 2 33 35 0 16 0 52 3 0 1 52 0 0 1 33 9 0 18 0 52 1 0 1 32 10 0 16 0 52 3 0 1 52 1 0 1 32 10 0 18 2 16 0 52 3 0 1 49 1 50)} "dom-set-style") :bytecode (20 0 0 16 0 16 1 48 2 17 3 51 1 0 1 2 1 3 1 4 17 4 5 20 2 0 16 0 16 1 16 4 16 2 48 1 49 3 50)} "hs-take!" {:upvalue-count 0 :arity 5 :constants ("list?" "list" "dom-parent" "dom-child-list" "=" "class" "for-each" {:upvalue-count 1 :arity 1 :constants ("dom-remove-class") :bytecode (20 0 0 16 0 18 0 49 2 50)} "dom-add-class" ">" "len" 0 "first" 1 "nth" {:upvalue-count 2 :arity 1 :constants ("dom-set-attr") :bytecode (20 0 0 16 0 18 0 18 1 49 3 50)} "dom-set-attr" "") :rest-arity 4 :bytecode (16 3 33 23 0 16 3 52 0 0 1 33 5 0 16 3 32 6 0 16 3 52 1 0 1 32 28 0 20 2 0 16 0 48 1 17 5 16 5 33 10 0 20 3 0 16 5 48 1 32 4 0 52 1 0 0 17 5 16 1 1 5 0 52 4 0 2 33 24 0 51 7 0 1 2 16 5 52 6 0 2 5 20 8 0 16 0 16 2 49 2 32 113 0 16 4 52 10 0 1 1 11 0 52 9 0 2 33 9 0 16 4 52 12 0 1 32 1 0 2 17 6 16 4 52 10 0 1 1 13 0 52 9 0 2 33 12 0 16 4 1 13 0 52 14 0 2 32 1 0 2 17 7 16 7 33 16 0 51 15 0 1 2 1 7 16 5 52 6 0 2 32 1 0 2 5 16 6 33 14 0 20 16 0 16 0 16 2 16 6 49 3 32 12 0 20 16 0 16 0 16 2 1 17 0 49 3 50)} "hs-put!" {:upvalue-count 0 :arity 3 :constants ("=" "into" "list?" "dom-set-inner-html" "before" "dom-insert-adjacent-html" "beforebegin" "after" "afterend" "start" "append!" 0 "afterbegin" "end" "beforeend") :bytecode (16 1 1 1 0 52 0 0 2 33 26 0 16 2 52 2 0 1 33 5 0 16 2 32 9 0 20 3 0 16 2 16 0 49 2 32 152 0 16 1 1 4 0 52 0 0 2 33 15 0 20 5 0 16 2 1 6 0 16 0 49 3 32 125 0 16 1 1 7 0 52 0 0 2 33 15 0 20 5 0 16 2 1 8 0 16 0 49 3 32 98 0 16 1 1 9 0 52 0 0 2 33 38 0 16 2 52 2 0 1 33 14 0 16 2 16 0 1 11 0 52 10 0 3 32 12 0 20 5 0 16 2 1 12 0 16 0 49 3 32 48 0 16 1 1 13 0 52 0 0 2 33 35 0 16 2 52 2 0 1 33 11 0 16 2 16 0 52 10 0 2 32 12 0 20 5 0 16 2 1 14 0 16 0 49 3 32 1 0 2 50)} "hs-add-to!" {:upvalue-count 0 :arity 2 :constants ("list?" "append" "list" "host-call" "push") :bytecode (16 1 52 0 0 1 33 15 0 16 1 16 0 52 2 0 1 52 1 0 2 32 11 0 16 1 1 4 0 16 0 52 3 0 3 50)} "hs-remove-from!" {:upvalue-count 0 :arity 2 :constants ("list?" "filter" {:upvalue-count 1 :arity 1 :constants ("not" "=") :bytecode (16 0 18 0 52 1 0 2 52 0 0 1 50)} "host-call" "splice" "indexOf" 1) :bytecode (16 1 52 0 0 1 33 14 0 51 2 0 1 0 16 1 52 1 0 2 32 23 0 16 1 1 4 0 16 1 1 5 0 16 0 52 3 0 3 1 6 0 52 3 0 4 50)} "hs-set-on!" {:upvalue-count 0 :arity 2 :constants ("for-each" {:upvalue-count 2 :arity 1 :constants ("host-set!" "get") :bytecode (18 0 16 0 18 1 16 0 52 1 0 2 52 0 0 3 50)} "keys") :bytecode (51 1 0 1 1 1 0 16 0 52 2 0 1 52 0 0 2 50)} "hs-navigate!" {:upvalue-count 0 :arity 1 :constants ("list" io-navigate) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-scroll!" {:upvalue-count 0 :arity 2 :constants ("host-call" "scrollIntoView" "list" "=" "bottom" "dict" "block" "end" "start") :bytecode (16 0 1 1 0 16 1 1 4 0 52 3 0 2 33 13 0 1 6 0 1 7 0 52 5 0 2 32 10 0 1 6 0 1 8 0 52 5 0 2 52 2 0 1 52 0 0 3 50)} "hs-halt!" {:upvalue-count 0 :arity 1 :constants ("event" "=" "default" "host-call" "preventDefault" "bubbling" "stopPropagation") :bytecode (20 0 0 33 74 0 16 0 1 2 0 52 1 0 2 33 13 0 20 0 0 1 4 0 52 3 0 2 32 46 0 16 0 1 5 0 52 1 0 2 33 13 0 20 0 0 1 6 0 52 3 0 2 32 21 0 20 0 0 1 4 0 52 3 0 2 5 20 0 0 1 6 0 52 3 0 2 32 1 0 2 50)} "hs-select!" {:upvalue-count 0 :arity 1 :constants ("host-call" "select" "list") :bytecode (16 0 1 1 0 52 2 0 0 52 0 0 3 50)} "hs-reset!" {:upvalue-count 0 :arity 1 :constants ("host-call" "reset" "list") :bytecode (16 0 1 1 0 52 2 0 0 52 0 0 3 50)} "hs-next" {:upvalue-count 0 :arity 2 :constants ("=" "*" "dom-next-sibling" {:upvalue-count 2 :arity 1 :constants ("nil?" "dom-matches?" "dom-next-sibling") :bytecode (16 0 52 0 0 1 33 4 0 2 32 28 0 20 1 0 16 0 18 0 48 2 33 5 0 16 0 32 11 0 18 1 20 2 0 16 0 48 1 49 1 50)}) :bytecode (16 1 1 1 0 52 0 0 2 33 10 0 20 2 0 16 0 49 1 32 25 0 20 2 0 16 0 48 1 17 2 51 3 0 1 1 1 3 17 3 5 16 3 16 2 49 1 50)} "hs-previous" {:upvalue-count 0 :arity 2 :constants ("=" "*" "dom-get-prop" "previousElementSibling" {:upvalue-count 2 :arity 1 :constants ("nil?" "dom-matches?" "dom-get-prop" "previousElementSibling") :bytecode (16 0 52 0 0 1 33 4 0 2 32 31 0 20 1 0 16 0 18 0 48 2 33 5 0 16 0 32 14 0 18 1 20 2 0 16 0 1 3 0 48 2 49 1 50)}) :bytecode (16 1 1 1 0 52 0 0 2 33 13 0 20 2 0 16 0 1 3 0 49 2 32 28 0 20 2 0 16 0 1 3 0 48 2 17 2 51 4 0 1 1 1 3 17 3 5 16 3 16 2 49 1 50)} "hs-query-all" {:upvalue-count 0 :arity 1 :constants ("host-call" "dom-body" "querySelectorAll") :bytecode (20 1 0 48 0 1 2 0 16 0 52 0 0 3 50)} "hs-query-first" {:upvalue-count 0 :arity 1 :constants ("host-call" "host-global" "document" "querySelector") :bytecode (1 2 0 52 1 0 1 1 3 0 16 0 52 0 0 3 50)} "hs-query-last" {:upvalue-count 0 :arity 1 :constants ("dom-query-all" "dom-body" ">" "len" 0 "nth" "-" 1) :bytecode (20 0 0 20 1 0 48 0 16 0 48 2 17 1 16 1 52 3 0 1 1 4 0 52 2 0 2 33 22 0 16 1 16 1 52 3 0 1 1 7 0 52 6 0 2 52 5 0 2 32 1 0 2 50)} "hs-first" {:upvalue-count 0 :arity 2 :constants ("dom-query-all") :bytecode (20 0 0 16 0 16 1 49 2 50)} "hs-last" {:upvalue-count 0 :arity 2 :constants ("dom-query-all" ">" "len" 0 "nth" "-" 1) :bytecode (20 0 0 16 0 16 1 48 2 17 2 16 2 52 2 0 1 1 3 0 52 1 0 2 33 22 0 16 2 16 2 52 2 0 1 1 6 0 52 5 0 2 52 4 0 2 32 1 0 2 50)} "hs-repeat-times" {:upvalue-count 0 :arity 3 :constants ({:upvalue-count 3 :arity 1 :constants ("<" "=" "str" "hs-break" "hs-continue" "+" 1) :bytecode (16 0 18 0 52 0 0 2 33 124 0 35 10 0 18 1 48 0 5 2 36 32 49 0 17 0 5 16 0 52 2 0 1 1 3 0 52 1 0 2 6 34 14 0 5 16 0 52 2 0 1 1 4 0 52 1 0 2 33 9 0 16 0 52 2 0 1 32 3 0 16 0 37 17 1 16 1 1 3 0 52 1 0 2 33 4 0 2 32 41 0 16 1 1 4 0 52 1 0 2 33 16 0 18 2 16 0 1 6 0 52 5 0 2 49 1 32 13 0 18 2 16 0 1 6 0 52 5 0 2 49 1 32 1 0 2 50)} 0) :bytecode (51 0 0 1 0 1 1 1 2 17 2 5 16 2 1 1 0 49 1 50)} "hs-repeat-forever" {:upvalue-count 0 :arity 2 :constants ({:upvalue-count 2 :arity 0 :constants ("=" "str" "hs-break" "hs-continue") :bytecode (35 10 0 18 0 48 0 5 2 36 32 49 0 17 0 5 16 0 52 1 0 1 1 2 0 52 0 0 2 6 34 14 0 5 16 0 52 1 0 1 1 3 0 52 0 0 2 33 9 0 16 0 52 1 0 1 32 3 0 16 0 37 17 0 16 0 1 2 0 52 0 0 2 33 4 0 2 32 23 0 16 0 1 3 0 52 0 0 2 33 7 0 18 1 49 0 32 4 0 18 1 49 0 50)}) :bytecode (51 0 0 1 0 1 1 17 1 5 16 1 49 0 50)} "hs-repeat-while" {:upvalue-count 0 :arity 2 :constants ("=" "str" "hs-break" "hs-continue" "hs-repeat-while") :bytecode (16 0 48 0 33 116 0 35 10 0 16 1 48 0 5 2 36 32 49 0 17 0 5 16 0 52 1 0 1 1 2 0 52 0 0 2 6 34 14 0 5 16 0 52 1 0 1 1 3 0 52 0 0 2 33 9 0 16 0 52 1 0 1 32 3 0 16 0 37 17 2 16 2 1 2 0 52 0 0 2 33 4 0 2 32 33 0 16 2 1 3 0 52 0 0 2 33 12 0 20 4 0 16 0 16 1 49 2 32 9 0 20 4 0 16 0 16 1 49 2 32 1 0 2 50)} "hs-repeat-until" {:upvalue-count 0 :arity 2 :constants ("=" "str" "hs-break" "hs-continue" "hs-repeat-until") :bytecode (35 10 0 16 1 48 0 5 2 36 32 49 0 17 0 5 16 0 52 1 0 1 1 2 0 52 0 0 2 6 34 14 0 5 16 0 52 1 0 1 1 3 0 52 0 0 2 33 9 0 16 0 52 1 0 1 32 3 0 16 0 37 17 2 16 2 1 2 0 52 0 0 2 33 4 0 2 32 55 0 16 2 1 3 0 52 0 0 2 33 23 0 16 0 48 0 33 4 0 2 32 9 0 20 4 0 16 0 16 1 49 2 32 20 0 16 0 48 0 33 4 0 2 32 9 0 20 4 0 16 0 16 1 49 2 50)} "hs-for-each" {:upvalue-count 0 :arity 2 :constants ("list?" "dict?" "keys" "nil?" "list" {:upvalue-count 2 :arity 1 :constants ("not" "empty?" "first" "=" "str" "hs-break" "hs-continue" "rest") :bytecode (16 0 52 1 0 1 52 0 0 1 33 124 0 35 16 0 18 0 16 0 52 2 0 1 48 1 5 2 36 32 49 0 17 0 5 16 0 52 4 0 1 1 5 0 52 3 0 2 6 34 14 0 5 16 0 52 4 0 1 1 6 0 52 3 0 2 33 9 0 16 0 52 4 0 1 32 3 0 16 0 37 17 1 16 1 1 5 0 52 3 0 2 33 4 0 2 32 35 0 16 1 1 6 0 52 3 0 2 33 13 0 18 1 16 0 52 7 0 1 49 1 32 10 0 18 1 16 0 52 7 0 1 49 1 32 1 0 2 50)}) :bytecode (16 1 52 0 0 1 33 5 0 16 1 32 38 0 16 1 52 1 0 1 33 9 0 16 1 52 2 0 1 32 20 0 16 1 52 3 0 1 33 7 0 52 4 0 0 32 4 0 52 4 0 0 17 2 51 5 0 1 0 1 3 17 3 5 16 3 16 2 49 1 50)} "hs-append" {:upvalue-count 0 :arity 2 :constants ("string?" "str" "list?" "append" "list") :bytecode (16 0 52 0 0 1 33 11 0 16 0 16 1 52 1 0 2 32 32 0 16 0 52 2 0 1 33 15 0 16 0 16 1 52 4 0 1 52 3 0 2 32 8 0 16 0 16 1 52 1 0 2 50)} "hs-append!" {:upvalue-count 0 :arity 2 :constants ("dom-insert-adjacent-html" "beforeend") :bytecode (20 0 0 16 1 1 1 0 16 0 49 3 50)} "hs-fetch" {:upvalue-count 0 :arity 2 :constants ("list" "io-fetch" "text") :bytecode (1 1 0 16 0 16 1 33 5 0 16 1 32 3 0 1 2 0 52 0 0 3 112 50)} "hs-coerce" {:upvalue-count 0 :arity 2 :constants ("=" "Int" "floor" "+" 0 "Integer" "Float" "Number" "String" "list?" "join" "," "map" {:upvalue-count 0 :arity 1 :constants ("str") :bytecode (16 0 52 0 0 1 50)} "str" "Bool" "not" "hs-falsy?" "Boolean" "Array" "list" "HTML" "JSON" "string?" "host-call" "host-global" "stringify" "Object" "parse" "Fixed" "Fixed:" ">" "string-length" 6 "substring" "**" 10 "/" "*" 0.5 "Selector" "Fragment" "Values" "dict?" {:upvalue-count 1 :arity 1 :constants ("get") :bytecode (18 0 16 0 52 0 0 2 50)} "keys" "Keys" "Entries" {:upvalue-count 1 :arity 1 :constants ("list" "get") :bytecode (16 0 18 0 16 0 52 1 0 2 52 0 0 2 50)} "Reversed" "reverse" "Unique" "reduce" {:upvalue-count 0 :arity 2 :constants ("some" {:upvalue-count 1 :arity 1 :constants ("=") :bytecode (16 0 18 0 52 0 0 2 50)} "append" "list") :bytecode (51 1 0 1 1 16 0 52 0 0 2 33 5 0 16 0 32 12 0 16 0 16 1 52 3 0 1 52 2 0 2 50)} "Flattened" "Flat" {:upvalue-count 0 :arity 2 :constants ("list?" "append" "list") :bytecode (16 1 52 0 0 1 33 11 0 16 0 16 1 52 1 0 2 32 12 0 16 0 16 1 52 2 0 1 52 1 0 2 50)} "Set" "Map") :bytecode (16 1 1 1 0 52 0 0 2 33 16 0 16 0 1 4 0 52 3 0 2 52 2 0 1 32 89 3 16 1 1 5 0 52 0 0 2 33 16 0 16 0 1 4 0 52 3 0 2 52 2 0 1 32 61 3 16 1 1 6 0 52 0 0 2 33 12 0 16 0 1 4 0 52 3 0 2 32 37 3 16 1 1 7 0 52 0 0 2 33 12 0 16 0 1 4 0 52 3 0 2 32 13 3 16 1 1 8 0 52 0 0 2 33 37 0 16 0 52 9 0 1 33 19 0 1 11 0 51 13 0 16 0 52 12 0 2 52 10 0 2 32 6 0 16 0 52 14 0 1 32 220 2 16 1 1 15 0 52 0 0 2 33 14 0 20 17 0 16 0 48 1 52 16 0 1 32 194 2 16 1 1 18 0 52 0 0 2 33 14 0 20 17 0 16 0 48 1 52 16 0 1 32 168 2 16 1 1 19 0 52 0 0 2 33 23 0 16 0 52 9 0 1 33 5 0 16 0 32 6 0 16 0 52 20 0 1 32 133 2 16 1 1 21 0 52 0 0 2 33 9 0 16 0 52 14 0 1 32 112 2 16 1 1 22 0 52 0 0 2 33 33 0 16 0 52 23 0 1 33 5 0 16 0 32 16 0 1 22 0 52 25 0 1 1 26 0 16 0 52 24 0 3 32 67 2 16 1 1 27 0 52 0 0 2 33 33 0 16 0 52 23 0 1 33 19 0 1 22 0 52 25 0 1 1 28 0 16 0 52 24 0 3 32 2 0 16 0 32 22 2 16 1 1 29 0 52 0 0 2 6 34 10 0 5 16 1 1 30 0 52 0 0 2 33 126 0 16 1 52 32 0 1 1 33 0 52 31 0 2 33 25 0 16 1 1 33 0 16 1 52 32 0 1 52 34 0 3 1 4 0 52 3 0 2 32 3 0 1 4 0 17 2 16 0 1 4 0 52 3 0 2 17 3 16 2 1 4 0 52 0 0 2 33 13 0 16 3 52 2 0 1 52 14 0 1 32 41 0 20 35 0 1 36 0 16 2 48 2 17 4 16 3 16 4 52 38 0 2 1 39 0 52 3 0 2 52 2 0 1 16 4 52 37 0 2 52 14 0 1 32 126 1 16 1 1 40 0 52 0 0 2 33 9 0 16 0 52 14 0 1 32 105 1 16 1 1 41 0 52 0 0 2 33 5 0 16 0 32 88 1 16 1 1 42 0 52 0 0 2 33 32 0 16 0 52 43 0 1 33 18 0 51 44 0 1 0 16 0 52 45 0 1 52 12 0 2 32 2 0 16 0 32 44 1 16 1 1 46 0 52 0 0 2 33 23 0 16 0 52 43 0 1 33 9 0 16 0 52 45 0 1 32 2 0 16 0 32 9 1 16 1 1 47 0 52 0 0 2 33 32 0 16 0 52 43 0 1 33 18 0 51 48 0 1 0 16 0 52 45 0 1 52 12 0 2 32 2 0 16 0 32 221 0 16 1 1 49 0 52 0 0 2 33 23 0 16 0 52 9 0 1 33 9 0 16 0 52 50 0 1 32 2 0 16 0 32 186 0 16 1 1 51 0 52 0 0 2 33 30 0 16 0 52 9 0 1 33 16 0 51 53 0 52 20 0 0 16 0 52 52 0 3 32 2 0 16 0 32 144 0 16 1 1 54 0 52 0 0 2 6 34 10 0 5 16 1 1 55 0 52 0 0 2 33 30 0 16 0 52 9 0 1 33 16 0 51 56 0 52 20 0 0 16 0 52 52 0 3 32 2 0 16 0 32 88 0 16 1 1 57 0 52 0 0 2 33 30 0 16 0 52 9 0 1 33 16 0 51 53 0 52 20 0 0 16 0 52 52 0 3 32 2 0 16 0 32 46 0 16 1 1 58 0 52 0 0 2 33 32 0 16 0 52 43 0 1 33 18 0 51 48 0 1 0 16 0 52 45 0 1 52 12 0 2 32 2 0 16 0 32 2 0 16 0 50)} "hs-add" {:upvalue-count 0 :arity 2 :constants ("list?" "append" "list" "cons" "string?" "str" "+") :bytecode (16 0 52 0 0 1 33 35 0 16 1 52 0 0 1 33 11 0 16 0 16 1 52 1 0 2 32 12 0 16 0 16 1 52 2 0 1 52 1 0 2 32 59 0 16 1 52 0 0 1 33 11 0 16 0 16 1 52 3 0 2 32 39 0 16 0 52 4 0 1 6 34 7 0 5 16 1 52 4 0 1 33 11 0 16 0 16 1 52 5 0 2 32 8 0 16 0 16 1 52 6 0 2 50)} "hs-make" {:upvalue-count 0 :arity 1 :constants ("=" "Object" "dict" "Array" "list" "Set" "Map") :bytecode (16 0 1 1 0 52 0 0 2 33 7 0 52 2 0 0 32 61 0 16 0 1 3 0 52 0 0 2 33 7 0 52 4 0 0 32 42 0 16 0 1 5 0 52 0 0 2 33 7 0 52 4 0 0 32 23 0 16 0 1 6 0 52 0 0 2 33 7 0 52 2 0 0 32 4 0 52 2 0 0 50)} "hs-install" {:upvalue-count 0 :arity 1 :constants ("me") :bytecode (16 0 20 0 0 49 1 50)} "hs-measure" {:upvalue-count 0 :arity 1 :constants ("list" io-measure) :bytecode (1 1 0 16 0 52 0 0 2 112 50)} "hs-transition" {:upvalue-count 0 :arity 4 :constants ("dom-set-style" "transition" "str" " " "/" 1000 "s" "hs-settle") :bytecode (16 3 33 34 0 20 0 0 16 0 1 1 0 16 1 1 3 0 16 3 1 5 0 52 4 0 2 1 6 0 52 2 0 4 48 3 32 1 0 2 5 20 0 0 16 0 16 1 16 2 48 3 5 16 3 33 10 0 20 7 0 16 0 49 1 32 1 0 2 50)} "hs-transition-from" {:upvalue-count 0 :arity 5 :constants ("dom-set-style" "str" "transition" " " "/" 1000 "s" "hs-settle") :bytecode (20 0 0 16 0 16 1 16 2 52 1 0 1 48 3 5 16 4 33 34 0 20 0 0 16 0 1 2 0 16 1 1 3 0 16 4 1 5 0 52 4 0 2 1 6 0 52 1 0 4 48 3 32 1 0 2 5 20 0 0 16 0 16 1 16 3 52 1 0 1 48 3 5 16 4 33 10 0 20 7 0 16 0 49 1 32 1 0 2 50)} "hs-type-check" {:upvalue-count 0 :arity 2 :constants ("nil?" "=" "Number" "number?" "String" "string?" "Boolean" "Array" "list?" "Object" "dict?" "Element" "host-typeof" "element" "Node" "text" "downcase") :bytecode (16 0 52 0 0 1 33 4 0 3 32 208 0 16 1 1 2 0 52 1 0 2 33 9 0 16 0 52 3 0 1 32 187 0 16 1 1 4 0 52 1 0 2 33 9 0 16 0 52 5 0 1 32 166 0 16 1 1 6 0 52 1 0 2 33 22 0 16 0 3 52 1 0 2 6 34 8 0 5 16 0 4 52 1 0 2 32 132 0 16 1 1 7 0 52 1 0 2 33 9 0 16 0 52 8 0 1 32 111 0 16 1 1 9 0 52 1 0 2 33 9 0 16 0 52 10 0 1 32 90 0 16 1 1 11 0 52 1 0 2 33 16 0 16 0 52 12 0 1 1 13 0 52 1 0 2 32 62 0 16 1 1 14 0 52 1 0 2 33 34 0 16 0 52 12 0 1 1 13 0 52 1 0 2 6 34 14 0 5 16 0 52 12 0 1 1 15 0 52 1 0 2 32 16 0 16 0 52 12 0 1 16 1 52 16 0 1 52 1 0 2 50)} "hs-type-check-strict" {:upvalue-count 0 :arity 2 :constants ("nil?" "hs-type-check") :bytecode (16 0 52 0 0 1 33 4 0 4 32 9 0 20 1 0 16 0 16 1 49 2 50)} "hs-strict-eq" {:upvalue-count 0 :arity 2 :constants ("=" "type-of") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 6 33 9 0 5 16 0 16 1 52 0 0 2 50)} "hs-eq-ignore-case" {:upvalue-count 0 :arity 2 :constants ("=" "downcase" "str") :bytecode (16 0 52 2 0 1 52 1 0 1 16 1 52 2 0 1 52 1 0 1 52 0 0 2 50)} "hs-starts-with-ic?" {:upvalue-count 0 :arity 2 :constants ("starts-with?" "downcase") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 50)} "hs-contains-ignore-case?" {:upvalue-count 0 :arity 2 :constants ("contains?" "downcase" "str") :bytecode (16 0 52 2 0 1 52 1 0 1 16 1 52 2 0 1 52 1 0 1 52 0 0 2 50)} "hs-falsy?" {:upvalue-count 0 :arity 1 :constants ("nil?" "=" "string?" "" "list?" "len" 0) :bytecode (16 0 52 0 0 1 33 4 0 3 32 89 0 16 0 4 52 1 0 2 33 4 0 3 32 75 0 16 0 52 2 0 1 6 33 10 0 5 16 0 1 3 0 52 1 0 2 33 4 0 3 32 48 0 16 0 52 4 0 1 6 33 14 0 5 16 0 52 5 0 1 1 6 0 52 1 0 2 33 4 0 3 32 17 0 16 0 1 6 0 52 1 0 2 33 4 0 3 32 1 0 4 50)} "hs-matches?" {:upvalue-count 0 :arity 2 :constants ("string?" "=" ".*" "string-contains?" "host-typeof" "element" "host-call" "matches") :bytecode (16 0 52 0 0 1 33 27 0 16 1 1 2 0 52 1 0 2 33 4 0 3 32 8 0 16 0 16 1 52 3 0 2 32 44 0 16 0 52 4 0 1 1 5 0 52 1 0 2 33 27 0 16 1 52 0 0 1 33 14 0 16 0 1 7 0 16 1 52 6 0 3 32 1 0 4 32 1 0 4 50)} "hs-contains?" {:upvalue-count 0 :arity 2 :constants ("nil?" "string?" "string-contains?" "str" "list?" "filter" {:upvalue-count 1 :arity 1 :constants ("hs-contains?") :bytecode (20 0 0 18 0 16 0 49 2 50)} "=" "len" 0 "first" "hs-contains?" "rest") :bytecode (16 0 52 0 0 1 33 4 0 4 32 112 0 16 0 52 1 0 1 33 15 0 16 0 16 1 52 3 0 1 52 2 0 2 32 88 0 16 0 52 4 0 1 33 78 0 16 1 52 4 0 1 33 14 0 51 6 0 1 0 16 1 52 5 0 2 32 52 0 16 0 52 8 0 1 1 9 0 52 7 0 2 33 4 0 4 32 32 0 16 0 52 10 0 1 16 1 52 7 0 2 33 4 0 3 32 13 0 20 11 0 16 0 52 12 0 1 16 1 49 2 32 1 0 4 50)} "precedes?" {:upvalue-count 0 :arity 2 :constants ("<" "str") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 50)} "hs-empty?" {:upvalue-count 0 :arity 1 :constants ("nil?" "string?" "=" "len" 0 "list?" "dict?" "keys") :bytecode (16 0 52 0 0 1 33 4 0 3 32 80 0 16 0 52 1 0 1 33 16 0 16 0 52 3 0 1 1 4 0 52 2 0 2 32 55 0 16 0 52 5 0 1 33 16 0 16 0 52 3 0 1 1 4 0 52 2 0 2 32 30 0 16 0 52 6 0 1 33 20 0 16 0 52 7 0 1 52 3 0 1 1 4 0 52 2 0 2 32 1 0 4 50)} "hs-empty-target!" {:upvalue-count 0 :arity 1 :constants ("list?" "for-each" {:upvalue-count 0 :arity 1 :constants ("hs-empty-target!") :bytecode (20 0 0 16 0 49 1 50)} "nil?" "dom-get-prop" "tagName" "=" "INPUT" "TEXTAREA" "type" "checkbox" "radio" "dom-set-prop" "checked" "value" "" "FORM" "dom-set-inner-html" "host-call" "querySelectorAll" "input, textarea, select") :bytecode (16 0 52 0 0 1 33 12 0 51 2 0 16 0 52 1 0 2 32 192 0 16 0 52 3 0 1 33 4 0 2 32 179 0 20 4 0 16 0 1 5 0 48 2 17 1 16 1 1 7 0 52 6 0 2 6 34 10 0 5 16 1 1 8 0 52 6 0 2 33 68 0 20 4 0 16 0 1 9 0 48 2 17 2 16 2 1 10 0 52 6 0 2 6 34 10 0 5 16 2 1 11 0 52 6 0 2 33 14 0 20 12 0 16 0 1 13 0 4 49 3 32 13 0 20 12 0 16 0 1 14 0 1 15 0 49 3 32 73 0 16 1 1 16 0 52 6 0 2 33 13 0 20 17 0 16 0 1 15 0 49 2 32 48 0 16 1 1 16 0 52 6 0 2 33 26 0 16 0 1 19 0 1 20 0 52 18 0 3 17 2 51 2 0 16 2 52 1 0 2 32 10 0 20 17 0 16 0 1 15 0 49 2 50)} "hs-open!" {:upvalue-count 0 :arity 1 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "host-call" "showModal" "dom-set-prop" "open") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 1 3 0 52 2 0 2 33 12 0 16 0 1 5 0 52 4 0 2 32 11 0 20 6 0 16 0 1 7 0 3 49 3 50)} "hs-close!" {:upvalue-count 0 :arity 1 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "host-call" "close" "dom-set-prop" "open") :bytecode (20 0 0 16 0 1 1 0 48 2 17 1 16 1 1 3 0 52 2 0 2 33 12 0 16 0 1 5 0 52 4 0 2 32 11 0 20 6 0 16 0 1 7 0 4 49 3 50)} "hs-hide!" {:upvalue-count 0 :arity 2 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "dom-has-attr?" "open" "host-call" "close" "DETAILS" "dom-set-prop" "opacity" "dom-set-style" "0" "visibility" "hidden" "display" "none") :bytecode (20 0 0 16 0 1 1 0 48 2 17 2 16 2 1 3 0 52 2 0 2 33 29 0 20 4 0 16 0 1 5 0 48 2 33 12 0 16 0 1 7 0 52 6 0 2 32 1 0 2 32 95 0 16 2 1 8 0 52 2 0 2 33 14 0 20 9 0 16 0 1 5 0 4 49 3 32 69 0 16 1 1 10 0 52 2 0 2 33 16 0 20 11 0 16 0 1 10 0 1 12 0 49 3 32 41 0 16 1 1 13 0 52 2 0 2 33 16 0 20 11 0 16 0 1 13 0 1 14 0 49 3 32 13 0 20 11 0 16 0 1 15 0 1 16 0 49 3 50)} "hs-show!" {:upvalue-count 0 :arity 2 :constants ("dom-get-prop" "tagName" "=" "DIALOG" "not" "dom-has-attr?" "open" "host-call" "showModal" "DETAILS" "dom-set-prop" "opacity" "dom-set-style" "1" "visibility" "visible" "display" "") :bytecode (20 0 0 16 0 1 1 0 48 2 17 2 16 2 1 3 0 52 2 0 2 33 33 0 20 5 0 16 0 1 6 0 48 2 52 4 0 1 33 12 0 16 0 1 8 0 52 7 0 2 32 1 0 2 32 95 0 16 2 1 9 0 52 2 0 2 33 14 0 20 10 0 16 0 1 6 0 3 49 3 32 69 0 16 1 1 11 0 52 2 0 2 33 16 0 20 12 0 16 0 1 11 0 1 13 0 49 3 32 41 0 16 1 1 14 0 52 2 0 2 33 16 0 20 12 0 16 0 1 14 0 1 15 0 49 3 32 13 0 20 12 0 16 0 1 16 0 1 17 0 49 3 50)} {:upvalue-count 0 :arity 1 :constants ("first") :bytecode (16 0 52 0 0 1 50)} {:upvalue-count 0 :arity 1 :constants ("last") :bytecode (16 0 52 0 0 1 50)} "hs-template" {:upvalue-count 0 :arity 1 :constants ("" 0 "len" {:upvalue-count 5 :arity 0 :constants ("<" "nth" "=" "$" "+" 1 "{" 2 {:upvalue-count 3 :arity 2 :constants (">=" "=" "nth" "}" 1 "+" "-" "{") :bytecode (16 0 18 0 52 0 0 2 33 5 0 16 0 32 118 0 18 1 16 0 52 2 0 2 1 3 0 52 1 0 2 33 42 0 16 1 1 4 0 52 1 0 2 33 5 0 16 0 32 22 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 6 0 2 49 2 32 58 0 18 1 16 0 52 2 0 2 1 7 0 52 1 0 2 33 25 0 18 2 16 0 1 4 0 52 5 0 2 16 1 1 4 0 52 5 0 2 49 2 32 15 0 18 2 16 0 1 4 0 52 5 0 2 16 1 49 2 50)} "slice" "str" "cek-eval" "hs-to-sx" "hs-compile" {:upvalue-count 3 :arity 1 :constants ("<" "nth" ">=" "a" "<=" "z" "A" "Z" "0" "9" "=" "_" "." "+" 1) :bytecode (16 0 18 0 52 0 0 2 6 33 118 0 5 18 1 16 0 52 1 0 2 17 1 16 1 1 3 0 52 2 0 2 6 33 10 0 5 16 1 1 5 0 52 4 0 2 6 34 80 0 5 16 1 1 6 0 52 2 0 2 6 33 10 0 5 16 1 1 7 0 52 4 0 2 6 34 52 0 5 16 1 1 8 0 52 2 0 2 6 33 10 0 5 16 1 1 9 0 52 4 0 2 6 34 24 0 5 16 1 1 11 0 52 10 0 2 6 34 10 0 5 16 1 1 12 0 52 10 0 2 33 16 0 18 2 16 0 1 14 0 52 13 0 2 49 1 32 2 0 16 0 50)}) :bytecode (18 0 18 1 52 0 0 2 33 13 1 18 2 18 0 52 1 0 2 17 0 16 0 1 3 0 52 2 0 2 6 33 16 0 5 18 0 1 5 0 52 4 0 2 18 1 52 0 0 2 33 197 0 18 2 18 0 1 5 0 52 4 0 2 52 1 0 2 1 6 0 52 2 0 2 33 91 0 18 0 1 7 0 52 4 0 2 17 1 51 8 0 0 1 0 2 1 2 17 2 5 16 2 16 1 1 5 0 48 2 17 3 18 2 16 1 16 3 52 9 0 3 17 4 18 3 20 11 0 20 12 0 20 13 0 16 4 48 1 48 1 48 1 52 10 0 2 19 3 5 16 3 1 5 0 52 4 0 2 19 0 5 18 4 49 0 32 78 0 18 0 1 5 0 52 4 0 2 17 1 51 14 0 0 1 0 2 1 2 17 2 5 16 2 16 1 48 1 17 3 18 2 16 1 16 3 52 9 0 3 17 4 18 3 20 11 0 20 12 0 20 13 0 16 4 48 1 48 1 48 1 52 10 0 2 19 3 5 16 3 19 0 5 18 4 49 0 32 27 0 18 3 16 0 52 10 0 2 19 3 5 18 0 1 5 0 52 4 0 2 19 0 5 18 4 49 0 32 1 0 2 50)}) :bytecode (1 0 0 17 1 1 1 0 17 2 16 0 52 2 0 1 17 3 51 3 0 1 2 1 3 1 0 1 1 1 4 17 4 5 16 4 48 0 5 16 1 50)} "hs-make-object" {:upvalue-count 0 :arity 1 :constants ("for-each" {:upvalue-count 1 :arity 1 :constants ("dict-set!" "first" "nth" 1) :bytecode (18 0 16 0 52 1 0 1 16 0 1 3 0 52 2 0 2 52 0 0 3 50)}) :bytecode (65 0 0 17 1 51 1 0 1 1 16 0 52 0 0 2 5 16 1 50)} "hs-method-call" {:upvalue-count 0 :arity 3 :constants ("=" "map" "first" "push" "append!" "filter" "join" "indexOf" {:upvalue-count 2 :arity 2 :constants ("=" "len" 0 -1 "first" "rest" "+" 1) :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 6 0 1 3 0 32 39 0 16 0 52 4 0 1 18 0 52 0 0 2 33 5 0 16 1 32 19 0 18 1 16 0 52 5 0 1 16 1 1 7 0 52 6 0 2 49 2 50)} 0) :rest-arity 2 :bytecode (16 1 1 1 0 52 0 0 2 33 15 0 16 2 52 2 0 1 16 0 52 1 0 2 32 127 0 16 1 1 3 0 52 0 0 2 33 18 0 16 0 16 2 52 2 0 1 52 4 0 2 5 16 0 32 97 0 16 1 1 5 0 52 0 0 2 33 15 0 16 2 52 2 0 1 16 0 52 5 0 2 32 70 0 16 1 1 6 0 52 0 0 2 33 15 0 16 0 16 2 52 2 0 1 52 6 0 2 32 43 0 16 1 1 7 0 52 0 0 2 33 30 0 16 2 52 2 0 1 17 3 51 8 0 1 3 1 4 17 4 5 16 4 16 0 1 9 0 49 2 32 1 0 2 50)} "hs-beep" {:upvalue-count 0 :arity 1 :constants () :bytecode (16 0 50)} "hs-prop-is" {:upvalue-count 0 :arity 2 :constants ("not" "hs-falsy?" "host-get") :bytecode (20 1 0 16 0 16 1 52 2 0 2 48 1 52 0 0 1 50)} "hs-slice" {:upvalue-count 0 :arity 3 :constants ("nil?" 0 "len" "+" 1 "slice") :bytecode (16 1 52 0 0 1 33 6 0 1 1 0 32 2 0 16 1 17 3 16 2 52 0 0 1 33 9 0 16 0 52 2 0 1 32 9 0 16 2 1 4 0 52 3 0 2 17 4 16 0 16 3 16 4 52 5 0 3 50)} "hs-sorted-by" {:upvalue-count 0 :arity 2 :constants ("map" {:upvalue-count 1 :arity 1 :constants ("list") :bytecode (18 0 16 0 48 1 16 0 52 0 0 2 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1) :bytecode (16 0 1 1 0 52 0 0 2 50)} "sort" {:upvalue-count 0 :arity 2 :constants ("<" "first") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 33 4 0 3 32 1 0 4 50)}) :bytecode (51 1 0 1 1 16 0 52 0 0 2 17 2 51 2 0 51 4 0 16 2 52 3 0 2 52 0 0 2 50)} "hs-sorted-by-desc" {:upvalue-count 0 :arity 2 :constants ("map" {:upvalue-count 1 :arity 1 :constants ("list") :bytecode (18 0 16 0 48 1 16 0 52 0 0 2 50)} {:upvalue-count 0 :arity 1 :constants ("nth" 1) :bytecode (16 0 1 1 0 52 0 0 2 50)} "sort" {:upvalue-count 0 :arity 2 :constants (">" "first") :bytecode (16 0 52 1 0 1 16 1 52 1 0 1 52 0 0 2 33 4 0 3 32 1 0 4 50)}) :bytecode (51 1 0 1 1 16 0 52 0 0 2 17 2 51 2 0 51 4 0 16 2 52 3 0 2 52 0 0 2 50)} "hs-split-by" {:upvalue-count 0 :arity 2 :constants ("split") :bytecode (16 0 16 1 52 0 0 2 50)} "hs-joined-by" {:upvalue-count 0 :arity 2 :constants ("join") :bytecode (16 1 16 0 52 0 0 2 50)} {:upvalue-count 0 :arity 2 :constants ("map" {:upvalue-count 1 :arity 1 :constants ("list") :bytecode (18 0 16 0 48 1 16 0 52 0 0 2 50)} "sort" "first" {:upvalue-count 1 :arity 3 :constants ("=" "len" 0 "first" {:upvalue-count 2 :arity 1 :constants ("=" "len" 0 "first" "rest") :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 4 0 2 32 38 0 16 0 52 3 0 1 52 3 0 1 18 0 52 0 0 2 33 9 0 16 0 52 3 0 1 32 10 0 18 1 16 0 52 4 0 1 49 1 50)} "rest" "append" "list" "nth" 1 "filter" {:upvalue-count 1 :arity 1 :constants ("not" "=") :bytecode (16 0 18 0 52 1 0 2 52 0 0 1 50)}) :bytecode (16 0 52 1 0 1 1 2 0 52 0 0 2 33 5 0 16 1 32 66 0 16 0 52 3 0 1 17 3 51 4 0 1 3 1 4 17 4 5 16 4 16 2 48 1 17 5 18 0 16 0 52 5 0 1 16 1 16 5 1 9 0 52 8 0 2 52 7 0 1 52 6 0 2 51 11 0 1 5 16 2 52 10 0 2 49 3 50)} "list") :bytecode (51 1 0 1 1 16 0 52 0 0 2 17 2 20 3 0 16 2 52 0 0 2 52 2 0 1 17 3 51 4 0 1 4 17 4 5 16 4 16 3 52 5 0 0 16 2 49 3 50)} {:upvalue-count 0 :arity 2 :constants ("reverse" "hs-sorted-by") :bytecode (20 1 0 16 0 16 1 48 2 52 0 0 1 50)}) :bytecode (51 1 0 128 0 0 5 51 3 0 128 2 0 5 51 3 0 128 4 0 5 51 6 0 128 5 0 5 51 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 51 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 5 51 72 0 128 71 0 5 51 74 0 128 73 0 5 51 76 0 128 75 0 5 51 78 0 128 77 0 5 51 80 0 128 79 0 5 51 82 0 128 81 0 5 51 84 0 128 83 0 5 51 86 0 128 85 0 5 51 88 0 128 87 0 5 51 90 0 128 89 0 5 51 92 0 128 91 0 5 51 94 0 128 93 0 5 51 96 0 128 95 0 5 51 98 0 128 97 0 5 51 100 0 128 99 0 5 51 102 0 128 101 0 5 51 104 0 128 103 0 5 51 106 0 128 105 0 5 51 108 0 128 107 0 5 51 110 0 128 109 0 5 51 112 0 128 111 0 5 51 114 0 128 113 0 5 51 116 0 128 115 0 5 51 118 0 128 117 0 5 51 119 0 128 53 0 5 51 120 0 128 55 0 5 51 122 0 128 121 0 5 51 124 0 128 123 0 5 51 126 0 128 125 0 5 51 128 0 128 127 0 5 51 130 0 128 129 0 5 51 132 0 128 131 0 5 51 134 0 128 133 0 5 51 136 0 128 135 0 5 51 138 0 128 137 0 5 51 140 0 128 139 0 5 51 141 0 128 133 0 5 51 142 0 128 135 0 50))) diff --git a/shared/static/wasm/sx/hs-tokenizer.sx b/shared/static/wasm/sx/hs-tokenizer.sx index 8c473703..2f7707d7 100644 --- a/shared/static/wasm/sx/hs-tokenizer.sx +++ b/shared/static/wasm/sx/hs-tokenizer.sx @@ -104,6 +104,7 @@ "detail" "sender" "index" + "indexed" "increment" "decrement" "append" diff --git a/shared/static/wasm/sx/hs-tokenizer.sxbc b/shared/static/wasm/sx/hs-tokenizer.sxbc index 0644c272..1927fc80 100644 --- a/shared/static/wasm/sx/hs-tokenizer.sxbc +++ b/shared/static/wasm/sx/hs-tokenizer.sxbc @@ -1,3 +1,3 @@ -(sxbc 1 "80ca8e05d1d2f598" +(sxbc 1 "be3c39498bca9a8b" (code - :constants ("hs-make-token" {:upvalue-count 0 :arity 3 :constants ("pos" "value" "type") :bytecode (1 0 0 16 2 1 1 0 16 1 1 2 0 16 0 65 3 0 50)} "hs-digit?" {:upvalue-count 0 :arity 1 :constants (">=" "0" "<=" "9") :bytecode (16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 0 1 3 0 52 2 0 2 50)} "hs-letter?" {:upvalue-count 0 :arity 1 :constants (">=" "a" "<=" "z" "A" "Z") :bytecode (16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 0 1 3 0 52 2 0 2 6 34 24 0 5 16 0 1 4 0 52 0 0 2 6 33 10 0 5 16 0 1 5 0 52 2 0 2 50)} "hs-ident-start?" {:upvalue-count 0 :arity 1 :constants ("hs-letter?" "=" "_" "$") :bytecode (20 0 0 16 0 48 1 6 34 24 0 5 16 0 1 2 0 52 1 0 2 6 34 10 0 5 16 0 1 3 0 52 1 0 2 50)} "hs-ident-char?" {:upvalue-count 0 :arity 1 :constants ("hs-letter?" "hs-digit?" "=" "_" "$" "-") :bytecode (20 0 0 16 0 48 1 6 34 50 0 5 20 1 0 16 0 48 1 6 34 38 0 5 16 0 1 3 0 52 2 0 2 6 34 24 0 5 16 0 1 4 0 52 2 0 2 6 34 10 0 5 16 0 1 5 0 52 2 0 2 50)} "hs-ws?" {:upvalue-count 0 :arity 1 :constants ("=" " " "\t" "\n" "\r") :bytecode (16 0 1 1 0 52 0 0 2 6 34 38 0 5 16 0 1 2 0 52 0 0 2 6 34 24 0 5 16 0 1 3 0 52 0 0 2 6 34 10 0 5 16 0 1 4 0 52 0 0 2 50)} "hs-keywords" "list" "on" "end" "set" "to" "put" "into" "before" "after" "add" "remove" "toggle" "if" "else" "otherwise" "then" "from" "in" "of" "for" "until" "wait" "send" "trigger" "call" "get" "take" "log" "hide" "show" "repeat" "while" "times" "forever" "break" "continue" "return" "throw" "catch" "finally" "def" "tell" "make" "fetch" "as" "with" "every" "or" "and" "not" "is" "no" "the" "my" "me" "it" "its" "result" "true" "false" "null" "when" "between" "at" "by" "queue" "elsewhere" "event" "target" "detail" "sender" "index" "increment" "decrement" "append" "settle" "transition" "over" "closest" "next" "previous" "first" "last" "random" "empty" "clear" "swap" "open" "close" "exists" "matches" "contains" "do" "unless" "you" "your" "new" "init" "start" "go" "js" "less" "than" "greater" "class" "anything" "install" "measure" "behavior" "called" "render" "eval" "I" "am" "does" "some" "mod" "equal" "equals" "really" "include" "includes" "contain" "undefined" "exist" "match" "beep" "where" "sorted" "mapped" "split" "joined" "descending" "ascending" "scroll" "select" "reset" "default" "halt" "precedes" "follows" "ignoring" "case" "focus" "blur" "hs-keyword?" {:upvalue-count 0 :arity 1 :constants ("some" {:upvalue-count 1 :arity 1 :constants ("=") :bytecode (16 0 18 0 52 0 0 2 50)} "hs-keywords") :bytecode (51 1 0 1 0 20 2 0 52 0 0 2 50)} "hs-tokenize" {:upvalue-count 0 :arity 1 :constants ("list" 0 "len" {:upvalue-count 3 :arity 1 :constants ("<" "+" "nth") :bytecode (18 0 16 0 52 1 0 2 18 1 52 0 0 2 33 17 0 18 2 18 0 16 0 52 1 0 2 52 2 0 2 32 1 0 2 50)} {:upvalue-count 1 :arity 0 :constants (0) :bytecode (18 0 1 0 0 49 1 50)} {:upvalue-count 1 :arity 1 :constants ("+") :bytecode (18 0 16 0 52 0 0 2 19 0 50)} {:upvalue-count 5 :arity 0 :constants ("<" "hs-ws?" 1) :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 15 0 18 3 1 2 0 48 1 5 18 4 49 0 32 1 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("<" "not" "=" "\n" 1) :bytecode (18 0 18 1 52 0 0 2 6 33 16 0 5 18 2 48 0 1 3 0 52 2 0 2 52 1 0 1 33 15 0 18 3 1 4 0 48 1 5 18 4 49 0 32 1 0 2 50)} {:upvalue-count 6 :arity 1 :constants ("<" "hs-ident-char?" 1 "slice") :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 17 0 18 3 1 2 0 48 1 5 18 4 16 0 48 1 32 1 0 2 5 18 5 16 0 18 0 52 3 0 3 50)} {:upvalue-count 7 :arity 3 :constants ("<" "hs-digit?" 1 "=" "." "+" {:upvalue-count 5 :arity 0 :constants ("<" "hs-digit?" 1) :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 15 0 18 3 1 2 0 48 1 5 18 4 49 0 32 1 0 2 50)} "e" "E" 2 "-" "m" "s" "slice") :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 17 0 18 3 1 2 0 48 1 5 18 4 16 0 48 1 32 1 0 2 5 18 0 18 1 52 0 0 2 6 33 49 0 5 18 2 48 0 1 4 0 52 3 0 2 6 33 33 0 5 18 0 1 2 0 52 5 0 2 18 1 52 0 0 2 6 33 13 0 5 20 1 0 18 5 1 2 0 48 1 48 1 33 31 0 18 3 1 2 0 48 1 5 51 6 0 0 0 0 1 0 2 0 3 1 1 17 1 5 16 1 48 0 32 1 0 2 5 18 0 18 1 52 0 0 2 6 33 140 0 5 18 2 48 0 1 7 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 8 0 52 3 0 2 6 33 108 0 5 18 0 1 2 0 52 5 0 2 18 1 52 0 0 2 6 33 13 0 5 20 1 0 18 5 1 2 0 48 1 48 1 6 34 71 0 5 18 0 1 9 0 52 5 0 2 18 1 52 0 0 2 6 33 51 0 5 18 5 1 2 0 48 1 1 5 0 52 3 0 2 6 34 15 0 5 18 5 1 2 0 48 1 1 10 0 52 3 0 2 6 33 13 0 5 20 1 0 18 5 1 9 0 48 1 48 1 33 86 0 18 3 1 2 0 48 1 5 18 0 18 1 52 0 0 2 6 33 28 0 5 18 2 48 0 1 5 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 10 0 52 3 0 2 33 10 0 18 3 1 2 0 48 1 32 1 0 2 5 51 6 0 0 0 0 1 0 2 0 3 1 2 17 2 5 16 2 48 0 32 1 0 2 5 18 0 17 3 18 0 18 1 52 0 0 2 6 33 28 0 5 18 2 48 0 1 11 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 12 0 52 3 0 2 33 91 0 18 2 48 0 1 11 0 52 3 0 2 6 33 35 0 5 18 0 1 2 0 52 5 0 2 18 1 52 0 0 2 6 33 15 0 5 18 5 1 2 0 48 1 1 12 0 52 3 0 2 33 10 0 18 3 1 9 0 48 1 32 25 0 18 2 48 0 1 12 0 52 3 0 2 33 10 0 18 3 1 2 0 48 1 32 1 0 2 32 1 0 2 5 18 6 16 0 18 0 52 13 0 3 50)} {:upvalue-count 4 :arity 1 :constants ("list" 1 {:upvalue-count 7 :arity 0 :constants (">=" "=" "\\" 1 "<" "n" "append!" "\n" "t" "\t") :bytecode (18 0 18 1 52 0 0 2 33 4 0 2 32 217 0 18 2 48 0 1 2 0 52 1 0 2 33 157 0 18 3 1 3 0 48 1 5 18 0 18 1 52 4 0 2 33 129 0 18 2 48 0 17 0 16 0 1 5 0 52 1 0 2 33 12 0 18 4 1 7 0 52 6 0 2 32 88 0 16 0 1 8 0 52 1 0 2 33 12 0 18 4 1 9 0 52 6 0 2 32 64 0 16 0 1 2 0 52 1 0 2 33 12 0 18 4 1 2 0 52 6 0 2 32 40 0 16 0 18 5 52 1 0 2 33 11 0 18 4 18 5 52 6 0 2 32 18 0 18 4 1 2 0 52 6 0 2 5 18 4 16 0 52 6 0 2 5 18 3 1 3 0 48 1 32 1 0 2 5 18 6 49 0 32 46 0 18 2 48 0 18 5 52 1 0 2 33 10 0 18 3 1 3 0 49 1 32 23 0 18 4 18 2 48 0 52 6 0 2 5 18 3 1 3 0 48 1 5 18 6 49 0 50)} "join" "") :bytecode (52 0 0 0 17 1 18 0 1 1 0 48 1 5 51 2 0 0 1 0 2 0 3 0 0 1 1 1 0 1 2 17 2 5 16 2 48 0 5 1 4 0 16 1 52 3 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("list" 1 {:upvalue-count 7 :arity 0 :constants (">=" "=" "`" 1 "$" "<" "+" "{" "append!" "${" 2 {:upvalue-count 7 :arity 0 :constants ("<" ">" 0 "=" "{" "+" 1 "append!" "}" "-") :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 18 2 1 2 0 52 1 0 2 33 162 0 18 3 48 0 1 4 0 52 3 0 2 33 38 0 18 2 1 6 0 52 5 0 2 19 2 5 18 4 18 3 48 0 52 7 0 2 5 18 5 1 6 0 48 1 5 18 6 49 0 32 107 0 18 3 48 0 1 8 0 52 3 0 2 33 70 0 18 2 1 6 0 52 9 0 2 19 2 5 18 2 1 2 0 52 1 0 2 33 13 0 18 4 18 3 48 0 52 7 0 2 32 1 0 2 5 18 5 1 6 0 48 1 5 18 2 1 2 0 52 1 0 2 33 7 0 18 6 49 0 32 1 0 2 32 23 0 18 4 18 3 48 0 52 7 0 2 5 18 5 1 6 0 48 1 5 18 6 49 0 32 1 0 2 50)} "}") :bytecode (18 0 18 1 52 0 0 2 33 4 0 2 32 165 0 18 2 48 0 1 2 0 52 1 0 2 33 10 0 18 3 1 3 0 49 1 32 141 0 18 2 48 0 1 4 0 52 1 0 2 6 33 35 0 5 18 0 1 3 0 52 6 0 2 18 1 52 5 0 2 6 33 15 0 5 18 4 1 3 0 48 1 1 7 0 52 1 0 2 33 65 0 18 5 1 9 0 52 8 0 2 5 18 3 1 10 0 48 1 5 1 3 0 17 0 51 11 0 0 0 0 1 1 0 0 2 0 5 0 3 1 1 17 1 5 16 1 48 0 5 18 5 1 12 0 52 8 0 2 5 18 6 49 0 32 23 0 18 5 18 2 48 0 52 8 0 2 5 18 3 1 3 0 48 1 5 18 6 49 0 50)} "join" "") :bytecode (52 0 0 0 17 0 18 0 1 1 0 48 1 5 51 2 0 0 1 0 2 0 3 0 0 0 4 1 0 1 1 17 1 5 16 1 48 0 5 1 4 0 16 0 52 3 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("list" 1 {:upvalue-count 7 :arity 0 :constants (">=" "=" "/" "<" "+" 1 ">" 2 "append!") :bytecode (18 0 18 1 52 0 0 2 33 4 0 2 32 86 0 18 2 48 0 1 2 0 52 1 0 2 6 33 35 0 5 18 0 1 5 0 52 4 0 2 18 1 52 3 0 2 6 33 15 0 5 18 3 1 5 0 48 1 1 6 0 52 1 0 2 33 10 0 18 4 1 7 0 49 1 32 23 0 18 5 18 2 48 0 52 8 0 2 5 18 4 1 5 0 48 1 5 18 6 49 0 50)} "join" "") :bytecode (52 0 0 0 17 0 18 0 1 1 0 48 1 5 51 2 0 0 1 0 2 0 3 0 4 0 0 1 0 1 1 17 1 5 16 1 48 0 5 1 4 0 16 0 52 3 0 2 50)} {:upvalue-count 6 :arity 1 :constants ("<" "hs-ident-char?" "=" ":" "[" "]" 1 "slice") :bytecode (18 0 18 1 52 0 0 2 6 33 58 0 5 20 1 0 18 2 48 0 48 1 6 34 44 0 5 18 2 48 0 1 3 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 17 0 18 3 1 6 0 48 1 5 18 4 16 0 48 1 32 1 0 2 5 18 5 16 0 18 0 52 7 0 3 50)} {:upvalue-count 1 :arity 3 :constants ("append!" "hs-make-token") :bytecode (18 0 20 1 0 16 0 16 1 16 2 48 3 52 0 0 2 50)} {:upvalue-count 15 :arity 0 :constants ("<" "=" "/" "+" 1 2 "not" "hs-letter?" "." "#" "[" "*" ":" "selector" "op" ".." "-" "_" "class" "hs-ident-start?" "id" "@" "hs-ident-char?" "attr" "~" "component" "str" "style" "local" "\"" "'" "s" ">=" "string" "`" "template" "hs-digit?" "number" "hs-keyword?" "keyword" "ident" "!" ">" "==" 3 "'s" "(" "paren-open" ")" "paren-close" "bracket-open" "]" "bracket-close" "{" "brace-open" "}" "brace-close" "," "comma" "%" "dot" "\\" "colon") :bytecode (18 0 48 0 5 18 1 18 2 52 0 0 2 33 193 8 18 3 48 0 17 0 18 1 17 1 16 0 1 2 0 52 1 0 2 6 33 35 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 4 0 48 1 1 2 0 52 1 0 2 33 20 0 18 5 1 5 0 48 1 5 18 6 48 0 5 18 7 49 0 32 109 8 16 0 1 0 0 52 1 0 2 6 33 151 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 131 0 5 18 4 1 4 0 48 1 1 1 0 52 1 0 2 52 6 0 1 6 33 108 0 5 20 7 0 18 4 1 4 0 48 1 48 1 6 34 91 0 5 18 4 1 4 0 48 1 1 8 0 52 1 0 2 6 34 72 0 5 18 4 1 4 0 48 1 1 9 0 52 1 0 2 6 34 53 0 5 18 4 1 4 0 48 1 1 10 0 52 1 0 2 6 34 34 0 5 18 4 1 4 0 48 1 1 11 0 52 1 0 2 6 34 15 0 5 18 4 1 4 0 48 1 1 12 0 52 1 0 2 33 21 0 18 8 1 13 0 18 9 48 0 16 1 48 3 5 18 7 49 0 32 177 7 16 0 1 8 0 52 1 0 2 6 33 35 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 4 0 48 1 1 8 0 52 1 0 2 33 28 0 18 8 1 14 0 1 15 0 16 1 48 3 5 18 5 1 5 0 48 1 5 18 7 49 0 32 98 7 16 0 1 8 0 52 1 0 2 6 33 71 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 51 0 5 20 7 0 18 4 1 4 0 48 1 48 1 6 34 34 0 5 18 4 1 4 0 48 1 1 16 0 52 1 0 2 6 34 15 0 5 18 4 1 4 0 48 1 1 17 0 52 1 0 2 33 31 0 18 5 1 4 0 48 1 5 18 8 1 18 0 18 10 18 1 48 1 16 1 48 3 5 18 7 49 0 32 236 6 16 0 1 9 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 19 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 20 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 156 6 16 0 1 21 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 22 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 23 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 76 6 16 0 1 24 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 7 0 18 4 1 4 0 48 1 48 1 33 38 0 18 5 1 4 0 48 1 5 18 8 1 25 0 1 24 0 18 11 18 1 48 1 52 26 0 2 16 1 48 3 5 18 7 49 0 32 245 5 16 0 1 11 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 7 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 27 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 165 5 16 0 1 12 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 19 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 28 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 85 5 16 0 1 29 0 52 1 0 2 6 34 94 0 5 16 0 1 30 0 52 1 0 2 6 33 80 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 56 0 5 18 4 1 4 0 48 1 1 31 0 52 1 0 2 6 33 37 0 5 18 1 1 5 0 52 3 0 2 18 2 52 32 0 2 6 34 17 0 5 20 22 0 18 4 1 5 0 48 1 48 1 52 6 0 1 52 6 0 1 33 23 0 18 8 1 33 0 18 12 16 0 48 1 16 1 48 3 5 18 7 49 0 32 208 4 16 0 1 34 0 52 1 0 2 33 21 0 18 8 1 35 0 18 13 48 0 16 1 48 3 5 18 7 49 0 32 175 4 20 36 0 16 0 48 1 33 23 0 18 8 1 37 0 18 14 16 1 48 1 16 1 48 3 5 18 7 49 0 32 142 4 20 19 0 16 0 48 1 33 43 0 18 11 16 1 48 1 17 2 18 8 20 38 0 16 2 48 1 33 6 0 1 39 0 32 3 0 1 40 0 16 2 16 1 48 3 5 18 7 49 0 32 89 4 16 0 1 1 0 52 1 0 2 6 34 38 0 5 16 0 1 41 0 52 1 0 2 6 34 24 0 5 16 0 1 0 0 52 1 0 2 6 34 10 0 5 16 0 1 42 0 52 1 0 2 6 33 35 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 4 0 48 1 1 1 0 52 1 0 2 33 128 0 16 0 1 1 0 52 1 0 2 6 34 10 0 5 16 0 1 41 0 52 1 0 2 6 33 35 0 5 18 1 1 5 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 5 0 48 1 1 1 0 52 1 0 2 33 29 0 18 8 1 14 0 16 0 1 43 0 52 26 0 2 16 1 48 3 5 18 5 1 44 0 48 1 32 26 0 18 8 1 14 0 16 0 1 1 0 52 26 0 2 16 1 48 3 5 18 5 1 5 0 48 1 5 18 7 49 0 32 124 3 16 0 1 30 0 52 1 0 2 6 33 76 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 56 0 5 18 4 1 4 0 48 1 1 31 0 52 1 0 2 6 33 37 0 5 18 1 1 5 0 52 3 0 2 18 2 52 32 0 2 6 34 17 0 5 20 22 0 18 4 1 5 0 48 1 48 1 52 6 0 1 33 28 0 18 8 1 14 0 1 45 0 16 1 48 3 5 18 5 1 5 0 48 1 5 18 7 49 0 32 4 3 16 0 1 46 0 52 1 0 2 33 28 0 18 8 1 47 0 1 46 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 220 2 16 0 1 48 0 52 1 0 2 33 28 0 18 8 1 49 0 1 48 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 180 2 16 0 1 10 0 52 1 0 2 33 28 0 18 8 1 50 0 1 10 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 140 2 16 0 1 51 0 52 1 0 2 33 28 0 18 8 1 52 0 1 51 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 100 2 16 0 1 53 0 52 1 0 2 33 28 0 18 8 1 54 0 1 53 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 60 2 16 0 1 55 0 52 1 0 2 33 28 0 18 8 1 56 0 1 55 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 20 2 16 0 1 57 0 52 1 0 2 33 28 0 18 8 1 58 0 1 57 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 236 1 16 0 1 3 0 52 1 0 2 33 28 0 18 8 1 14 0 1 3 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 196 1 16 0 1 16 0 52 1 0 2 33 28 0 18 8 1 14 0 1 16 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 156 1 16 0 1 2 0 52 1 0 2 33 28 0 18 8 1 14 0 1 2 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 116 1 16 0 1 1 0 52 1 0 2 33 28 0 18 8 1 14 0 1 1 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 76 1 16 0 1 0 0 52 1 0 2 33 28 0 18 8 1 14 0 1 0 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 36 1 16 0 1 42 0 52 1 0 2 33 28 0 18 8 1 14 0 1 42 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 252 0 16 0 1 41 0 52 1 0 2 33 28 0 18 8 1 14 0 1 41 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 212 0 16 0 1 11 0 52 1 0 2 33 28 0 18 8 1 14 0 1 11 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 172 0 16 0 1 59 0 52 1 0 2 33 28 0 18 8 1 14 0 1 59 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 132 0 16 0 1 8 0 52 1 0 2 33 28 0 18 8 1 60 0 1 8 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 92 0 16 0 1 61 0 52 1 0 2 33 28 0 18 8 1 14 0 1 61 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 52 0 16 0 1 12 0 52 1 0 2 33 28 0 18 8 1 62 0 1 12 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 12 0 18 5 1 4 0 48 1 5 18 7 49 0 32 1 0 2 50)} "eof") :bytecode (52 0 0 0 17 1 1 1 0 17 2 16 0 52 2 0 1 17 3 51 3 0 1 2 1 3 1 0 17 4 5 51 4 0 1 4 17 5 5 51 5 0 1 2 17 6 5 51 6 0 1 2 1 3 1 5 1 6 1 7 17 7 5 51 7 0 1 2 1 3 1 5 1 6 1 8 17 8 5 51 8 0 1 2 1 3 1 5 1 6 1 9 1 0 17 9 5 51 9 0 1 2 1 3 1 5 1 6 1 10 1 4 1 0 17 10 5 51 10 0 1 6 1 2 1 3 1 5 17 11 5 51 11 0 1 6 1 2 1 3 1 5 1 4 17 12 5 51 12 0 1 6 1 2 1 3 1 5 1 4 17 13 5 51 13 0 1 2 1 3 1 5 1 6 1 14 1 0 17 14 5 51 14 0 1 1 17 15 5 51 15 0 1 7 1 2 1 3 1 5 1 4 1 6 1 8 1 16 1 15 1 13 1 14 1 9 1 11 1 12 1 10 17 16 5 16 16 48 0 5 16 15 1 16 0 2 16 2 48 3 5 16 1 50)}) :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 1 14 0 1 15 0 1 16 0 1 17 0 1 18 0 1 19 0 1 20 0 1 21 0 1 22 0 1 23 0 1 24 0 1 25 0 1 26 0 1 27 0 1 28 0 1 29 0 1 30 0 1 31 0 1 32 0 1 33 0 1 34 0 1 35 0 1 36 0 1 37 0 1 38 0 1 39 0 1 40 0 1 41 0 1 42 0 1 43 0 1 44 0 1 45 0 1 46 0 1 47 0 1 48 0 1 49 0 1 50 0 1 51 0 1 52 0 1 53 0 1 54 0 1 55 0 1 56 0 1 57 0 1 58 0 1 59 0 1 60 0 1 61 0 1 62 0 1 63 0 1 64 0 1 65 0 1 66 0 1 67 0 1 68 0 1 69 0 1 70 0 1 71 0 1 72 0 1 73 0 1 74 0 1 75 0 1 76 0 1 77 0 1 78 0 1 79 0 1 80 0 1 81 0 1 82 0 1 83 0 1 84 0 1 85 0 1 86 0 1 87 0 1 88 0 1 89 0 1 90 0 1 91 0 1 92 0 1 93 0 1 94 0 1 95 0 1 96 0 1 97 0 1 98 0 1 99 0 1 100 0 1 101 0 1 102 0 1 103 0 1 104 0 1 105 0 1 106 0 1 107 0 1 108 0 1 109 0 1 110 0 1 111 0 1 112 0 1 113 0 1 114 0 1 115 0 1 116 0 1 117 0 1 118 0 1 119 0 1 120 0 1 121 0 1 122 0 1 123 0 1 124 0 1 125 0 1 126 0 1 127 0 1 128 0 1 129 0 1 130 0 1 131 0 1 132 0 1 133 0 1 134 0 1 135 0 1 136 0 1 137 0 1 138 0 1 139 0 1 140 0 1 141 0 1 142 0 1 143 0 1 144 0 1 145 0 1 146 0 1 147 0 1 148 0 1 149 0 1 150 0 1 151 0 1 152 0 1 153 0 1 154 0 1 155 0 1 156 0 1 157 0 52 13 0 144 128 12 0 5 51 159 0 128 158 0 5 51 161 0 128 160 0 50))) + :constants ("hs-make-token" {:upvalue-count 0 :arity 3 :constants ("pos" "value" "type") :bytecode (1 0 0 16 2 1 1 0 16 1 1 2 0 16 0 65 3 0 50)} "hs-digit?" {:upvalue-count 0 :arity 1 :constants (">=" "0" "<=" "9") :bytecode (16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 0 1 3 0 52 2 0 2 50)} "hs-letter?" {:upvalue-count 0 :arity 1 :constants (">=" "a" "<=" "z" "A" "Z") :bytecode (16 0 1 1 0 52 0 0 2 6 33 10 0 5 16 0 1 3 0 52 2 0 2 6 34 24 0 5 16 0 1 4 0 52 0 0 2 6 33 10 0 5 16 0 1 5 0 52 2 0 2 50)} "hs-ident-start?" {:upvalue-count 0 :arity 1 :constants ("hs-letter?" "=" "_" "$") :bytecode (20 0 0 16 0 48 1 6 34 24 0 5 16 0 1 2 0 52 1 0 2 6 34 10 0 5 16 0 1 3 0 52 1 0 2 50)} "hs-ident-char?" {:upvalue-count 0 :arity 1 :constants ("hs-letter?" "hs-digit?" "=" "_" "$" "-") :bytecode (20 0 0 16 0 48 1 6 34 50 0 5 20 1 0 16 0 48 1 6 34 38 0 5 16 0 1 3 0 52 2 0 2 6 34 24 0 5 16 0 1 4 0 52 2 0 2 6 34 10 0 5 16 0 1 5 0 52 2 0 2 50)} "hs-ws?" {:upvalue-count 0 :arity 1 :constants ("=" " " "\t" "\n" "\r") :bytecode (16 0 1 1 0 52 0 0 2 6 34 38 0 5 16 0 1 2 0 52 0 0 2 6 34 24 0 5 16 0 1 3 0 52 0 0 2 6 34 10 0 5 16 0 1 4 0 52 0 0 2 50)} "hs-keywords" "list" "on" "end" "set" "to" "put" "into" "before" "after" "add" "remove" "toggle" "if" "else" "otherwise" "then" "from" "in" "of" "for" "until" "wait" "send" "trigger" "call" "get" "take" "log" "hide" "show" "repeat" "while" "times" "forever" "break" "continue" "return" "throw" "catch" "finally" "def" "tell" "make" "fetch" "as" "with" "every" "or" "and" "not" "is" "no" "the" "my" "me" "it" "its" "result" "true" "false" "null" "when" "between" "at" "by" "queue" "elsewhere" "event" "target" "detail" "sender" "index" "indexed" "increment" "decrement" "append" "settle" "transition" "over" "closest" "next" "previous" "first" "last" "random" "empty" "clear" "swap" "open" "close" "exists" "matches" "contains" "do" "unless" "you" "your" "new" "init" "start" "go" "js" "less" "than" "greater" "class" "anything" "install" "measure" "behavior" "called" "render" "eval" "I" "am" "does" "some" "mod" "equal" "equals" "really" "include" "includes" "contain" "undefined" "exist" "match" "beep" "where" "sorted" "mapped" "split" "joined" "descending" "ascending" "scroll" "select" "reset" "default" "halt" "precedes" "follows" "ignoring" "case" "focus" "blur" "hs-keyword?" {:upvalue-count 0 :arity 1 :constants ("some" {:upvalue-count 1 :arity 1 :constants ("=") :bytecode (16 0 18 0 52 0 0 2 50)} "hs-keywords") :bytecode (51 1 0 1 0 20 2 0 52 0 0 2 50)} "hs-tokenize" {:upvalue-count 0 :arity 1 :constants ("list" 0 "len" {:upvalue-count 3 :arity 1 :constants ("<" "+" "nth") :bytecode (18 0 16 0 52 1 0 2 18 1 52 0 0 2 33 17 0 18 2 18 0 16 0 52 1 0 2 52 2 0 2 32 1 0 2 50)} {:upvalue-count 1 :arity 0 :constants (0) :bytecode (18 0 1 0 0 49 1 50)} {:upvalue-count 1 :arity 1 :constants ("+") :bytecode (18 0 16 0 52 0 0 2 19 0 50)} {:upvalue-count 5 :arity 0 :constants ("<" "hs-ws?" 1) :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 15 0 18 3 1 2 0 48 1 5 18 4 49 0 32 1 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("<" "not" "=" "\n" 1) :bytecode (18 0 18 1 52 0 0 2 6 33 16 0 5 18 2 48 0 1 3 0 52 2 0 2 52 1 0 1 33 15 0 18 3 1 4 0 48 1 5 18 4 49 0 32 1 0 2 50)} {:upvalue-count 6 :arity 1 :constants ("<" "hs-ident-char?" 1 "slice") :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 17 0 18 3 1 2 0 48 1 5 18 4 16 0 48 1 32 1 0 2 5 18 5 16 0 18 0 52 3 0 3 50)} {:upvalue-count 7 :arity 3 :constants ("<" "hs-digit?" 1 "=" "." "+" {:upvalue-count 5 :arity 0 :constants ("<" "hs-digit?" 1) :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 15 0 18 3 1 2 0 48 1 5 18 4 49 0 32 1 0 2 50)} "e" "E" 2 "-" "m" "s" "slice") :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 20 1 0 18 2 48 0 48 1 33 17 0 18 3 1 2 0 48 1 5 18 4 16 0 48 1 32 1 0 2 5 18 0 18 1 52 0 0 2 6 33 49 0 5 18 2 48 0 1 4 0 52 3 0 2 6 33 33 0 5 18 0 1 2 0 52 5 0 2 18 1 52 0 0 2 6 33 13 0 5 20 1 0 18 5 1 2 0 48 1 48 1 33 31 0 18 3 1 2 0 48 1 5 51 6 0 0 0 0 1 0 2 0 3 1 1 17 1 5 16 1 48 0 32 1 0 2 5 18 0 18 1 52 0 0 2 6 33 140 0 5 18 2 48 0 1 7 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 8 0 52 3 0 2 6 33 108 0 5 18 0 1 2 0 52 5 0 2 18 1 52 0 0 2 6 33 13 0 5 20 1 0 18 5 1 2 0 48 1 48 1 6 34 71 0 5 18 0 1 9 0 52 5 0 2 18 1 52 0 0 2 6 33 51 0 5 18 5 1 2 0 48 1 1 5 0 52 3 0 2 6 34 15 0 5 18 5 1 2 0 48 1 1 10 0 52 3 0 2 6 33 13 0 5 20 1 0 18 5 1 9 0 48 1 48 1 33 86 0 18 3 1 2 0 48 1 5 18 0 18 1 52 0 0 2 6 33 28 0 5 18 2 48 0 1 5 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 10 0 52 3 0 2 33 10 0 18 3 1 2 0 48 1 32 1 0 2 5 51 6 0 0 0 0 1 0 2 0 3 1 2 17 2 5 16 2 48 0 32 1 0 2 5 18 0 17 3 18 0 18 1 52 0 0 2 6 33 28 0 5 18 2 48 0 1 11 0 52 3 0 2 6 34 12 0 5 18 2 48 0 1 12 0 52 3 0 2 33 91 0 18 2 48 0 1 11 0 52 3 0 2 6 33 35 0 5 18 0 1 2 0 52 5 0 2 18 1 52 0 0 2 6 33 15 0 5 18 5 1 2 0 48 1 1 12 0 52 3 0 2 33 10 0 18 3 1 9 0 48 1 32 25 0 18 2 48 0 1 12 0 52 3 0 2 33 10 0 18 3 1 2 0 48 1 32 1 0 2 32 1 0 2 5 18 6 16 0 18 0 52 13 0 3 50)} {:upvalue-count 4 :arity 1 :constants ("list" 1 {:upvalue-count 7 :arity 0 :constants (">=" "=" "\\" 1 "<" "n" "append!" "\n" "t" "\t") :bytecode (18 0 18 1 52 0 0 2 33 4 0 2 32 217 0 18 2 48 0 1 2 0 52 1 0 2 33 157 0 18 3 1 3 0 48 1 5 18 0 18 1 52 4 0 2 33 129 0 18 2 48 0 17 0 16 0 1 5 0 52 1 0 2 33 12 0 18 4 1 7 0 52 6 0 2 32 88 0 16 0 1 8 0 52 1 0 2 33 12 0 18 4 1 9 0 52 6 0 2 32 64 0 16 0 1 2 0 52 1 0 2 33 12 0 18 4 1 2 0 52 6 0 2 32 40 0 16 0 18 5 52 1 0 2 33 11 0 18 4 18 5 52 6 0 2 32 18 0 18 4 1 2 0 52 6 0 2 5 18 4 16 0 52 6 0 2 5 18 3 1 3 0 48 1 32 1 0 2 5 18 6 49 0 32 46 0 18 2 48 0 18 5 52 1 0 2 33 10 0 18 3 1 3 0 49 1 32 23 0 18 4 18 2 48 0 52 6 0 2 5 18 3 1 3 0 48 1 5 18 6 49 0 50)} "join" "") :bytecode (52 0 0 0 17 1 18 0 1 1 0 48 1 5 51 2 0 0 1 0 2 0 3 0 0 1 1 1 0 1 2 17 2 5 16 2 48 0 5 1 4 0 16 1 52 3 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("list" 1 {:upvalue-count 7 :arity 0 :constants (">=" "=" "`" 1 "$" "<" "+" "{" "append!" "${" 2 {:upvalue-count 7 :arity 0 :constants ("<" ">" 0 "=" "{" "+" 1 "append!" "}" "-") :bytecode (18 0 18 1 52 0 0 2 6 33 10 0 5 18 2 1 2 0 52 1 0 2 33 162 0 18 3 48 0 1 4 0 52 3 0 2 33 38 0 18 2 1 6 0 52 5 0 2 19 2 5 18 4 18 3 48 0 52 7 0 2 5 18 5 1 6 0 48 1 5 18 6 49 0 32 107 0 18 3 48 0 1 8 0 52 3 0 2 33 70 0 18 2 1 6 0 52 9 0 2 19 2 5 18 2 1 2 0 52 1 0 2 33 13 0 18 4 18 3 48 0 52 7 0 2 32 1 0 2 5 18 5 1 6 0 48 1 5 18 2 1 2 0 52 1 0 2 33 7 0 18 6 49 0 32 1 0 2 32 23 0 18 4 18 3 48 0 52 7 0 2 5 18 5 1 6 0 48 1 5 18 6 49 0 32 1 0 2 50)} "}") :bytecode (18 0 18 1 52 0 0 2 33 4 0 2 32 165 0 18 2 48 0 1 2 0 52 1 0 2 33 10 0 18 3 1 3 0 49 1 32 141 0 18 2 48 0 1 4 0 52 1 0 2 6 33 35 0 5 18 0 1 3 0 52 6 0 2 18 1 52 5 0 2 6 33 15 0 5 18 4 1 3 0 48 1 1 7 0 52 1 0 2 33 65 0 18 5 1 9 0 52 8 0 2 5 18 3 1 10 0 48 1 5 1 3 0 17 0 51 11 0 0 0 0 1 1 0 0 2 0 5 0 3 1 1 17 1 5 16 1 48 0 5 18 5 1 12 0 52 8 0 2 5 18 6 49 0 32 23 0 18 5 18 2 48 0 52 8 0 2 5 18 3 1 3 0 48 1 5 18 6 49 0 50)} "join" "") :bytecode (52 0 0 0 17 0 18 0 1 1 0 48 1 5 51 2 0 0 1 0 2 0 3 0 0 0 4 1 0 1 1 17 1 5 16 1 48 0 5 1 4 0 16 0 52 3 0 2 50)} {:upvalue-count 5 :arity 0 :constants ("list" 1 {:upvalue-count 7 :arity 0 :constants (">=" "=" "/" "<" "+" 1 ">" 2 "append!") :bytecode (18 0 18 1 52 0 0 2 33 4 0 2 32 86 0 18 2 48 0 1 2 0 52 1 0 2 6 33 35 0 5 18 0 1 5 0 52 4 0 2 18 1 52 3 0 2 6 33 15 0 5 18 3 1 5 0 48 1 1 6 0 52 1 0 2 33 10 0 18 4 1 7 0 49 1 32 23 0 18 5 18 2 48 0 52 8 0 2 5 18 4 1 5 0 48 1 5 18 6 49 0 50)} "join" "") :bytecode (52 0 0 0 17 0 18 0 1 1 0 48 1 5 51 2 0 0 1 0 2 0 3 0 4 0 0 1 0 1 1 17 1 5 16 1 48 0 5 1 4 0 16 0 52 3 0 2 50)} {:upvalue-count 6 :arity 1 :constants ("<" "hs-ident-char?" "=" ":" "[" "]" 1 "slice") :bytecode (18 0 18 1 52 0 0 2 6 33 58 0 5 20 1 0 18 2 48 0 48 1 6 34 44 0 5 18 2 48 0 1 3 0 52 2 0 2 6 34 28 0 5 18 2 48 0 1 4 0 52 2 0 2 6 34 12 0 5 18 2 48 0 1 5 0 52 2 0 2 33 17 0 18 3 1 6 0 48 1 5 18 4 16 0 48 1 32 1 0 2 5 18 5 16 0 18 0 52 7 0 3 50)} {:upvalue-count 1 :arity 3 :constants ("append!" "hs-make-token") :bytecode (18 0 20 1 0 16 0 16 1 16 2 48 3 52 0 0 2 50)} {:upvalue-count 15 :arity 0 :constants ("<" "=" "/" "+" 1 2 "not" "hs-letter?" "." "#" "[" "*" ":" "selector" "op" ".." "-" "_" "class" "hs-ident-start?" "id" "@" "hs-ident-char?" "attr" "~" "component" "str" "style" "local" "\"" "'" "s" ">=" "string" "`" "template" "hs-digit?" "number" "hs-keyword?" "keyword" "ident" "!" ">" "==" 3 "'s" "(" "paren-open" ")" "paren-close" "bracket-open" "]" "bracket-close" "{" "brace-open" "}" "brace-close" "," "comma" "%" "dot" "\\" "colon") :bytecode (18 0 48 0 5 18 1 18 2 52 0 0 2 33 193 8 18 3 48 0 17 0 18 1 17 1 16 0 1 2 0 52 1 0 2 6 33 35 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 4 0 48 1 1 2 0 52 1 0 2 33 20 0 18 5 1 5 0 48 1 5 18 6 48 0 5 18 7 49 0 32 109 8 16 0 1 0 0 52 1 0 2 6 33 151 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 131 0 5 18 4 1 4 0 48 1 1 1 0 52 1 0 2 52 6 0 1 6 33 108 0 5 20 7 0 18 4 1 4 0 48 1 48 1 6 34 91 0 5 18 4 1 4 0 48 1 1 8 0 52 1 0 2 6 34 72 0 5 18 4 1 4 0 48 1 1 9 0 52 1 0 2 6 34 53 0 5 18 4 1 4 0 48 1 1 10 0 52 1 0 2 6 34 34 0 5 18 4 1 4 0 48 1 1 11 0 52 1 0 2 6 34 15 0 5 18 4 1 4 0 48 1 1 12 0 52 1 0 2 33 21 0 18 8 1 13 0 18 9 48 0 16 1 48 3 5 18 7 49 0 32 177 7 16 0 1 8 0 52 1 0 2 6 33 35 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 4 0 48 1 1 8 0 52 1 0 2 33 28 0 18 8 1 14 0 1 15 0 16 1 48 3 5 18 5 1 5 0 48 1 5 18 7 49 0 32 98 7 16 0 1 8 0 52 1 0 2 6 33 71 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 51 0 5 20 7 0 18 4 1 4 0 48 1 48 1 6 34 34 0 5 18 4 1 4 0 48 1 1 16 0 52 1 0 2 6 34 15 0 5 18 4 1 4 0 48 1 1 17 0 52 1 0 2 33 31 0 18 5 1 4 0 48 1 5 18 8 1 18 0 18 10 18 1 48 1 16 1 48 3 5 18 7 49 0 32 236 6 16 0 1 9 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 19 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 20 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 156 6 16 0 1 21 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 22 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 23 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 76 6 16 0 1 24 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 7 0 18 4 1 4 0 48 1 48 1 33 38 0 18 5 1 4 0 48 1 5 18 8 1 25 0 1 24 0 18 11 18 1 48 1 52 26 0 2 16 1 48 3 5 18 7 49 0 32 245 5 16 0 1 11 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 7 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 27 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 165 5 16 0 1 12 0 52 1 0 2 6 33 33 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 13 0 5 20 19 0 18 4 1 4 0 48 1 48 1 33 31 0 18 5 1 4 0 48 1 5 18 8 1 28 0 18 11 18 1 48 1 16 1 48 3 5 18 7 49 0 32 85 5 16 0 1 29 0 52 1 0 2 6 34 94 0 5 16 0 1 30 0 52 1 0 2 6 33 80 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 56 0 5 18 4 1 4 0 48 1 1 31 0 52 1 0 2 6 33 37 0 5 18 1 1 5 0 52 3 0 2 18 2 52 32 0 2 6 34 17 0 5 20 22 0 18 4 1 5 0 48 1 48 1 52 6 0 1 52 6 0 1 33 23 0 18 8 1 33 0 18 12 16 0 48 1 16 1 48 3 5 18 7 49 0 32 208 4 16 0 1 34 0 52 1 0 2 33 21 0 18 8 1 35 0 18 13 48 0 16 1 48 3 5 18 7 49 0 32 175 4 20 36 0 16 0 48 1 33 23 0 18 8 1 37 0 18 14 16 1 48 1 16 1 48 3 5 18 7 49 0 32 142 4 20 19 0 16 0 48 1 33 43 0 18 11 16 1 48 1 17 2 18 8 20 38 0 16 2 48 1 33 6 0 1 39 0 32 3 0 1 40 0 16 2 16 1 48 3 5 18 7 49 0 32 89 4 16 0 1 1 0 52 1 0 2 6 34 38 0 5 16 0 1 41 0 52 1 0 2 6 34 24 0 5 16 0 1 0 0 52 1 0 2 6 34 10 0 5 16 0 1 42 0 52 1 0 2 6 33 35 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 4 0 48 1 1 1 0 52 1 0 2 33 128 0 16 0 1 1 0 52 1 0 2 6 34 10 0 5 16 0 1 41 0 52 1 0 2 6 33 35 0 5 18 1 1 5 0 52 3 0 2 18 2 52 0 0 2 6 33 15 0 5 18 4 1 5 0 48 1 1 1 0 52 1 0 2 33 29 0 18 8 1 14 0 16 0 1 43 0 52 26 0 2 16 1 48 3 5 18 5 1 44 0 48 1 32 26 0 18 8 1 14 0 16 0 1 1 0 52 26 0 2 16 1 48 3 5 18 5 1 5 0 48 1 5 18 7 49 0 32 124 3 16 0 1 30 0 52 1 0 2 6 33 76 0 5 18 1 1 4 0 52 3 0 2 18 2 52 0 0 2 6 33 56 0 5 18 4 1 4 0 48 1 1 31 0 52 1 0 2 6 33 37 0 5 18 1 1 5 0 52 3 0 2 18 2 52 32 0 2 6 34 17 0 5 20 22 0 18 4 1 5 0 48 1 48 1 52 6 0 1 33 28 0 18 8 1 14 0 1 45 0 16 1 48 3 5 18 5 1 5 0 48 1 5 18 7 49 0 32 4 3 16 0 1 46 0 52 1 0 2 33 28 0 18 8 1 47 0 1 46 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 220 2 16 0 1 48 0 52 1 0 2 33 28 0 18 8 1 49 0 1 48 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 180 2 16 0 1 10 0 52 1 0 2 33 28 0 18 8 1 50 0 1 10 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 140 2 16 0 1 51 0 52 1 0 2 33 28 0 18 8 1 52 0 1 51 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 100 2 16 0 1 53 0 52 1 0 2 33 28 0 18 8 1 54 0 1 53 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 60 2 16 0 1 55 0 52 1 0 2 33 28 0 18 8 1 56 0 1 55 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 20 2 16 0 1 57 0 52 1 0 2 33 28 0 18 8 1 58 0 1 57 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 236 1 16 0 1 3 0 52 1 0 2 33 28 0 18 8 1 14 0 1 3 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 196 1 16 0 1 16 0 52 1 0 2 33 28 0 18 8 1 14 0 1 16 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 156 1 16 0 1 2 0 52 1 0 2 33 28 0 18 8 1 14 0 1 2 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 116 1 16 0 1 1 0 52 1 0 2 33 28 0 18 8 1 14 0 1 1 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 76 1 16 0 1 0 0 52 1 0 2 33 28 0 18 8 1 14 0 1 0 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 36 1 16 0 1 42 0 52 1 0 2 33 28 0 18 8 1 14 0 1 42 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 252 0 16 0 1 41 0 52 1 0 2 33 28 0 18 8 1 14 0 1 41 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 212 0 16 0 1 11 0 52 1 0 2 33 28 0 18 8 1 14 0 1 11 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 172 0 16 0 1 59 0 52 1 0 2 33 28 0 18 8 1 14 0 1 59 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 132 0 16 0 1 8 0 52 1 0 2 33 28 0 18 8 1 60 0 1 8 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 92 0 16 0 1 61 0 52 1 0 2 33 28 0 18 8 1 14 0 1 61 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 52 0 16 0 1 12 0 52 1 0 2 33 28 0 18 8 1 62 0 1 12 0 16 1 48 3 5 18 5 1 4 0 48 1 5 18 7 49 0 32 12 0 18 5 1 4 0 48 1 5 18 7 49 0 32 1 0 2 50)} "eof") :bytecode (52 0 0 0 17 1 1 1 0 17 2 16 0 52 2 0 1 17 3 51 3 0 1 2 1 3 1 0 17 4 5 51 4 0 1 4 17 5 5 51 5 0 1 2 17 6 5 51 6 0 1 2 1 3 1 5 1 6 1 7 17 7 5 51 7 0 1 2 1 3 1 5 1 6 1 8 17 8 5 51 8 0 1 2 1 3 1 5 1 6 1 9 1 0 17 9 5 51 9 0 1 2 1 3 1 5 1 6 1 10 1 4 1 0 17 10 5 51 10 0 1 6 1 2 1 3 1 5 17 11 5 51 11 0 1 6 1 2 1 3 1 5 1 4 17 12 5 51 12 0 1 6 1 2 1 3 1 5 1 4 17 13 5 51 13 0 1 2 1 3 1 5 1 6 1 14 1 0 17 14 5 51 14 0 1 1 17 15 5 51 15 0 1 7 1 2 1 3 1 5 1 4 1 6 1 8 1 16 1 15 1 13 1 14 1 9 1 11 1 12 1 10 17 16 5 16 16 48 0 5 16 15 1 16 0 2 16 2 48 3 5 16 1 50)}) :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 1 14 0 1 15 0 1 16 0 1 17 0 1 18 0 1 19 0 1 20 0 1 21 0 1 22 0 1 23 0 1 24 0 1 25 0 1 26 0 1 27 0 1 28 0 1 29 0 1 30 0 1 31 0 1 32 0 1 33 0 1 34 0 1 35 0 1 36 0 1 37 0 1 38 0 1 39 0 1 40 0 1 41 0 1 42 0 1 43 0 1 44 0 1 45 0 1 46 0 1 47 0 1 48 0 1 49 0 1 50 0 1 51 0 1 52 0 1 53 0 1 54 0 1 55 0 1 56 0 1 57 0 1 58 0 1 59 0 1 60 0 1 61 0 1 62 0 1 63 0 1 64 0 1 65 0 1 66 0 1 67 0 1 68 0 1 69 0 1 70 0 1 71 0 1 72 0 1 73 0 1 74 0 1 75 0 1 76 0 1 77 0 1 78 0 1 79 0 1 80 0 1 81 0 1 82 0 1 83 0 1 84 0 1 85 0 1 86 0 1 87 0 1 88 0 1 89 0 1 90 0 1 91 0 1 92 0 1 93 0 1 94 0 1 95 0 1 96 0 1 97 0 1 98 0 1 99 0 1 100 0 1 101 0 1 102 0 1 103 0 1 104 0 1 105 0 1 106 0 1 107 0 1 108 0 1 109 0 1 110 0 1 111 0 1 112 0 1 113 0 1 114 0 1 115 0 1 116 0 1 117 0 1 118 0 1 119 0 1 120 0 1 121 0 1 122 0 1 123 0 1 124 0 1 125 0 1 126 0 1 127 0 1 128 0 1 129 0 1 130 0 1 131 0 1 132 0 1 133 0 1 134 0 1 135 0 1 136 0 1 137 0 1 138 0 1 139 0 1 140 0 1 141 0 1 142 0 1 143 0 1 144 0 1 145 0 1 146 0 1 147 0 1 148 0 1 149 0 1 150 0 1 151 0 1 152 0 1 153 0 1 154 0 1 155 0 1 156 0 1 157 0 1 158 0 52 13 0 145 128 12 0 5 51 160 0 128 159 0 5 51 162 0 128 161 0 50))) diff --git a/shared/static/wasm/sx/module-manifest.json b/shared/static/wasm/sx/module-manifest.json index fd97870a..21108997 100644 --- a/shared/static/wasm/sx/module-manifest.json +++ b/shared/static/wasm/sx/module-manifest.json @@ -990,8 +990,13 @@ "hs-toggle-class!", "hs-toggle-between!", "hs-toggle-style!", + "hs-toggle-style-between!", + "hs-toggle-style-cycle!", "hs-take!", "hs-put!", + "hs-add-to!", + "hs-remove-from!", + "hs-set-on!", "hs-navigate!", "hs-scroll!", "hs-halt!", @@ -1007,6 +1012,8 @@ "hs-repeat-times", "hs-repeat-forever", "hs-repeat-while", + "hs-repeat-until", + "hs-for-each", "hs-fetch", "hs-coerce", "hs-add", @@ -1056,7 +1063,6 @@ "hs-runtime" ], "exports": [ - "hs-handler", "hs-activate!", "hs-boot!", "hs-boot-subtree!"