[Chicken-users] Chicken 4: how to generate toplevel definitions?

[Mario Domenech Goulart]

Hi folks.

Is it possible with chicken 4 to generate toplevel (or module-level)
definitions from a macro (explicit renaming)?

I mean, I'd like something like:

  (module gen-things *
  
    (define-syntax gen-thing
        (lambda (thing)
          `(define ,thing (lambda () (display "hello")))))
  
    (gen-thing one-thing)
  )

So I could use `one-thing' from module `gen-things'.

Best wishes.
Mario