$ kawa syntax-define.scm
syntax-define.scm:6:10: warning - no declaration seen for x
syntax-define.scm:6:10: unbound location: x
at gnu.mapping.DynamicLocation.get(DynamicLocation.java:36)
at syntax-define.run(syntax-define.scm:6)
at gnu.expr.ModuleExp.evalModule2(ModuleExp.java:290)
at gnu.expr.CompiledModule.evalModule(CompiledModule.java:42)
at gnu.expr.CompiledModule.evalModule(CompiledModule.java:60)
at kawa.Shell.runFile(Shell.java:571)
at kawa.Shell.runFileOrClass(Shell.java:474)
at kawa.repl.processArgs(repl.java:710)
at kawa.repl.main(repl.java:830)
$ kawa --version
Kawa 3.1.1 (git describe: 3.1.1-0-gc47de33ad)
Copyright (C) 2020 Per Bothner
$ cat syntax-define.scm
(define-syntax foo
(syntax-rules ()
((foo) (define x 32))))
(foo)
(display x)
(newline)
Kawa output: