File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change 16
16
(:refer-clojure :exclude (replace remove next))
17
17
(:require [rewrite-clj.node.protocols :as node]))
18
18
19
- (defn zipper
19
+ (defn ^:no-doc zipper
20
20
" Creates a new zipper structure."
21
21
[root]
22
22
{:node root
42
42
(seq (node/children node))
43
43
(throw (Exception. " called children on a leaf node" ))))
44
44
45
- (defn make-node
45
+ (defn ^:no-doc make-node
46
46
" Returns a new branch node, given an existing node and new
47
47
children. The loc is only used to supply the constructor."
48
48
[loc node children]
49
49
(node/replace-children node children))
50
50
51
51
(defn position
52
- " Returns [row col] of the start of the current node"
52
+ " Returns the ones-based [row col] of the start of the current node"
53
53
[loc]
54
54
(:position loc))
55
55
You can’t perform that action at this time.
0 commit comments