diff options
author | Rob Browning <rlb@defaultvalue.org> | 2024-06-23 13:25:53 -0500 |
---|---|---|
committer | Rob Browning <rlb@defaultvalue.org> | 2024-07-12 17:49:45 -0500 |
commit | d99ae68f882947a962a8911655fa8104bb24e124 (patch) | |
tree | e54e73a815d93ffa7db091506e54e24639646fcf /module/system | |
parent | 522f3687194f31b178f8b92d438bc89ce873eb83 (diff) | |
download | guile-d99ae68f882947a962a8911655fa8104bb24e124.tar.gz |
define-meta-command: mention effects of a missing category
module/system/repl/command.scm: add comment.
Diffstat (limited to 'module/system')
-rw-r--r-- | module/system/repl/command.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm index ca7450610..8b0422dbd 100644 --- a/module/system/repl/command.scm +++ b/module/system/repl/command.scm @@ -235,6 +235,8 @@ (define-meta-command ((name category) repl () . datums) docstring b0 b1 ...)) + ;; These cases (with category #f) will only produce functional + ;; commands if the name is already in the *command-table*. ((_ (name repl (expression0 ...) . datums) docstring b0 b1 ...) (define-meta-command ((name #f) repl (expression0 ...) . datums) docstring b0 b1 ...)) |