Print debugging statement: Difference between revisions

Content added Content deleted
(→‎Insitux: inclusion)
m (→‎Insitux: formatting improvement)
Line 384: Line 384:


<syntaxhighlight lang="insitux">
<syntaxhighlight lang="insitux">
(for s (-> (symbols) (filter about) (remove ["print" "mock" "unmocked" "unmock" "do" "reset"]))
(for s (-> (symbols)
(filter about)
(remove ["print" "mock" "unmocked" "unmock" "do" "reset"]))
(mock s (fn (let result ((unmocked ...) (unmocked s) args))
(mock s (fn (let result ((unmocked ...) (unmocked s) args))
(print "(" s " " ((unmocked join) " " args) ") => " result)
(print "(" s " " ((unmocked join) " " args) ") => " result)