Test a function: Difference between revisions

Content added Content deleted
(→‎{{header|jq}}: the output may span more than one line)
(Added EchoLisp)
Line 364: Line 364:
? (x + xreversed).size()
? (x + xreversed).size()
# value: 131072</lang>
# value: 131072</lang>

=={{header|EchoLisp}}==
EchoLisp provides (assert <true-value?> ["fail-message"]) and (check-expect <expression> <expected-result>).
<lang lisp>
(assert (palindrome? "aba")) → #t
(assert (palindrome? "abbbca") "palindrome fail")
💥 error: palindrome fail : assertion failed : (palindrome? abbbca)

(check-expect (palindrome? "aba") #t) → #t
(check-expect (palindrome? "abcda") #f) → #t
(check-expect (palindrome? "abcda") #t)
😐 warning: #t : check failed : (palindrome? abcda) → #f
(assert (palindrome? "un roc lamina l animal cornu")) → #t
</lang>


=={{header|Erlang}}==
=={{header|Erlang}}==