Re: [Cclan-commits] CVS: asdf asdf-install.lisp,1.3,1.4
Daniel Barlow <[email protected]>
| Newsgroups | gmane.lisp.cclan.general |
|---|---|
| Message-ID | <[email protected]> |
-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Christophe Rhodes <[email protected]> writes: >> + (if (string-equal package-name-or-url "http://" >> + :end1 7) > > Will break for package-name-or-url smaller than seven characters. Duh. Yes. Thanks. > There is an idiom for this, fortunately: > (if (= (mismatch package-name-or-url "http://") 7) > ... Applied - -dan - -- http://www.cliki.net/ - Link farm for free CL-on-Unix resources -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.2.1 (GNU/Linux) iD8DBQE+5IBFHDK5ZnWQiRMRAobHAJ9JKedhQMU48qsmNOUkt83RSWrkDwCfbyxF olmyP2EofFTJFYYTbiQKUgw= =NFLn -----END PGP SIGNATURE----- ------------------------------------------------------- This SF.net email is sponsored by: Etnus, makers of TotalView, The best thread debugger on the planet. Designed with thread debugging features you've never dreamed of, try TotalView 6 free at www.etnus.com.