On 10/19/19 12:04 PM, Christopher Howard wrote:
Below is something I played with years ago. I'm not sure kill-opt is
up to date. Try with
> (load "jtd.scm")
> (foo)
[1]> ,loc
The code seems to evaluate fine, but does not produce useful results:
```
scheme@(guile-user)> ,use (potluck jtd)
scheme@(guile-user)> (foo)
scheme@(guile-user) [1]> ,loc
While executing meta-command:
Wrong type (expecting string): #f
scheme@(guile-user) [1]> ,locals
No local variables.
```
On guile 2.2.3, ubuntu 18.04 I get this:
scheme@(guile-user)> (load "jtd.scm")
scheme@(guile-user)> (foo)
scheme@(guile-user) [1]> ,loc
(let iter ((sum 0) (vals '(1 2 3 5 8 2)))
* (if (zero? sum) (jump-to-debugger))
(cond