-
-
Notifications
You must be signed in to change notification settings - Fork 147
/
demos.cljs
57 lines (37 loc) · 2.08 KB
/
demos.cljs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
;; core.async
(ns my.async
(:require-macros [cljs.core.async.macros :refer [go]])
(:require [cljs.core.async :refer [timeout <! chan put!]]))
(go
(print 8)
(print 9999))
;; gist
(ns my.async
(:require [viebel.gist-368d3bec58d3ec47e935ad488bafb600.raw.color])) ; https://gist.github.com/viebel/368d3bec58d3ec47e935ad488bafb600
;; gist in url param
http://localhost:5014/index-dbg.html?cljs_in.gist=viebel/368d3bec58d3ec47e935ad488bafb600&eval_only=1
http://localhost:5014/index-dbg.html?cljs_in.gist=viebel/547e5236f52cf3ba04f9cbc495841769&eval_only=1
;; test.check
http://localhost:5014/index-dev.html?cljs_in=(ns%20my.user%0A%20%20(%3Arequire%20%5Bclojure.test.check%20%3Aas%20tc%5D%0A%20%20%20%20%20%20%20%20%20%20%20%20%5Bclojure.test.check.generators%20%3Aas%20gen%5D%0A%20%20%20%20%20%20%20%20%20%20%20%20%5Bclojure.test.check.properties%20%3Aas%20prop%20%3Ainclude-macros%20true%5D))%0A%0A(def%20sort-idempotent-prop%0A%20%20(prop%2Ffor-all%20%5Bv%20(gen%2Fvector%20gen%2Fint)%5D%0A%20%20%20%20(%3D%20(sort%20v)%20(sort%20(sort%20v)))))%0A%0A(tc%2Fquick-check%20100%20sort-idempotent-prop)%0A&eval_only=1&external-libs=%5Bhttps%3A%2F%2Fraw.githubusercontent.com%2Fviebel%2Ftest.check%2Fmaster%2Fsrc%2Fmain%2Fclojure%2F%5D
;; print emoji - klipse first contact
http://localhost:5014/index-dbg.html?cljs_in.gist=viebel/98451d9c3ee2a5cf70fcce52e67e574d
;;color-loop
http://localhost:5014/index-dev.html?cljs_in.gist=viebel/820f672dd176169fd831c7748e6f3cd3
;; cljs-date
(ns my.date
(:require [cljs-time.core :as t :refer [interval date-time in-minutes]]))
[
(date-time 1986 10 14 4 3 27 456)
(in-minutes (interval (date-time 1986 10 2) (date-time 1986 10 14)))]
(ns my.gadjett
(:require-macros [gadjett.core :as gadjett :refer [dbg]]))
(with-out-str
(dbg (map inc [1 23 ])))
(ns my.frame
(:require [viebel.a8a0349b00689c40571b0faaa36a9ae8.raw.foo :refer [square]]))
(square 19)
;;; the following doesn't work
(ns my.color
(:require [viebel.3800b8ebae5292921c7d6fcb6c995c1f.raw.body-color
:refer [set-bg-color]]))
(set-bg-color "red")