16af3ae9fc
This commit updates all example files to use `assert_eq!` for verifying output, replacing the previous `Output:` comments. This change makes the examples more robust and self-testing. The benchmark results in some examples have also been slightly adjusted, reflecting minor performance variations after the refactoring. Additionally, a runtime panic handling mechanism has been introduced in the VM for function calls, which improves error reporting for unexpected panics.
13 lines
239 B
Plaintext
13 lines
239 B
Plaintext
;; Benchmark: 110ns
|
|
;; Benchmark-Repeat: 19224
|
|
(do
|
|
(macro wrap [f] `(fn [x] (~f x)))
|
|
|
|
(def add1 (fn [x] (+ x 1)))
|
|
(def add2 (fn [x] (+ x 2)))
|
|
|
|
(def w1 (wrap add1))
|
|
(def w2 (wrap add2))
|
|
|
|
(assert-eq 13 (w1 (w2 10))))
|