#!/usr/bin/env nujel
[defun test-walker []
[def ret 0]
[for [i 1 1,000,000]
[set! ret [+ ret i]]]
ret]
[defnd test-bc []
[def ret 0]
[for [i 1 10,000,000]
[set! ret [add/int ret i]]]
ret]
[println [test-bc]]
