Created
December 20, 2023 12:50
-
-
Save ryoakg/6c61147aa7b0c77eee8100b872f3993a to your computer and use it in GitHub Desktop.
create $RLWRAP_HOME/gosh_completions
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #! /usr/bin/env gosh | |
| (require "binary/io") (require "binary/pack") (require "dbi") | |
| (require "dbm") (require "dbm/fsdbm") (require "file/filter") | |
| (require "file/util") (require "gauche/auxsys") (require "gauche/cgen") | |
| (require "gauche/charconv") (require "gauche/collection") (require "gauche/config") | |
| (require "gauche/fcntl") (require "gauche/hook") (require "gauche/libutil") | |
| (require "gauche/listener") (require "gauche/logger") (require "gauche/mop/propagate") | |
| (require "gauche/mop/singleton") (require "gauche/mop/validator") (require "gauche/net") | |
| (require "gauche/package") (require "gauche/package/fetch") (require "gauche/package/util") | |
| (require "gauche/parameter") (require "gauche/parseopt") (require "gauche/process") | |
| (require "gauche/regexp") (require "gauche/selector") (require "gauche/sequence") | |
| (require "gauche/serializer") (require "gauche/syslog") (require "gauche/termios") | |
| (require "gauche/test") (require "gauche/threads") (require "gauche/time") | |
| (require "gauche/uvector") (require "gauche/version") (require "gauche/vport") | |
| (require "math/const") (require "math/mt-random") (require "rfc/822") | |
| (require "rfc/base64") (require "rfc/cookie") (require "rfc/hmac") | |
| (require "rfc/md5") (require "rfc/mime") (require "rfc/quoted-printable") | |
| (require "rfc/sha1") (require "rfc/uri") (require "srfi-0") | |
| (require "srfi-1") (require "srfi-10") (require "srfi-11") | |
| (require "srfi-13") (require "srfi-14") (require "srfi-19") | |
| (require "srfi-2") (require "srfi-26") (require "srfi-27") | |
| (require "srfi-29") (require "srfi-37") (require "srfi-4") | |
| (require "srfi-42") (require "srfi-43") (require "srfi-5") | |
| (require "srfi-9") (require "sxml/adaptor") (require "sxml/serializer") | |
| (require "sxml/ssax") (require "sxml/sxpath") (require "sxml/tools") | |
| (require "sxml/tree-trans") (require "text/csv") (require "text/diff") | |
| (require "text/gettext") (require "text/html-lite") (require "text/info") | |
| (require "text/parse") (require "text/sql") (require "text/tr") | |
| (require "text/tree") (require "util/combinations") (require "util/digest") | |
| (require "util/isomorph") (require "util/lcs") (require "util/list") | |
| (require "util/match") (require "util/queue") (require "util/rbtree") | |
| (require "util/record") (require "util/relation") (require "util/stream") | |
| (require "util/toposort") (require "util/trie") (require "www/cgi") | |
| (require "www/cgi-test") | |
| (use srfi-1) | |
| (define (main args) | |
| (define (register lister modules) | |
| (for-each (lambda (mod) | |
| (for-each (cut hash-table-put! ht <> #t) | |
| (lister mod))) | |
| modules)) | |
| (define ht (make-hash-table)) | |
| (register (lambda (mod) | |
| (hash-table-keys (module-table mod))) | |
| (module-precedence-list (current-module))) | |
| (register module-exports | |
| (all-modules)) | |
| (for-each print | |
| (sort (map symbol->string (hash-table-keys ht)))) | |
| 0) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment