| commit | 77405f06e9fefaf5f687ea354b2448ffa8ca01dd | |
| author | Tobias C Rittweiler <trittweiler@common-lisp.net> | |
| Sat, 27 Dec 2008 18:23:03 +0000 (27 19:23 +0100) | ||
| committer | Tobias C Rittweiler <trittweiler@common-lisp.net> | |
| Sat, 27 Dec 2008 18:48:28 +0000 (27 19:48 +0100) | ||
| tree | 627a6bae79e7291821a64933991b884bd42ff6e8 | treesnapshot (tar.gz zip) |
| parent | 3c9a8277ffa378b55907c3777c4fe179dec9b290 | commitdiff |
Implement FIND-PACKAGE-FROM-SUBSTRING which is supposed to be used in the reader:
* For FIND-PACKAGE-FROM-SUBSTRING, use a customized hash-table which
is used to map package names to packageoids. It is possible to
use (LIST STRING START END) as key in that hash-table to mean the
same as (SUBSEQ STRING START END) but without the consing---the
list itself is stack-allocated. (Idea due to jsnell)
* Make FIND-SYMBOL-FROM-SUBSTRING, INTERN-FROM-SUBSTRING,
FIND-PACKAGE-FROM-SUBSTRING, and %SXHASH-FROM-SUBSTRING all take a
START and END parameter, so it really works like SUBSEQ.
(Previously, only END was customizable.)
* For the above, make what was previously a macro WITH-SYMBOL an
inlined function LOOKUP-SYMBOL. The macro had to be adapted anyway
to also take a START into account, but its definition was drowning
in unquote commas.
* For FIND-PACKAGE-FROM-SUBSTRING, use a customized hash-table which
is used to map package names to packageoids. It is possible to
use (LIST STRING START END) as key in that hash-table to mean the
same as (SUBSEQ STRING START END) but without the consing---the
list itself is stack-allocated. (Idea due to jsnell)
* Make FIND-SYMBOL-FROM-SUBSTRING, INTERN-FROM-SUBSTRING,
FIND-PACKAGE-FROM-SUBSTRING, and %SXHASH-FROM-SUBSTRING all take a
START and END parameter, so it really works like SUBSEQ.
(Previously, only END was customizable.)
* For the above, make what was previously a macro WITH-SYMBOL an
inlined function LOOKUP-SYMBOL. The macro had to be adapted anyway
to also take a START into account, but its definition was drowning
in unquote commas.