Skip to content

Instantly share code, notes, and snippets.

@keenbug

keenbug/system-repl-command.scm

Created March 28, 2012 15:22
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save keenbug/2227217 to your computer and use it in GitHub Desktop.
Save keenbug/2227217 to your computer and use it in GitHub Desktop.
Download ZIP
fix for describe meta-command in guile
Raw
system-repl-command.scm
(define-meta-command (describe repl (form))
"describe OBJ
Show description/documentation."
(display
(object-documentation
(let ((input (repl-parse repl form)))
(if (symbol? input)
(module-ref (current-module) input)
(repl-eval repl input)))))
(newline))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment