Login
7 branches 0 tags
Ben (X13/Arch) Faster loops? 9fbe3cb 3 years ago 697 Commits
nujel / benchmark / for / nujel.nuj
#!/usr/bin/env nujel

[defn test-bytecode [runs]
      [def ret 0]
      [for [i 0 10,000,000]
        [set! ret [+ ret i]]]
      [return ret]]

[pfmtln "The result is: {}" [test-bytecode]]