REPL Output
;;; 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
