shithub: sl

ref: 0c4fd3940ae5e9ee321c600a47ca2a2c92e4c5d6
dir: /disenv.lsp/

View raw version
#!/usr/bin/env flisp
(for-each (lambda (e)
           (let ((v (top-level-value e)))
                (when (and (function? v)
                           (not (builtin? v)))
                      (print e)
                      (newline)
                      (disassemble v)
                      (newline))))
          (environment))