~subsetpark/fugue

fugue/test-support/b.janet -rw-r--r-- 208 bytes
55567281 — Zach Smith fix #14 - eval symbol when processing match 1 year, 6 months ago
                                                                                
1
2
3
4
5
6
7
8
9
10
(use /fugue)
(import /test-support/a)

(extend-multi a/f [:number] [n] (inc n))

(defproto B a/A child-attr {:allocation :prototype})

(defmulti g [:number] [n] (+ n 2))

(extend-multi a/h [B] [b] (b :name))