mirror of
https://github.com/penpot/penpot.git
synced 2025-06-13 21:31:38 +02:00
🎉 Add worker base implementation.
This commit is contained in:
parent
517b50238e
commit
484702527e
13 changed files with 86 additions and 79 deletions
|
@ -17,14 +17,6 @@
|
|||
[message]
|
||||
(println "Unexpected message:" message))
|
||||
|
||||
;; --- Helpers
|
||||
|
||||
(defn worker?
|
||||
"Check if the code is executed in webworker context."
|
||||
[]
|
||||
(undefined? (.-document js/self)))
|
||||
|
||||
(defn reply!
|
||||
[sender message]
|
||||
(let [message (assoc message :reply-to sender)]
|
||||
(.postMessage js/self (t/encode message))))
|
||||
(defmethod handler :echo
|
||||
[message]
|
||||
message)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue