maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Lint prelude.el

Browse source 
This was a doozey because I use it everywhere. Is there a better way to globally
rename things? Aye aye aye... computers, man!
This commit is contained in:
William Carroll 2020-08-31 17:05:31 +01:00
parent 5d3bb0b7ea
commit ff8277625f
29 changed files with 163 additions and 164 deletions
Download patch file Download diff file Expand all files Collapse all files

12
emacs/.emacs.d/wpc/tree.el
View file

@ -184,13 +184,13 @@ A tree is balanced if none of the differences between any two depths of two leaf
(list (tree-node 9)
(tree-node 10)))))))
;; instance?
(prelude/assert (tree-instance? tree-a))
(prelude/assert (tree-instance? tree-b))
(prelude/refute (tree-instance? '(1 2 3)))
(prelude/refute (tree-instance? "oak"))
(prelude-assert (tree-instance? tree-a))
(prelude-assert (tree-instance? tree-b))
(prelude-refute (tree-instance? '(1 2 3)))
(prelude-refute (tree-instance? "oak"))
;; balanced?
(prelude/assert (tree-balanced? 1 tree-a))
(prelude/refute (tree-balanced? 1 tree-b))
(prelude-assert (tree-balanced? 1 tree-a))
(prelude-refute (tree-balanced? 1 tree-b))
(message "Tests pass!")))
(provide 'tree)