s-http-server on sbcl-0.9.9-darwin-ppc - Details

Author:Sven Van Caekenberghe <svc@mac.com>
Version:1
Description:S-HTTP-SERVER is a minial standalone Common Lisp HTTP Server
Started at:2006-04-16 01:45:54
Ended at:2006-04-16 01:46:22
Elapsed time (seconds):28
Depends On:s-utils, s-sysdeps, s-base64, puri
Most recent change:2006-04-12 10:43:13
Most recent file:/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-http-server/doc/API.html

REPL Output

;;; ASDF-INSTALL: Downloading 133173 bytes from http://homepage.mac.com/svc/s-http-server/s-http-server.tar.gz to /Users/gwking/temporary/asdf-test/S-HTTP-SERVER.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/S-HTTP-SERVER.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
s-http-server/
s-http-server/doc/
s-http-server/doc/API.html
s-http-server/doc/index.html
s-http-server/doc/rfc2616.txt
s-http-server/Makefile
s-http-server/README.txt
s-http-server/rsrc/
s-http-server/rsrc/dhparam.pem
s-http-server/rsrc/test-server.crt
s-http-server/rsrc/test-server.key
s-http-server/s-http-server.asd
s-http-server/src/
s-http-server/src/http-server.lisp
s-http-server/src/https-server.lisp
s-http-server/src/package.lisp
s-http-server/test/
s-http-server/test/all-tests.lisp
s-http-server/test/test-http-server.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-http-server/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-http-server/" ;;; ASDF-INSTALL: Downloading package PURI, required by s-http-server

;;; ASDF-INSTALL: Downloading 31029 bytes from http://files.b9.com/puri/puri-latest.tar.gz to /Users/gwking/temporary/asdf-test/puri.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/puri.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
puri-1.4/
puri-1.4/uri.html
puri-1.4/tests.lisp
puri-1.4/LICENSE
puri-1.4/puri.asd
puri-1.4/README
puri-1.4/src.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/" 
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp" (written 26 JAN 2006 10:18:48 PM):
; compiling (DEFPACKAGE #:PURI ...)
; compiling (IN-PACKAGE #:PURI)
; compiling (DEFUN PARSE-BODY ...)
; compiling (DEFUN SHRINK-VECTOR ...)
; compiling (DEFINE-CONDITION URI-PARSE-ERROR ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFINE-CONDITION URI-PARSE-ERROR
;     (FORMAT STREAM "Parse error:")
; ==>
;   (FORMAT SB-C::DEST (FORMATTER "Parse error:"))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a STREAM.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a (MEMBER T).

; compiling (DEFUN .PARSE-ERROR ...)
; compiling (DEFUN INTERNAL-READER-ERROR ...)
; compiling (DEFVAR *CURRENT-CASE-MODE* ...)
; compiling (DEFMETHOD POSITION-CHAR ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFMETHOD POSITION-CHAR (T STRING T T)
;     (CHAR STRING PURI::I)
; --> AREF LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN DELIMITED-STRING-TO-LIST ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN DELIMITED-STRING-TO-LIST
;     (SUBSEQ STRING PURI::POS PURI::END)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-BASE-STRING.
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING &REST T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY CHARACTER (*))
;                                              &REST
;                                              T).

;     (SUBSEQ STRING PURI::POS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-BASE-STRING.
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING &REST T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY CHARACTER (*))
;                                              &REST
;                                              T).

; compiling (DEFVAR IF*-KEYWORD-LIST ...)
; compiling (DEFMACRO IF* ...)
; compiling (DEFCLASS URI ...)
; compiling (DEFCLASS URN ...)
; compiling (CLEAR-CACHING-ON-SLOT-CHANGE URI-SCHEME)
; compiling (CLEAR-CACHING-ON-SLOT-CHANGE URI-HOST)
; compiling (CLEAR-CACHING-ON-SLOT-CHANGE URI-PORT)
; compiling (CLEAR-CACHING-ON-SLOT-CHANGE URI-PATH)
; compiling (CLEAR-CACHING-ON-SLOT-CHANGE URI-QUERY)
; compiling (CLEAR-CACHING-ON-SLOT-CHANGE URI-FRAGMENT)
; compiling (DEFMETHOD MAKE-LOAD-FORM ...)
; compiling (DEFMETHOD URI-P ...)
; compiling (DEFMETHOD URI-P ...)
; compiling (DEFUN COPY-URI ...)
; compiling (DEFMETHOD URI-PARSED-PATH ...)
; compiling (DEFMETHOD (SETF URI-PARSED-PATH) ...)
; compiling (DEFUN URI-AUTHORITY ...)
; compiling (DEFUN URI-NID ...)
; compiling (DEFUN URI-NSS ...)
; compiling (DEFPARAMETER *EXCLUDED-CHARACTERS* ...)
; compiling (DEFUN RESERVED-CHAR-VECTOR ...)
; compiling (DEFPARAMETER *RESERVED-CHARACTERS* ...)
; compiling (DEFPARAMETER *RESERVED-AUTHORITY-CHARACTERS* ...)
; compiling (DEFPARAMETER *RESERVED-PATH-CHARACTERS* ...)
; compiling (DEFPARAMETER *RESERVED-PATH-CHARACTERS2* ...)
; compiling (DEFPARAMETER *RESERVED-FRAGMENT-CHARACTERS* ...)
; compiling (DEFPARAMETER *VALID-NID-CHARACTERS* ...)
; compiling (DEFPARAMETER *RESERVED-NSS-CHARACTERS* ...)
; compiling (DEFPARAMETER *ILLEGAL-CHARACTERS* ...)
; compiling (DEFPARAMETER *STRICT-ILLEGAL-QUERY-CHARACTERS* ...)
; compiling (DEFPARAMETER *ILLEGAL-QUERY-CHARACTERS* ...)
; compiling (DEFUN PARSE-URI ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN PARSE-URI
;     (FUNCALL
;    (CASE PURI::*CURRENT-CASE-MODE*
;      ((:CASE-INSENSITIVE-UPPER :CASE-SENSITIVE-UPPER) #'STRING-UPCASE)
;      ((:CASE-INSENSITIVE-LOWER :CASE-SENSITIVE-LOWER) #'STRING-DOWNCASE))
;    (PURI::DECODE-ESCAPED-ENCODING PURI::SCHEME PURI::ESCAPE))
; --> SB-C::%FUNCALL THE 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION)
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR
;                            (FUNCTION
;                             ((OR (VECTOR CHARACTER)
;                                  (VECTOR NIL)
;                                  BASE-STRING
;                                  SYMBOL
;                                  CHARACTER)
;                              &KEY (:START (MOD 536870911)) (:END (OR NULL #)))
;                             (VALUES SIMPLE-STRING &OPTIONAL))
;                            NULL), not a FUNCTION.

;     (PLUSP PURI::PORT)
; ==>
;   (> PURI::PORT 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a REAL, not a FLOAT.
; 
; note: forced to do GENERIC-> (cost 10)
;       unable to do inline fixnum comparison (cost 3) because:
;       The first argument is a REAL, not a FIXNUM.
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a REAL, not a FIXNUM.
;       etc.

; compiling (DEFMETHOD URI ...)
; compiling (DEFMETHOD URI ...)
; compiling (DEFMETHOD URI ...)
; compiling (DEFVAR *STRICT-PARSE* ...)
; compiling (DEFUN PARSE-URI-STRING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN PARSE-URI-STRING
;     (LENGTH STRING)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (CHAR STRING PURI::START)
; --> AREF LET* 
; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (SUBSEQ STRING PURI::SINDEX PURI::START)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING &REST T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY CHARACTER (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY SINGLE-FLOAT (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR.
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR &REST T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 2)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 4)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 7)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 15)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 16)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 29)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 31)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 32)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (SIGNED-BYTE 16)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES (SIMPLE-ARRAY FIXNUM (*))
;                                                     &REST
;                                                     T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (SIGNED-BYTE 32)
;                                                            (*))
;                                              &REST
;                                              T).

;     (INCF PURI::START)
; --> LET* SETQ 
; ==>
;   (THE #<SB-KERNEL:NUMERIC-TYPE FIXNUM> #:G1010)
; 
; note: doing signed word to integer coercion (cost 20), for:
;       the first argument of CHECK-FIXNUM

; ==>
;   (THE #<SB-KERNEL:NUMERIC-TYPE FIXNUM> #:G1008)
; 
; note: doing signed word to integer coercion (cost 20), for:
;       the first argument of CHECK-FIXNUM

; compiling (DEFUN ESCAPE-P ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN ESCAPE-P
;     (LENGTH STRING)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (CHAR STRING PURI::I)
; --> AREF LET* 
; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN PARSE-PATH ...)
; compiling (DEFUN DECODE-ESCAPED-ENCODING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN DECODE-ESCAPED-ENCODING
;     (LENGTH STRING)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (COPY-SEQ STRING)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING &REST T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY CHARACTER (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY SINGLE-FLOAT (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR.
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR &REST T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 2)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 4)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 7)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 15)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 16)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 29)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 31)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (UNSIGNED-BYTE 32)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (SIGNED-BYTE 16)
;                                                            (*))
;                                              &REST
;                                              T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES (SIMPLE-ARRAY FIXNUM (*))
;                                                     &REST
;                                                     T).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)).
;   The result is a (VALUES (OR CONS NULL (SIMPLE-ARRAY * (*)))
;                           &OPTIONAL), not a (VALUES
;                                              (SIMPLE-ARRAY (SIGNED-BYTE 32)
;                                                            (*))
;                                              &REST
;                                              T).

;     (= PURI::I MAX)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

;     (CHAR STRING PURI::I)
; --> AREF LET* 
; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (CHAR STRING (INCF PURI::I))
; --> AREF LET* 
; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (LENGTH PURI::RESERVED-CHARS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (1+ PURI::I)
; ==>
;   (+ PURI::I 1)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

;     (1+ PURI::NEW-I)
; ==>
;   (+ PURI::NEW-I 1)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

;     (1+ PURI::I)
; ==>
;   (+ PURI::I 1)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

;     (1+ PURI::NEW-I)
; ==>
;   (+ PURI::NEW-I 1)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

;     (INCF PURI::I)
; --> LET* 
; ==>
;   (+ PURI::I #:G1149)
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first result of inline (unsigned-byte 32) arithmetic

;     (INCF PURI::NEW-I)
; --> LET* 
; ==>
;   (+ PURI::NEW-I #:G1161)
; 
; note: doing signed word to integer coercion (cost 20), for:
;       the first result of inline (signed-byte 32) arithmetic

; ==>
;   (+ PURI::NEW-I #:G1166)
; 
; note: doing signed word to integer coercion (cost 20), for:
;       the first result of inline (signed-byte 32) arithmetic

; compiling (DEFUN RENDER-URI ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN RENDER-URI
;     (FORMAT STREAM "~a" (PURI::URI-STRING PURI:URI))
; ==>
;   (FORMAT SB-C::DEST (FORMATTER "~a") #:G1205)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a STREAM.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a (MEMBER T).

; compiling (DEFUN RENDER-PARSED-PATH ...)
; compiling (DEFUN RENDER-URN ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN RENDER-URN
;     (FORMAT STREAM "~a" (PURI::URI-STRING PURI:URN))
; ==>
;   (FORMAT SB-C::DEST (FORMATTER "~a") #:G1243)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a STREAM.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a (MEMBER T).

; compiling (DEFPARAMETER *ESCAPED-ENCODING* ...)
; compiling (DEFUN ENCODE-ESCAPED-ENCODING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN ENCODE-ESCAPED-ENCODING
;     (LENGTH STRING)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (CHAR STRING PURI::I)
; --> AREF LET* 
; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (INCF PURI::NEW-I)
; --> LET* 
; ==>
;   (+ PURI::NEW-I #:G1387)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

; ==>
;   (+ PURI::NEW-I #:G1396)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

; ==>
;   (+ PURI::NEW-I #:G1401)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

;     (ELT PURI::*ESCAPED-ENCODING* PURI::Q)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a LIST.

;     (INCF PURI::NEW-I)
; --> LET* 
; ==>
;   (+ PURI::NEW-I #:G1406)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

;     (ELT PURI::*ESCAPED-ENCODING* PURI::R)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a LIST.

;     (INCF PURI::NEW-I)
; --> LET* 
; ==>
;   (+ PURI::NEW-I #:G1410)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; ==>
;   (+ PURI::NEW-I #:G1396)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; ==>
;   (+ PURI::NEW-I #:G1401)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; ==>
;   (+ PURI::NEW-I #:G1406)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; ==>
;   (+ PURI::NEW-I #:G1387)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

;     (MAKE-STRING PURI::NEW-MAX)
; 
; note: doing signed word to integer coercion (cost 20), for:
;       the first argument of CHECK-FIXNUM

; compiling (DEFMETHOD PRINT-OBJECT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFMETHOD PRINT-OBJECT (URI T)
;     (FORMAT STREAM "#<~a ~a>" 'PURI:URI (PURI:RENDER-URI PURI:URI NIL))
; ==>
;   (FORMAT SB-C::DEST (FORMATTER "#<~a ~a>") #:G1485 #:G1486)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a STREAM.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a (MEMBER T).

; compiling (DEFMETHOD PRINT-OBJECT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFMETHOD PRINT-OBJECT (URN T)
;     (FORMAT STREAM "#<~a ~a>" 'PURI:URI (PURI::RENDER-URN PURI:URN NIL))
; ==>
;   (FORMAT SB-C::DEST (FORMATTER "#<~a ~a>") #:G1525 #:G1526)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a STREAM.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MEMBER T NIL)
;                               STREAM
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a (MEMBER T).

; compiling (DEFMETHOD MERGE-URIS ...)
; compiling (DEFMETHOD MERGE-URIS ...)
; compiling (DEFMETHOD MERGE-URIS ...)
; compiling (DEFMETHOD MERGE-URIS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFMETHOD MERGE-URIS (URI URI)
;     (STRING= PURI::A
;            (PURI::IF* (ATOM PURI::B)
;                       PURI::THEN
;                       PURI::B
;                       PURI::ELSE
;                       (CAR PURI::B)))
; ==>
;   (SB-KERNEL:STRING=* SB-C::STRING1
;                       SB-C::STRING2
;                       SB-C::START1
;                       SB-C::END1
;                       SB-C::START2
;                       SB-C::END2)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING
;                               SYMBOL
;                               CHARACTER), not a SIMPLE-BASE-STRING.
;   The second argument is a (OR (VECTOR CHARACTER)
;                                (VECTOR NIL)
;                                BASE-STRING
;                                SYMBOL
;                                CHARACTER), not a SIMPLE-BASE-STRING.

;     (POSITION ".."
;             PURI::NPL
;             :TEST
;             #'(LAMBDA (PURI::A PURI::B)
;                 (STRING= PURI::A
;                          (PURI::IF* (ATOM PURI::B)
;                                     PURI::THEN
;                                     PURI::B
;                                     PURI::ELSE
;                                     (CAR PURI::B)))))
; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; ==>
;   (SB-KERNEL:%FIND-POSITION SB-C::ITEM
;                             SEQUENCE
;                             SB-C::FROM-END
;                             SB-C::START
;                             SB-C::END
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST
;                                                                     SB-C::TEST-NOT))
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a LIST.
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a VECTOR.

;     (STRING= PURI::A PURI::B)
; ==>
;   (SB-KERNEL:STRING=* SB-C::STRING1
;                       SB-C::STRING2
;                       SB-C::START1
;                       SB-C::END1
;                       SB-C::START2
;                       SB-C::END2)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING
;                               SYMBOL
;                               CHARACTER), not a SIMPLE-BASE-STRING.
;   The second argument is a (OR (VECTOR CHARACTER)
;                                (VECTOR NIL)
;                                BASE-STRING
;                                SYMBOL
;                                CHARACTER), not a SIMPLE-BASE-STRING.

; compiling (DEFMETHOD ENOUGH-URI ...)
; compiling (DEFMETHOD ENOUGH-URI ...)
; compiling (DEFMETHOD ENOUGH-URI ...)
; compiling (DEFMETHOD ENOUGH-URI ...)
; compiling (DEFUN MAKE-URI-SPACE ...)
; compiling (DEFUN GETHASH-URI ...)
; compiling (DEFUN PUTHASH-URI ...)
; compiling (DEFUN URI-HASH ...)
; compiling (DEFVAR *URIS* ...)
; compiling (DEFUN URI-SPACE ...)
; compiling (DEFUN (SETF URI-SPACE) ...)
; compiling (WHEN (FBOUNDP #) ...)
; compiling (DEFGENERIC URI= ...)
; compiling (DEFMETHOD URI= ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFMETHOD URI= (URI URI)
;     (EQL (OR (PURI:URI-PORT PURI::URI1) PURI::DEFAULT-PORT)
;        (OR (PURI:URI-PORT PURI::URI2) PURI::DEFAULT-PORT))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a SINGLE-FLOAT.
;   The second argument is a T, not a SINGLE-FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a DOUBLE-FLOAT.
;   The second argument is a T, not a DOUBLE-FLOAT.

;     (STRING= (PURI:URI-PATH PURI::URI1) (PURI:URI-PATH PURI::URI2))
; ==>
;   (SB-KERNEL:STRING=* SB-C::STRING1
;                       SB-C::STRING2
;                       SB-C::START1
;                       SB-C::END1
;                       SB-C::START2
;                       SB-C::END2)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING
;                               SYMBOL
;                               CHARACTER), not a SIMPLE-BASE-STRING.
;   The second argument is a (OR (VECTOR CHARACTER)
;                                (VECTOR NIL)
;                                BASE-STRING
;                                SYMBOL
;                                CHARACTER), not a SIMPLE-BASE-STRING.

;     (STRING= (PURI:URI-QUERY PURI::URI1) (PURI:URI-QUERY PURI::URI2))
; ==>
;   (SB-KERNEL:STRING=* SB-C::STRING1
;                       SB-C::STRING2
;                       SB-C::START1
;                       SB-C::END1
;                       SB-C::START2
;                       SB-C::END2)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING
;                               SYMBOL
;                               CHARACTER), not a SIMPLE-BASE-STRING.
;   The second argument is a (OR (VECTOR CHARACTER)
;                                (VECTOR NIL)
;                                BASE-STRING
;                                SYMBOL
;                                CHARACTER), not a SIMPLE-BASE-STRING.

;     (STRING= (PURI:URI-FRAGMENT PURI::URI1) (PURI:URI-FRAGMENT PURI::URI2))
; ==>
;   (SB-KERNEL:STRING=* SB-C::STRING1
;                       SB-C::STRING2
;                       SB-C::START1
;                       SB-C::END1
;                       SB-C::START2
;                       SB-C::END2)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING
;                               SYMBOL
;                               CHARACTER), not a SIMPLE-BASE-STRING.
;   The second argument is a (OR (VECTOR CHARACTER)
;                                (VECTOR NIL)
;                                BASE-STRING
;                                SYMBOL
;                                CHARACTER), not a SIMPLE-BASE-STRING.

;     (EQL (OR (PURI:URI-PORT PURI::URI1) PURI::DEFAULT-PORT)
;        (OR (PURI:URI-PORT PURI::URI2) PURI::DEFAULT-PORT))
; 
; note: forced to do GENERIC-EQL (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a T, not a FIXNUM.
;       The second argument is a T, not a FIXNUM.

; compiling (DEFMETHOD URI= ...)
; compiling (DEFUN URN-NSS-EQUAL ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.lisp
; in: DEFUN URN-NSS-EQUAL
;     (LENGTH PURI::NSS1)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (LENGTH PURI::NSS2)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (CHAR PURI::NSS1 PURI::I)
; --> AREF LET* 
; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (CHAR PURI::NSS2 PURI::I)
; --> AREF LET* 
; ==>
;   (ARRAY-DIMENSION ARRAY 0)
; 
; note: unable to optimize because: can't tell whether array is simple

; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a STRING, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (CHAR-NOT-EQUAL PURI::C1 PURI::C2)
; --> IF 
; ==>
;   (CHAR-EQUAL PURI::C1 PURI::C2)
; 
; note: unable to
;   open code
; due to type uncertainty:
;   The first argument is a CHARACTER, not a BASE-CHAR.
;   The second argument is a CHARACTER, not a BASE-CHAR.
; 
; note: unable to
;   open code
; due to type uncertainty:
;   The first argument is a CHARACTER, not a BASE-CHAR.
;   The second argument is a CHARACTER, not a BASE-CHAR.

; compiling (DEFMETHOD INTERN-URI ...)
; compiling (DEFMETHOD INTERN-URI ...)
; compiling (DEFUN UNINTERN-URI ...)
; compiling (DEFMACRO DO-ALL-URIS ...)
; compiling (DEFUN SHARP-U ...)
; compiling (SET-DISPATCH-MACRO-CHARACTER #\# ...)
; compiling (PROVIDE :URI)
; compiling (DEFUN GC ...)
; compiling (DEFUN TIME-URI-MODULE ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/puri-1.4/src.fasl written
; compilation finished in 0:00:05
STYLE-WARNING: implicitly creating new generic function POSITION-CHAR
STYLE-WARNING: implicitly creating new generic function URI-P
STYLE-WARNING: implicitly creating new generic function URI-PARSED-PATH
STYLE-WARNING: implicitly creating new generic function (SETF URI-PARSED-PATH)
STYLE-WARNING: implicitly creating new generic function URI
STYLE-WARNING: implicitly creating new generic function MERGE-URIS
STYLE-WARNING: implicitly creating new generic function ENOUGH-URI
STYLE-WARNING: implicitly creating new generic function INTERN-URI
; 
; compilation unit finished
;   printed 145 notes
;;; ASDF-INSTALL: Downloading package S-BASE64, required by s-http-server

;;; ASDF-INSTALL: Downloading 66774 bytes from http://homepage.mac.com/svc/s-base64/s-base64.tar.gz to /Users/gwking/temporary/asdf-test/s-base64.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/s-base64.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
s-base64/
s-base64/doc/
s-base64/doc/API.html
s-base64/doc/index.html
s-base64/doc/rfc1421.txt
s-base64/doc/rfc2045.txt
s-base64/doc/rfc3548.txt
s-base64/Makefile
s-base64/README.txt
s-base64/s-base64.asd
s-base64/src/
s-base64/src/base64.lisp
s-base64/src/package.lisp
s-base64/test/
s-base64/test/all-tests.lisp
s-base64/test/test-base64.lisp
s-base64/test/test.b64

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-base64/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-base64/" 
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-base64/src/package.lisp" (written 24 OCT 2005 03:48:28 PM):
; compiling (DEFPACKAGE S-BASE64 ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-base64/src/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-base64/src/base64.lisp" (written 26 OCT 2005 06:24:47 AM):
; compiling (IN-PACKAGE :S-BASE64)
; compiling (DEFPARAMETER +BASE64-ALPHABET+ ...)
; compiling (DEFPARAMETER +INVERSE-BASE64-ALPHABET+ ...)
; compiling (DEFUN CORE-ENCODE-BASE64 ...)
; compiling (DEFUN CORE-DECODE-BASE64 ...)
; compiling (DEFUN SKIP-BASE64-WHITESPACE ...)
; compiling (DEFUN DECODE-BASE64-BYTES ...)
; compiling (DEFUN ENCODE-BASE64-BYTES ...)
; compiling (DEFUN DECODE-BASE64 ...)
; compiling (DEFUN ENCODE-BASE64 ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-base64/src/base64.fasl written
; compilation finished in 0:00:01
;;; ASDF-INSTALL: Downloading package S-SYSDEPS, required by s-http-server

;;; ASDF-INSTALL: Downloading 7000 bytes from http://homepage.mac.com/svc/s-sysdeps/s-sysdeps.tar.gz to /Users/gwking/temporary/asdf-test/s-sysdeps.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/s-sysdeps.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
s-sysdeps/
s-sysdeps/doc/
s-sysdeps/doc/API.html
s-sysdeps/doc/index.html
s-sysdeps/Makefile
s-sysdeps/README.txt
s-sysdeps/s-sysdeps.asd
s-sysdeps/src/
s-sysdeps/src/package.lisp
s-sysdeps/src/sysdeps.lisp
s-sysdeps/test/
s-sysdeps/test/all-tests.lisp
s-sysdeps/test/test-sysdeps.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-sysdeps/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-sysdeps/" 
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-sysdeps/src/package.lisp" (written 12 APR 2006 09:27:08 AM):
; compiling (DEFPACKAGE :S-SYSDEPS ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-sysdeps/src/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-sysdeps/src/sysdeps.lisp" (written 12 APR 2006 09:27:08 AM):
; compiling (IN-PACKAGE :S-SYSDEPS)
; compiling (REQUIRE :SB-BSD-SOCKETS)
; compiling (DEFUN CURRENT-PROCESS ...)
; compiling (DEFUN KILL-PROCESS ...)
; compiling (DEFUN RUN-PROCESS ...)
; compiling (DEFUN ALL-PROCESSES ...)
; compiling (DEFUN OPEN-SOCKET-STREAM ...)
; compiling (DEFUN GET-SOCKET-STREAM-PROPERTY ...)
; compiling (DEFUN START-STANDARD-SERVER ...)
; compiling (DEFUN MAKE-PROCESS-LOCK ...)
; compiling (DEFMACRO WITH-PROCESS-LOCK ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-sysdeps/src/sysdeps.fasl written
; compilation finished in 0:00:01
;;; ASDF-INSTALL: Downloading package S-UTILS, required by s-http-server

;;; ASDF-INSTALL: Downloading 7277 bytes from http://homepage.mac.com/svc/s-utils/s-utils.tar.gz to /Users/gwking/temporary/asdf-test/s-utils.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/s-utils.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
s-utils/
s-utils/doc/
s-utils/doc/API.html
s-utils/doc/index.html
s-utils/Makefile
s-utils/README.txt
s-utils/s-utils.asd
s-utils/src/
s-utils/src/package.lisp
s-utils/src/utils.lisp
s-utils/test/
s-utils/test/all-tests.lisp
s-utils/test/test-utils.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-utils/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-utils/" 
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-utils/src/package.lisp" (written 13 MAR 2006 05:18:32 AM):
; compiling (DEFPACKAGE :S-UTILS ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-utils/src/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-utils/src/utils.lisp" (written 13 MAR 2006 05:18:32 AM):
; compiling (IN-PACKAGE :S-UTILS)
; compiling (EXPORT (QUOTE #))
; compiling (DEFUN MAKE-SUBDIRECTORY ...)
; compiling (DEFUN PATHNAME-PARENT ...)
; compiling (DEFUN COPY-STREAM ...)
; compiling (DEFUN TOKENS ...)
; compiling (DEFPARAMETER +US-DAY-NAMES+ ...)
; compiling (DEFPARAMETER +US-MONTH-NAMES+ ...)
; compiling (DEFPARAMETER +US-TIME-FORMAT+ ...)
; compiling (DEFPARAMETER +US-DATE-FORMAT+ ...)
; compiling (DEFUN FORMAT-UNIVERSAL-TIME ...)
; compiling (DEFPARAMETER +EN-DURATION-UNIT-NAMES+ ...)
; compiling (DEFUN FORMAT-DURATION ...)
; compiling (DEFUN FORMAT-ISO-GMT-TIME ...)
; compiling (DEFUN PARSE-INTEGER-SAFELY ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-utils/src/utils.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-http-server/src/package.lisp" (written 12 APR 2006 10:43:13 AM):
; compiling (DEFPACKAGE :S-HTTP-SERVER ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-http-server/src/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-http-server/src/http-server.lisp" (written 12 APR 2006 10:43:13 AM):
; compiling (IN-PACKAGE :S-HTTP-SERVER)
; compiling (DEFVAR *HTTP-SERVER-IDENTIFICATION* ...)
; compiling (DEFVAR *HTTP-SERVER-PORT* ...)
; compiling (DEFCLASS S-HTTP-SERVER ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (DEFUN MAKE-S-HTTP-SERVER ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS HTTP-REQUEST ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (DEFGENERIC GET-PATH ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFGENERIC START-SERVER ...)
; compiling (DEFGENERIC STOP-SERVER ...)
; compiling (DEFGENERIC LOGM ...)
; compiling (DEFGENERIC HANDLE-HTTP-SERVER-CONNECTION ...)
; compiling (DEFGENERIC FIND-HANDLER ...)
; compiling (DEFGENERIC REGISTER-CONTEXT-HANDLER ...)
; compiling (DEFGENERIC UNREGISTER-CONTEXT-HANDLER ...)
; compiling (DEFMETHOD START-SERVER ...)
; compiling (DEFMETHOD STOP-SERVER ...)
; compiling (DEFMETHOD REGISTER-CONTEXT-HANDLER ...)
; compiling (DEFMETHOD UNREGISTER-CONTEXT-HANDLER ...)
; compiling (DEFMETHOD LOGM ...)
; compiling (DEFUN READ-HTTP-REQUEST-LINE ...)
; compiling (DEFUN WRITE-HTTP-RESPONSE-LINE ...)
; compiling (DEFUN FORMAT-HTTP-RESPONSE-LINE ...)
; compiling (DEFINE-CONDITION MISSING-HTTP-REQUEST-LINE ...)
; compiling (DEFUN PARSE-HTTP-REQUEST-LINE ...)
; compiling (DEFUN PARSE-HTTP-REQUEST-HEADERS ...)
; compiling (DEFUN PARSE-HTTP-REQUEST ...)
; compiling (DEFUN WRITE-HTTP-RESPONSE-STATUS-LINE ...)
; compiling (DEFUN WRITE-HTTP-RESPONSE-HEADERS ...)
; compiling (DEFUN RESPONSE-DATE ...)
; compiling (DEFUN STANDARD-HTTP-RESPONSE-HEADERS ...)
; compiling (DEFUN ESCAPE ...)
; compiling (DEFVAR *DOCTYPE-HTML-401-TRANSITIONAL* ...)
; compiling (DEFVAR *DOCTYPE-HTML-401-STRICT* ...)
; compiling (DEFUN STANDARD-HTTP-HTML-MESSAGE-RESPONSE ...)
; compiling (DEFUN STANDARD-HTTP-HTML-ERROR-RESPONSE ...)
; compiling (DEFMETHOD FIND-HANDLER ...)
; compiling (DEFMETHOD HANDLE-ONE-HTTP-REQUEST-RESPONSE ...)
; compiling (DEFMETHOD HANDLE-HTTP-SERVER-CONNECTION ...)
; compiling (DEFUN S-HTTP-SERVER-HANDLER ...)
; compiling (DEFPARAMETER +BASIC-MIME-TYPE-SUFFIX-MAP+ ...)
; compiling (DEFPARAMETER +KNOWN-MIME.TYPE-LOCATIONS+ ...)
; compiling (DEFPARAMETER *MIME-TYPE-SUFFIX-MAP* ...)
; compiling (DEFUN MIME-TYPE-FOR-PATHNAME ...)
; compiling (DEFUN COMPUTE-REAL-RESOURCE-PATHNAME ...)
; compiling (DEFUN HOST-STATIC-RESOURCE ...)
; compiling (DEFUN STATIC-RESOURCE-HANDLER ...)
; compiling (DEFUN SINGLE-STATIC-RESOURCE-HANDLER ...)
; compiling (DEFVAR *FAVICON* ...)
; compiling (DEFUN FAVICON-HANDLER ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/s-http-server/src/http-server.fasl written
; compilation finished in 0:00:03
STYLE-WARNING:
   implicitly creating new generic function HANDLE-ONE-HTTP-REQUEST-RESPONSE