[CM] value of 'define'

[Elijah Stone]

On Fri, 30 Jul 2021, Gregg Reynolds wrote:

> It looks like s7 define returns the value defined:

> Is there any way to turn that off?  I can tell my _to_string function 
> not to print the ast, but I still want this to print the ast:

(define define
   (let ((o-define define))
     (macro (k v)
       `(begin
          (,o-define ,k ,v)
          ',k))))