diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-05-25 23:18:55 +0200 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-05-25 23:18:55 +0200 |
commit | 26929de58ec387bcdac0010067c310dbc6ff0d2a (patch) | |
tree | 4032bb427c06772f5f19d7364ca3ace2ac7372d8 /scheme/plt | |
parent | 2b5abe839c5cbf34fa19e2298366973c4ec812f9 (diff) | |
download | geiser-guile-26929de58ec387bcdac0010067c310dbc6ff0d2a.tar.gz geiser-guile-26929de58ec387bcdac0010067c310dbc6ff0d2a.tar.bz2 |
module-children -> module-exports.
Diffstat (limited to 'scheme/plt')
-rw-r--r-- | scheme/plt/geiser.ss | 4 | ||||
-rw-r--r-- | scheme/plt/geiser/modules.ss | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/scheme/plt/geiser.ss b/scheme/plt/geiser.ss index ed3d9d4..585b69c 100644 --- a/scheme/plt/geiser.ss +++ b/scheme/plt/geiser.ss @@ -40,7 +40,7 @@ geiser:module-completions geiser:symbol-location geiser:module-location - geiser:module-children + geiser:module-exports geiser:autodoc geiser:help) @@ -61,7 +61,7 @@ (define geiser:module-completions module-completions) (define geiser:symbol-location symbol-location) (define geiser:module-location module-location) - (define geiser:module-children module-children) + (define geiser:module-exports module-exports) (define geiser:macroexpand macroexpand) (current-prompt-read (compose (make-repl-reader (current-prompt-read)) diff --git a/scheme/plt/geiser/modules.ss b/scheme/plt/geiser/modules.ss index 02287e0..cee90ef 100644 --- a/scheme/plt/geiser/modules.ss +++ b/scheme/plt/geiser/modules.ss @@ -28,7 +28,7 @@ module-path-name->name module-spec->path-name module-list - module-children) + module-exports) (require srfi/13 scheme/enter syntax/modresolve syntax/modcode) @@ -128,7 +128,7 @@ string<?))) module-cache) -(define (module-children mod) +(define (module-exports mod) (define (extract-ids ls) (append-map (lambda (idls) (map car (cdr idls))) |