;;; hyperspec-info.el --- Hyperspec help via Emacs Info format ;; Version 0.1.1 ;; Author: Tayssir John Gabbour ;; Keywords: lisp ;; Requirements: ;; * Emacs 21. (Gives us hashtables, though you can trivially ;; rewrite this to use alists; it's not much slower.) ;; Install: ;; * Download ftp://ftp.gnu.org/pub/gnu/gcl/gcl.info.tgz ;; * Unpack it and stick it in some place where info files get read. ;; * Stick this file (hyperspec-info.el) in your LOAD-PATH. ;; * In your .emacs: (require 'hyperspec-info) ;; * (optional) Bind f1 to 'hyperspec-info-lookup in your 'lisp-mode-hook. ;; Bugs: ;; * Not absolutely sure what the gcl.info.tgz document is. ;; (I'm guessing it's dpANS 3 or something. Mentioned on ;; Bill Clementson's blog -- http://bc.tech.coop/blog/031002.html ) ;; * When symbols are punned (like + has two meanings), there is ;; only one info page. For example, + takes you only to the arithmetic ;; + page. ;; * For some reason finding the asterisk symbol (*) doesn't work. ;; But + and / at least takes you to the mathematical symbol pages. ;; Maybe http://bc.tech.coop/blog/040411.html has key? ;; Future features: ;; * Open in different window. (Though pressing q seems to close ;; the window nicely...) ;; * Lookup for FORMAT arguments. ;; License: ;; This file is not part of GNU Emacs, but distributed under the same ;; conditions as GNU Emacs, and is useless without GNU Emacs. ;; GNU Emacs is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation; either version 2, or (at your option) ;; any later version. ;; GNU Emacs is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to ;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, ;; Boston, MA 02111-1307, USA. (provide 'hyperspec-info) ;; I'd think (require 'cl) would give me DEFPARAMETER, but I guess not... (defvar *hyperspec-name-conversion-table* nil) (setq *hyperspec-name-conversion-table* (make-hash-table)) (defvar *hyperspec-name-conversion-data* nil) (setq *hyperspec-name-conversion-data* '((vector-push-extend vector-push) (sbit bit) (bit-andc1 bit-and) (bit-andc2 bit-and) (bit-eqv bit-and) (bit-ior bit-and) (bit-nand bit-and) (bit-nor bit-and) (bit-not bit-and) (bit-orc1 bit-and) (bit-orc2 bit-and) (bit-xor bit-and) (count-if count) (count-if-not count) (nreverse reverse) (stable-sort sort) (find-if find) (find-if-not find) (position-if position) (position-if-not position) (substitute-if substitute) (substitute-if-not substitute) (nsubstitute substitute) (nsubstitute-if substitute) (nsubstitute-if-not substitute) (remove-if remove) (remove-if-not remove) (delete remove) (delete-if remove) (delete-if-not remove) (delete-duplicates remove-duplicates) (schar char) (string-downcase string-upcase) (string-capitalize string-upcase) (nstring-upcase string-upcase) (nstring-downcase string-upcase) (nstring-capitalize string-upcase) (string-left-trim string-trim) (string-right-trim string-trim) (string/= string=) (string< string=) (string> string=) (string<= string=) (string>= string=) (string-equal string=) (string-not-equal string=) (string-lessp string=) (string-greaterp string=) (string-not-greaterp string=) (string-not-lessp string=) (rplacd rplaca) (cdr car) (caar car) (cadr car) (cdar car) (cddr car) (caaar car) (caadr car) (cadar car) (caddr car) (cdaar car) (cdadr car) (cddar car) (cdddr car) (caaaar car) (caaadr car) (caadar car) (caaddr car) (cadaar car) (cadadr car) (caddar car) (cadddr car) (cdaaar car) (cdaadr car) (cdadar car) (cdaddr car) (cddaar car) (cddadr car) (cdddar car) (cddddr car) (nsublis sublis) (subst-if subst) (subst-if-not subst) (nsubst subst) (nsubst-if subst) (nsubst-if-not subst) (list* list) (second first) (third first) (fourth first) (fifth first) (sixth first) (seventh first) (eighth first) (ninth first) (tenth first) (nreconc revappend) (nbutlast butlast) (tailp ldiff) (member-if member) (member-if-not member) (mapcar mapc) (mapcan mapc) (mapl mapc) (maplist mapc) (mapcon mapc) (assoc-if assoc) (assoc-if-not assoc) (rassoc-if rassoc) (rassoc-if-not rassoc) (nintersection intersection) (nset-difference set-difference) (nset-exclusive-or set-exclusive-or) (nunion union) (char/= char=) (char< char=) (char> char=) (char<= char=) (char>= char=) (char-equal char=) (char-not-equal char=) (char-lessp char=) (char-greaterp char=) (char-not-greaterp char=) (char-not-lessp char=) (char-downcase char-upcase) (lower-case-p upper-case-p) (both-case-p upper-case-p) (single-float short-float) (double-float short-float) (long-float short-float) (/= =) (< =) (> =) (<= =) (>= =) (min max) (plusp minusp) (ffloor floor) (ceiling floor) (fceiling floor) (truncate floor) (ftruncate floor) (round floor) (fround floor) (cos sin) (tan sin) (acos asin) (atan asin) (cosh sinh) (tanh sinh) (asinh sinh) (acosh sinh) (atanh sinh) (1- 1+) (oddp evenp) (expt exp) (decf incf) (rem mod) (isqrt sqrt) (imagpart realpart) (denominator numerator) (rationalize rational) (boole-2 boole-1) (boole-and boole-1) (boole-andc1 boole-1) (boole-andc2 boole-1) (boole-c1 boole-1) (boole-c2 boole-1) (boole-clr boole-1) (boole-eqv boole-1) (boole-ior boole-1) (boole-nand boole-1) (boole-nor boole-1) (boole-orc1 boole-1) (boole-orc2 boole-1) (boole-set boole-1) (boole-xor boole-1) (logandc1 logand) (logandc2 logand) (logeqv logand) (logior logand) (lognand logand) (lognor logand) (lognot logand) (logorc1 logand) (logorc2 logand) (logxor logand) (byte-size byte) (byte-position byte) (most-negative-fixnum most-positive-fixnum) (scale-float decode-float) (float-radix decode-float) (float-sign decode-float) (float-digits decode-float) (float-precision decode-float) (integer-decode-float decode-float) (least-positive-short-float most-positive-short-float) (least-positive-normalized-short-float most-positive-short-float) (most-positive-double-float most-positive-short-float) (least-positive-double-float most-positive-short-float) (least-positive-normalized-double-float most-positive-short-float) (most-positive-long-float most-positive-short-float) (least-positive-long-float most-positive-short-float) (least-positive-normalized-long-float most-positive-short-float) (most-positive-single-float most-positive-short-float) (least-positive-single-float most-positive-short-float) (least-positive-normalized-single-float most-positive-short-float) (most-negative-short-float most-positive-short-float) (least-negative-short-float most-positive-short-float) (least-negative-normalized-short-float most-positive-short-float) (most-negative-single-float most-positive-short-float) (least-negative-single-float most-positive-short-float) (least-negative-normalized-single-float most-positive-short-float) (most-negative-double-float most-positive-short-float) (least-negative-double-float most-positive-short-float) (least-negative-normalized-double-float most-positive-short-float) (most-negative-long-float most-positive-short-float) (least-negative-long-float most-positive-short-float) (least-negative-normalized-long-float most-positive-short-float) (short-float-negative-epsilon short-float-epsilon) (single-float-epsilon short-float-epsilon) (single-float-negative-epsilon short-float-epsilon) (double-float-epsilon short-float-epsilon) (double-float-negative-epsilon short-float-epsilon) (long-float-epsilon short-float-epsilon) (long-float-negative-epsilon short-float-epsilon) (arithmetic-error-operation arithmetic-error-operands) (simple-condition-format-arguments simple-condition-format-control) (continue abort) (muffle-warning abort) (store-value abort) (use-value abort) (do-external-symbols do-symbols) (do-all-symbols do-symbols) (do* do) (make-method call-method) (macroexpand-1 macroexpand) (ignorable ignore) (notinline inline) (type-error-expected-type type-error-datum) (labels flet) (macrolet flet) (defvar defparameter) (let* let) (some every) (notevery every) (notany every) (unless when) (ccase case) (ecase case) (ctypecase typecase) (etypecase typecase) (prog* prog) (prog2 prog1) (psetf setf) (read-preserving-whitespace read) (get-dispatch-macro-character set-dispatch-macro-character) (get-macro-character set-macro-character) (pprint-linear pprint-fill) (pprint-tabular pprint-fill) (prin1 write) (print write) (pprint write) (princ write) (prin1-to-string write-to-string) (princ-to-string write-to-string) (*print-radix* *print-base*) (*print-length* *print-level*) (output-stream-p input-stream-p) (fresh-line terpri) (write-line write-string) (force-output finish-output) (clear-output finish-output) (yes-or-no-p y-or-n-p) (two-way-stream-output-stream two-way-stream-input-stream) (echo-stream-output-stream echo-stream-input-stream) (*error-output* *debug-io*) (*query-io* *debug-io*) (*standard-input* *debug-io*) (*standard-output* *debug-io*) (*trace-output* *debug-io*) (pathname-device pathname-host) (pathname-directory pathname-host) (pathname-name pathname-host) (pathname-type pathname-host) (pathname-version pathname-host) (file-namestring namestring) (directory-namestring namestring) (host-namestring namestring) (enough-namestring namestring) (get-decoded-time get-universal-time) (apropos-list apropos) (untrace trace) ;; (++ +) ;; (+++ +) ;; (** *) ;; (*** *) (++ "Top level loop") (+++ "Top level loop") (** "Top level loop") (*** "Top level loop") ;;(// /) (// "Top level loop") ;;(/// /) (/// "Top level loop") (lisp-implementation-version lisp-implementation-type) (long-site-name short-site-name) (software-version software-type) (*compile-file-truename* *compile-file-pathname*) (*load-truename* *load-pathname*) (*compile-verbose* *compile-print*) (*load-verbose* *load-print*) (require provide) ;;(&allow-other-keys &allow-other-keys) (&allow-other-keys "Ordinary Lambda Lists") ;;(&aux &aux) (&aux "Ordinary Lambda Lists") ;;(&body &body) (&body "Macro Lambda Lists") ;;(&environment &environment) (&environment "Macro Lambda Lists") ;;(&key &key) (&key "Specifiers for keyword parameters") ;;(&optional &optional) (&optional "Specifiers for optional parameters") ;;(&rest &rest) (&rest "A specifier for a rest parameter") ;;(&whole &whole) (&whole "Macro Lambda Lists") ;;(* *) (* "Top") (*break-on-signals* *break-on-signals*) (*compile-file-pathname* *compile-file-pathname*) (*compile-print* *compile-print*) (*debug-io* *debug-io*) (*debugger-hook* *debugger-hook*) (*default-pathname-defaults* *default-pathname-defaults*) (*features* *features*) (*gensym-counter* *gensym-counter*) (*load-pathname* *load-pathname*) (*load-print* *load-print*) (*macroexpand-hook* *macroexpand-hook*) (*modules* *modules*) (*package* *package*) (*print-array* *print-array*) (*print-base* *print-base*) (*print-case* *print-case*) (*print-circle* *print-circle*) (*print-escape* *print-escape*) (*print-gensym* *print-gensym*) (*print-level* *print-level*) (*print-lines* *print-lines*) (*print-miser-width* *print-miser-width*) (*print-pprint-dispatch* *print-pprint-dispatch*) (*print-pretty* *print-pretty*) (*print-readably* *print-readably*) (*print-right-margin* *print-right-margin*) (*random-state* *random-state*) (*read-base* *read-base*) (*read-default-float-format* *read-default-float-format*) (*read-eval* *read-eval*) (*read-suppress* *read-suppress*) (*readtable* *readtable*) (*terminal-io* *terminal-io*) (+ +) (- -) (/ /) (1+ 1+) (= =) (abort abort) (abs abs) (acons acons) (add-method add-method) (adjoin adjoin) (adjust-array adjust-array) (adjustable-array-p adjustable-array-p) (allocate-instance allocate-instance) (alpha-char-p alpha-char-p) (alphanumericp alphanumericp) (and and) (append append) (apply apply) (apropos apropos) (aref aref) (arithmetic-error arithmetic-error) (arithmetic-error-operands arithmetic-error-operands) (array array) (array-dimension array-dimension) (array-dimension-limit array-dimension-limit) (array-dimensions array-dimensions) (array-displacement array-displacement) (array-element-type array-element-type) (array-has-fill-pointer-p array-has-fill-pointer-p) (array-in-bounds-p array-in-bounds-p) (array-rank array-rank) (array-rank-limit array-rank-limit) (array-row-major-index array-row-major-index) (array-total-size array-total-size) (array-total-size-limit array-total-size-limit) (arrayp arrayp) (ash ash) (asin asin) (assert assert) (assoc assoc) (atom atom) (base-char base-char) (base-string base-string) (bignum bignum) (bit bit) (bit-and bit-and) (bit-vector bit-vector) (bit-vector-p bit-vector-p) (block block) (boole boole) (boole-1 boole-1) (boolean boolean) (boundp boundp) (break break) (broadcast-stream broadcast-stream) (broadcast-stream-streams broadcast-stream-streams) (built-in-class built-in-class) (butlast butlast) (byte byte) (call-arguments-limit call-arguments-limit) (call-method call-method) (call-next-method call-next-method) (car car) (case case) (catch catch) (cell-error cell-error) (cell-error-name cell-error-name) (cerror cerror) (change-class change-class) (char char) (char-code char-code) (char-code-limit char-code-limit) (char-int char-int) (char-name char-name) (char-upcase char-upcase) (char= char=) (character character) (characterp characterp) (check-type check-type) (cis cis) (class class) (class-name class-name) (class-of class-of) (clear-input clear-input) (close close) (clrhash clrhash) (code-char code-char) (coerce coerce) ;;(compilation-speed compilation-speed) (compilation-speed optimize) (compile compile) (compile-file compile-file) (compile-file-pathname compile-file-pathname) (compiled-function compiled-function) (compiled-function-p compiled-function-p) (compiler-macro compiler-macro) (compiler-macro-function compiler-macro-function) (complement complement) (complex complex) (complexp complexp) (compute-applicable-methods compute-applicable-methods) (compute-restarts compute-restarts) (concatenate concatenate) (concatenated-stream concatenated-stream) (concatenated-stream-streams concatenated-stream-streams) (cond cond) (condition condition) (conjugate conjugate) (cons cons) (consp consp) (constantly constantly) (constantp constantp) (control-error control-error) (copy-alist copy-alist) (copy-list copy-list) (copy-pprint-dispatch copy-pprint-dispatch) (copy-readtable copy-readtable) (copy-seq copy-seq) (copy-structure copy-structure) (copy-symbol copy-symbol) (copy-tree copy-tree) (count count) ;;(debug debug) (debug optimize) (declaim declaim) (declaration declaration) (declare declare) (decode-float decode-float) (decode-universal-time decode-universal-time) (defclass defclass) (defconstant defconstant) (defgeneric defgeneric) (define-compiler-macro define-compiler-macro) (define-condition define-condition) (define-method-combination define-method-combination) (define-modify-macro define-modify-macro) (define-setf-expander define-setf-expander) (define-symbol-macro define-symbol-macro) (defmacro defmacro) (defmethod defmethod) (defpackage defpackage) (defparameter defparameter) (defsetf defsetf) (defstruct defstruct) (deftype deftype) (defun defun) (delete-file delete-file) (delete-package delete-package) (deposit-field deposit-field) (describe describe) (describe-object describe-object) (destructuring-bind destructuring-bind) (digit-char digit-char) (digit-char-p digit-char-p) (directory directory) (disassemble disassemble) (division-by-zero division-by-zero) (do do) (do-symbols do-symbols) (documentation documentation) (dolist dolist) (dotimes dotimes) (dpb dpb) (dribble dribble) (dynamic-extent dynamic-extent) (echo-stream echo-stream) (echo-stream-input-stream echo-stream-input-stream) (ed ed) (elt elt) (encode-universal-time encode-universal-time) (end-of-file end-of-file) (endp endp) (ensure-directories-exist ensure-directories-exist) (ensure-generic-function ensure-generic-function) (eq eq) (eql eql) (equal equal) (equalp equalp) (error error) (eval eval) (eval-when eval-when) (evenp evenp) (every every) (exp exp) (export export) (extended-char extended-char) (fboundp fboundp) (fdefinition fdefinition) (file-author file-author) (file-error file-error) (file-error-pathname file-error-pathname) (file-length file-length) (file-position file-position) (file-stream file-stream) (file-string-length file-string-length) (file-write-date file-write-date) (fill fill) (fill-pointer fill-pointer) (find find) (find-all-symbols find-all-symbols) (find-class find-class) (find-method find-method) (find-package find-package) (find-restart find-restart) (find-symbol find-symbol) (finish-output finish-output) (first first) (fixnum fixnum) (flet flet) (float float) (floating-point-inexact floating-point-inexact) (floating-point-invalid-operation floating-point-invalid-operation) (floating-point-overflow floating-point-overflow) (floating-point-underflow floating-point-underflow) (floatp floatp) (floor floor) (fmakunbound fmakunbound) (format format) (formatter formatter) (ftype ftype) (funcall funcall) (function function) (function-keywords function-keywords) (function-lambda-expression function-lambda-expression) (functionp functionp) (gcd gcd) (generic-function generic-function) (gensym gensym) (gentemp gentemp) (get get) (get-internal-real-time get-internal-real-time) (get-internal-run-time get-internal-run-time) (get-output-stream-string get-output-stream-string) (get-properties get-properties) (get-setf-expansion get-setf-expansion) (get-universal-time get-universal-time) (getf getf) (gethash gethash) (go go) (graphic-char-p graphic-char-p) (handler-bind handler-bind) (handler-case handler-case) (hash-table hash-table) (hash-table-count hash-table-count) (hash-table-p hash-table-p) (hash-table-rehash-size hash-table-rehash-size) (hash-table-rehash-threshold hash-table-rehash-threshold) (hash-table-size hash-table-size) (hash-table-test hash-table-test) (identity identity) (if if) (ignore ignore) (ignore-errors ignore-errors) (import import) (in-package in-package) (incf incf) (initialize-instance initialize-instance) (inline inline) (input-stream-p input-stream-p) (inspect inspect) (integer integer) (integer-length integer-length) (integerp integerp) (interactive-stream-p interactive-stream-p) (intern intern) (internal-time-units-per-second internal-time-units-per-second) (intersection intersection) (invalid-method-error invalid-method-error) (invoke-debugger invoke-debugger) (invoke-restart invoke-restart) (invoke-restart-interactively invoke-restart-interactively) (keyword keyword) (keywordp keywordp) (lambda lambda) (lambda-list-keywords lambda-list-keywords) (lambda-parameters-limit lambda-parameters-limit) (last last) (lcm lcm) (ldb ldb) (ldb-test ldb-test) (ldiff ldiff) (length length) (let let) (lisp-implementation-type lisp-implementation-type) (list list) (list-all-packages list-all-packages) (list-length list-length) (listen listen) (listp listp) (load load) (load-logical-pathname-translations load-logical-pathname-translations) (load-time-value load-time-value) (locally locally) (log log) (logand logand) (logbitp logbitp) (logcount logcount) (logical-pathname logical-pathname) (logical-pathname-translations logical-pathname-translations) (logtest logtest) (loop loop) (loop-finish loop-finish) (machine-instance machine-instance) (machine-type machine-type) (machine-version machine-version) (macro-function macro-function) (macroexpand macroexpand) (make-array make-array) (make-broadcast-stream make-broadcast-stream) (make-concatenated-stream make-concatenated-stream) (make-condition make-condition) (make-dispatch-macro-character make-dispatch-macro-character) (make-echo-stream make-echo-stream) (make-hash-table make-hash-table) (make-instance make-instance) (make-instances-obsolete make-instances-obsolete) (make-list make-list) (make-load-form make-load-form) (make-load-form-saving-slots make-load-form-saving-slots) (make-package make-package) (make-pathname make-pathname) (make-random-state make-random-state) (make-sequence make-sequence) (make-string make-string) (make-string-input-stream make-string-input-stream) (make-string-output-stream make-string-output-stream) (make-symbol make-symbol) (make-synonym-stream make-synonym-stream) (make-two-way-stream make-two-way-stream) (makunbound makunbound) (map map) (map-into map-into) (mapc mapc) (maphash maphash) (mask-field mask-field) (max max) (member member) (merge merge) (merge-pathnames merge-pathnames) (method method) (method-combination method-combination) (method-combination-error method-combination-error) (method-qualifiers method-qualifiers) (minusp minusp) (mismatch mismatch) (mod mod) (most-positive-fixnum most-positive-fixnum) (most-positive-short-float most-positive-short-float) (multiple-value-bind multiple-value-bind) (multiple-value-call multiple-value-call) (multiple-value-list multiple-value-list) (multiple-value-prog1 multiple-value-prog1) (multiple-value-setq multiple-value-setq) (multiple-values-limit multiple-values-limit) (name-char name-char) (namestring namestring) (nconc nconc) (next-method-p next-method-p) (nil nil) (no-applicable-method no-applicable-method) (no-next-method no-next-method) (not not) (nth nth) (nth-value nth-value) (nthcdr nthcdr) (null null) (number number) (numberp numberp) (numerator numerator) (open open) (open-stream-p open-stream-p) (optimize optimize) (or or) (otherwise otherwise) (package package) (package-error package-error) (package-error-package package-error-package) (package-name package-name) (package-nicknames package-nicknames) (package-shadowing-symbols package-shadowing-symbols) (package-use-list package-use-list) (package-used-by-list package-used-by-list) (packagep packagep) (pairlis pairlis) (parse-error parse-error) (parse-integer parse-integer) (parse-namestring parse-namestring) (pathname pathname) (pathname-host pathname-host) (pathname-match-p pathname-match-p) (pathnamep pathnamep) (peek-char peek-char) (phase phase) (pi pi) (pop pop) (position position) (pprint-dispatch pprint-dispatch) (pprint-exit-if-list-exhausted pprint-exit-if-list-exhausted) (pprint-fill pprint-fill) (pprint-indent pprint-indent) (pprint-logical-block pprint-logical-block) (pprint-newline pprint-newline) (pprint-pop pprint-pop) (pprint-tab pprint-tab) (print-not-readable print-not-readable) (print-not-readable-object print-not-readable-object) (print-object print-object) (print-unreadable-object print-unreadable-object) (probe-file probe-file) (proclaim proclaim) (prog prog) (prog1 prog1) (progn progn) (program-error program-error) (progv progv) (provide provide) (psetq psetq) (push push) (pushnew pushnew) (quote quote) (random random) (random-state random-state) (random-state-p random-state-p) (rassoc rassoc) (ratio ratio) (rational rational) (rationalp rationalp) (read read) (read-byte read-byte) (read-char read-char) (read-char-no-hang read-char-no-hang) (read-delimited-list read-delimited-list) (read-from-string read-from-string) (read-line read-line) (read-sequence read-sequence) (reader-error reader-error) (readtable readtable) (readtable-case readtable-case) (readtablep readtablep) (real real) (realp realp) (realpart realpart) (reduce reduce) (reinitialize-instance reinitialize-instance) (remf remf) (remhash remhash) (remove remove) (remove-duplicates remove-duplicates) (remove-method remove-method) (remprop remprop) (rename-file rename-file) (rename-package rename-package) (replace replace) (rest rest) (restart restart) (restart-bind restart-bind) (restart-case restart-case) (restart-name restart-name) (return return) (return-from return-from) (revappend revappend) (reverse reverse) (room room) (rotatef rotatef) (row-major-aref row-major-aref) (rplaca rplaca) ;;(safety safety) (safety optimize) (satisfies satisfies) (search search) (sequence sequence) (serious-condition serious-condition) (set set) (set-difference set-difference) (set-dispatch-macro-character set-dispatch-macro-character) (set-exclusive-or set-exclusive-or) (set-macro-character set-macro-character) (set-pprint-dispatch set-pprint-dispatch) (set-syntax-from-char set-syntax-from-char) (setf setf) (setq setq) (shadow shadow) (shadowing-import shadowing-import) (shared-initialize shared-initialize) (shiftf shiftf) (short-float short-float) (short-float-epsilon short-float-epsilon) (short-site-name short-site-name) (signal signal) (signed-byte signed-byte) (signum signum) (simple-array simple-array) (simple-base-string simple-base-string) (simple-bit-vector simple-bit-vector) (simple-bit-vector-p simple-bit-vector-p) (simple-condition simple-condition) (simple-condition-format-control simple-condition-format-control) (simple-error simple-error) (simple-string simple-string) (simple-string-p simple-string-p) (simple-type-error simple-type-error) (simple-vector simple-vector) (simple-vector-p simple-vector-p) (simple-warning simple-warning) (sin sin) (sinh sinh) (sleep sleep) (slot-boundp slot-boundp) (slot-exists-p slot-exists-p) (slot-makunbound slot-makunbound) (slot-missing slot-missing) (slot-unbound slot-unbound) (slot-value slot-value) (software-type software-type) (sort sort) ;;(space space) (space optimize) (special special) (special-operator-p special-operator-p) ;;(speed speed) (speed optimize) (sqrt sqrt) ;;(standard standard) (standard "Method Selection and Combination") (standard-char standard-char) (standard-char-p standard-char-p) (standard-class standard-class) (standard-generic-function standard-generic-function) (standard-method standard-method) (standard-object standard-object) (step step) (storage-condition storage-condition) (stream stream) (stream-element-type stream-element-type) (stream-error stream-error) (stream-error-stream stream-error-stream) (stream-external-format stream-external-format) (streamp streamp) (string string) (string-stream string-stream) (string-trim string-trim) (string-upcase string-upcase) (string= string=) (stringp stringp) (structure structure) (structure-class structure-class) (structure-object structure-object) (style-warning style-warning) (sublis sublis) (subseq subseq) (subsetp subsetp) (subst subst) (substitute substitute) (subtypep subtypep) (svref svref) (sxhash sxhash) (symbol symbol) (symbol-function symbol-function) (symbol-macrolet symbol-macrolet) (symbol-name symbol-name) (symbol-package symbol-package) (symbol-plist symbol-plist) (symbol-value symbol-value) (symbolp symbolp) (synonym-stream synonym-stream) (synonym-stream-symbol synonym-stream-symbol) (t t) (tagbody tagbody) (terpri terpri) (the the) (throw throw) (time time) (trace trace) (translate-logical-pathname translate-logical-pathname) (translate-pathname translate-pathname) (tree-equal tree-equal) (truename truename) (two-way-stream two-way-stream) (two-way-stream-input-stream two-way-stream-input-stream) (type type) (type-error type-error) (type-error-datum type-error-datum) (type-of type-of) (typecase typecase) (typep typep) (unbound-slot unbound-slot) (unbound-slot-instance unbound-slot-instance) (unbound-variable unbound-variable) (undefined-function undefined-function) (unexport unexport) (unintern unintern) (union union) (unread-char unread-char) (unsigned-byte unsigned-byte) (unuse-package unuse-package) (unwind-protect unwind-protect) (update-instance-for-different-class update-instance-for-different-class) (update-instance-for-redefined-class update-instance-for-redefined-class) (upgraded-array-element-type upgraded-array-element-type) (upgraded-complex-part-type upgraded-complex-part-type) (upper-case-p upper-case-p) (use-package use-package) (user-homedir-pathname user-homedir-pathname) (values values) (values-list values-list) (variable variable) (vector vector) (vector-pop vector-pop) (vector-push vector-push) (vectorp vectorp) (warn warn) (warning warning) (when when) (wild-pathname-p wild-pathname-p) (with-accessors with-accessors) (with-compilation-unit with-compilation-unit) (with-condition-restarts with-condition-restarts) (with-hash-table-iterator with-hash-table-iterator) (with-input-from-string with-input-from-string) (with-open-file with-open-file) (with-open-stream with-open-stream) (with-output-to-string with-output-to-string) (with-package-iterator with-package-iterator) (with-simple-restart with-simple-restart) (with-slots with-slots) (with-standard-io-syntax with-standard-io-syntax) (write write) (write-byte write-byte) (write-char write-char) (write-sequence write-sequence) (write-string write-string) (write-to-string write-to-string) (y-or-n-p y-or-n-p) (zerop zerop) )) (dolist (datum *hyperspec-name-conversion-data*) (puthash (first datum) (second datum) *hyperspec-name-conversion-table*)) (defun hyperspec-info-lookup () (interactive) (ignore-errors (let ((thing (thing-at-point 'symbol))) (if (null thing) (info "(gcl) Top") (let ((table-entry (gethash (intern (downcase thing)) *hyperspec-name-conversion-table*))) (if (null table-entry) (info "(gcl) Top") (let ((new-thing (cond ((symbolp table-entry) (symbol-name table-entry)) ((stringp table-entry) table-entry) (t nil)))) (info (concatenate 'string "(gcl) " new-thing)))))))))