Login
7 branches 0 tags
Ben (Win10) Add support for DOS using Watcom 113d5d2 3 years ago 475 Commits
nujel / tests / obj.nuj
#!/usr/bin/env nujel

[def environment @[]]

[defun eval-in body
  [eval* [cons 'do [cons '[closure! [current-lambda] @[:data environment]] body]]]]

[pfmtln "Before: {environment}"]
[println [eval-in '[def c 1]]]
[println [eval-in '[def a 2]]]
[println [eval-in '[def d 3]]]
[println [eval-in '[def a 4]]]
[pfmtln "After: {environment}"]