~subsetpark/fugue

ref: 1a4cc8d88618497c21e2f00ec33c314445530024 fugue/test/namespaces.janet -rw-r--r-- 768 bytes
1a4cc8d8 — Zach Smith Update init form to work when a proto is based on a raw table 1 year, 6 months ago 
                                                                                
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
(use testament)
(import /fugue)

(import /test-support/a)
(import /test-support/b)

(deftest multiple-file-multi-extend
  (is (= 11 (a/f 10))))

(deftest namespaced-allocations
  (let [a-b (:new b/B)]
    (fugue/allocate a-b :base-attr "base")
    (fugue/allocate a-b :child-attr "child")
    (is (= (a/A :base-attr) "base"))
    (is (= (a-b :base-attr) "base"))

    (is (= (b/B :child-attr) "child"))
    (is (= (a-b :child-attr) "child"))))

(deftest overlapping-defmultis
  (is (= "ok!" (a/g "ok")))
  # g was defined for strings in a, but not b.
  (is (thrown? (b/g "ok")))
  (is (= 12 (b/g 10))))

(deftest declare-open-with-fallback-in-first-module
  (is (= 2 (a/h 1)))
  (is (= :ok (a/h :ok)))
  (is (= "myname" (a/h (b/new-B :name "myname")))))

(run-tests!)