REPL Output
;;; ASDF-INSTALL: Downloading 22244 bytes from http://fare.tunes.org/asdf-packages/exscribe.tar.gz to /Users/gwking/temporary/asdf-test/EXSCRIBE.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/EXSCRIBE.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/
exscribe/cl-compat.scr
exscribe/exscribe.asd
exscribe/exscribe-data.lisp
exscribe/exscribe-html.lisp
exscribe/exscribe.lisp
exscribe/exscribe-txt.lisp
exscribe/exscribe-typeset.lisp
exscribe/fare-style.lisp
exscribe/html.lisp
exscribe/macros.lisp
exscribe/packages.lisp
exscribe/scheme-compat.lisp
exscribe/specials.lisp
exscribe/test.lisp
exscribe/t.html
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/" ;;; ASDF-INSTALL: Downloading package FARE-UTILS, required by exscribe
;;; ASDF-INSTALL: Downloading 11475 bytes from http://fare.tunes.org/asdf-packages/fare-utils.tar.gz to /Users/gwking/temporary/asdf-test/fare-utils.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/fare-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/
fare-utils/atomic.lisp
fare-utils/fare-utils.asd
fare-utils/msv.lisp
fare-utils/package.lisp
fare-utils/utils.lisp
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/"
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/package.lisp" (written 05 NOV 2005 09:22:15 PM):
; compiling (IN-PACKAGE #:CL-USER)
; compiling (DEFPACKAGE #:FARE-UTILS ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp" (written 05 NOV 2005 09:18:52 PM):
; compiling (IN-PACKAGE #:FARE-UTILS)
; compiling (DECLAIM (OPTIMIZE # ...))
; compiling (DEFMACRO EVAL-NOW ...)
; compiling (EVAL-NOW (WHEN # ...))
; compiling (DEFMACRO DECLAIM-TYPE ...)
; compiling (DEFMACRO DECLAIM-TYPE ...)
; compiling (DEFMACRO THE* ...)
; compiling (DEFUN NIY ...)
; compiling (DEFUN QUIT ...)
; compiling (DEFUN NULL-STRING-P ...)
; compiling (DEFUN STUFF->STRING ...)
; compiling (DEFUN CONC-STRING ...)
; compiling (DEFUN CONC-SYMBOL-IN ...)
; compiling (DEFUN CONC-SYMBOL ...)
; compiling (DEFUN CONC-GENSYM ...)
; compiling (DEFUN CONC-KEYWORD ...)
; compiling (DEFUN PRINT-STRINGS ...)
; compiling (DEFUN JOIN-STRINGS ...)
; compiling (DEFUN PLIST->ALIST ...)
; compiling (DEFMACRO WITH-GENSYMS ...)
; compiling (DEFUN MERGE-BACKQUOTE-LIST ...)
; compiling (DEFMACRO EVALUATING-ONCE ...)
; compiling (DEFMACRO DEFSUBST ...)
; compiling (DEFMACRO DEFINE-ENCLOSING-MACRO ...)
; compiling (DEFMACRO DMM ...)
; compiling (DEFMACRO DEFINE-VALUES-MODIFY-MACRO ...)
; compiling (DEFMACRO DEFINE-VALUES-POST-MODIFY-MACRO ...)
; compiling (DEFMACRO DEFINE-POST-MODIFY-MACRO ...)
; compiling (DEFINE-POST-MODIFY-MACRO POST-INCF ...)
; compiling (DEFINE-POST-MODIFY-MACRO POST-DECF ...)
; compiling (DEFMACRO DEFINE-ABBREVS ...)
; compiling (DEFMACRO MULTIPLE-VALUE-QUOTE ...)
; compiling (DEFINE-ABBREVS MVBIND ...)
; compiling (DEFMACRO LET1 ...)
; compiling (DEFUN SYMBOL-MACRO-EXPANSION ...)
; compiling (DEFMACRO MAC ...)
; compiling (DEFMACRO TEST-ONLY ...)
; compiling (DEFMACRO IF-TESTING ...)
; compiling (DEFMACRO DBG-TIME ...)
; compiling (DEFUN REPORT-TESTING-ERROR ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN REPORT-TESTING-ERROR
; (FORMAT STREAM
; "Form ~A returned ~A instead of ~A."
; (FARE-UTILS::TESTING-ERROR-FAILED-FORM CONDITION)
; (FARE-UTILS::TESTING-ERROR-RETURNED-VALUE CONDITION)
; (FARE-UTILS::TESTING-ERROR-EXPECTED-VALUE CONDITION))
; ==>
; (FORMAT SB-C::DEST
; (FORMATTER "Form ~A returned ~A instead of ~A.")
; #:G569
; #:G570
; #:G571)
;
; 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 (DEFINE-CONDITION TESTING-ERROR ...)
; compiling (DEFUN TEST-FORM-HELPER ...)
; compiling (DEFMACRO DO-TEST-FORM ...)
; compiling (DEFMACRO TEST-FORM ...)
; compiling (DEFMACRO TEST-FORMS ...)
; compiling (DEFMACRO TTEST ...)
; compiling (DEFMACRO TTEST* ...)
; compiling (DEFUN DO-DEBUG-MESSAGE ...)
; compiling (DEFMACRO DEBUG-MESSAGE ...)
; compiling (DEFMACRO MSG ...)
; compiling (DEFMACRO DBG ...)
; compiling (DEFUN NOP ...)
; compiling (DEFUN DISABLE-FUN ...)
; compiling (DEFUN ENABLE-FUN ...)
; compiling (DEFUN RLIST* ...)
; compiling (DEFUN RCONS ...)
; compiling (DEFUN FIRSTN ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN FIRSTN
; (SUBSEQ FARE-UTILS::L 0 FARE-UTILS::N)
;
; 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).
; compiling (DEFUN APPEND/LIST ...)
; compiling (DEFUN MAPPEND ...)
; compiling (DEFUN MAPCAR2 ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN MAPCAR2
; (FUNCALL FARE-UTILS::FUN (CAR LIST))
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFUN INTEGERS-BELOW ...)
; compiling (DEFUN INTEGERS-BETWEEN ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN INTEGERS-BETWEEN
; (CEILING FARE-UTILS::N)
; ==>
; (CEILING FARE-UTILS::N 1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (LOOP FARE-UTILS::FOR
; FARE-UTILS::I
; FARE-UTILS::FROM
; (CEILING FARE-UTILS::N)
; FARE-UTILS::TO
; FARE-UTILS::M
; FARE-UTILS::COLLECT
; FARE-UTILS::I)
; --> BLOCK LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* SB-LOOP::LOOP-BODY
; --> TAGBODY WHEN COND IF
; ==>
; (> FARE-UTILS::I #:LOOP-LIMIT-754)
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; --> BLOCK LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* SB-LOOP::LOOP-BODY
; --> TAGBODY SB-LOOP::LOOP-REALLY-DESETQ SETQ THE 1+
; ==>
; (+ FARE-UTILS::I 1)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; compiling (DEFUN LIST-OF-INTEGERS ...)
; compiling (DEFUN COPY-LIST-WITHOUT-NTH ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN COPY-LIST-WITHOUT-NTH
; (= FARE-UTILS::I FARE-UTILS::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (LOOP FARE-UTILS::FOR
; FARE-UTILS::X
; FARE-UTILS::IN
; LIST
; FARE-UTILS::FOR
; FARE-UTILS::I
; FIXNUM
; FARE-UTILS::FROM
; 0
; UNLESS
; (= FARE-UTILS::I FARE-UTILS::N)
; ...)
; --> BLOCK LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET*
; --> SB-LOOP::LOOP-BODY TAGBODY SB-LOOP::LOOP-REALLY-DESETQ SETQ
; ==>
; (THE #<SB-KERNEL:NUMERIC-TYPE FIXNUM> (1+ FARE-UTILS::I))
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of CHECK-FIXNUM
; compiling (DEFUN REMOVE-NTH ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN REMOVE-NTH
; (LOOP FARE-UTILS::WITH
; FARE-UTILS::HEAD
; =
; (CONS T NIL)
; FARE-UTILS::WITH
; FARE-UTILS::LINK
; =
; FARE-UTILS::HEAD
; FARE-UTILS::FOR
; FARE-UTILS::TAIL
; FARE-UTILS::ON
; ...)
; --> BLOCK LET LET LET LET LET SB-LOOP::LOOP-BODY TAGBODY WHEN COND IF >= IF
; ==>
; (< FARE-UTILS::I #:LOOP-LIMIT-780)
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; --> BLOCK LET LET LET LET LET SB-LOOP::LOOP-BODY TAGBODY
; --> SB-LOOP::LOOP-REALLY-DESETQ SETQ THE 1+
; ==>
; (+ FARE-UTILS::I 1)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1)
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1)
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; compiling (TEST-FORM (REMOVE-NTH 3 ...) ...)
; compiling (DEFSUBST NDOLIST-WITH-REST-FUN ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFSUBST NDOLIST-WITH-REST-FUN
; (FUNCALL FARE-UTILS::FUN FARE-UTILS::ELEM REST)
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFSUBST DOLIST-WITH-REST-FUN ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFSUBST DOLIST-WITH-REST-FUN
; (COPY-SEQ LIST)
;
; 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).
; in: DEFSUBST NDOLIST-WITH-REST-FUN
; (FUNCALL FARE-UTILS::FUN FARE-UTILS::ELEM REST)
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFMACRO NDOLIST-WITH-REST ...)
; compiling (DEFMACRO DOLIST-WITH-REST ...)
; compiling (DEFUN EXTREMUM ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN EXTREMUM
; (FUNCALL FARE-UTILS::KEY FARE-UTILS::X)
; --> 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 SYMBOL), not a FUNCTION.
; (FUNCALL FARE-UTILS::KEY FARE-UTILS::Y)
; --> 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 SYMBOL), not a FUNCTION.
; (FUNCALL FARE-UTILS::PREDICATE
; (FUNCALL FARE-UTILS::KEY FARE-UTILS::X)
; (FUNCALL FARE-UTILS::KEY FARE-UTILS::Y))
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFUN LENGTH=-P ...)
; compiling (DEFUN LENGTH=N-P ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN LENGTH=N-P
; (ZEROP FARE-UTILS::N)
; --> = IF
; ==>
; (= FARE-UTILS::N 0)
;
; 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.
; (1- FARE-UTILS::N)
; ==>
; (- FARE-UTILS::N 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).
;
; 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.
; compiling (DEFUN LENGTH<-P ...)
; compiling (DEFUN LENGTH<N-P ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN LENGTH<N-P
; (ZEROP FARE-UTILS::N)
; ==>
; (= FARE-UTILS::N 0)
;
; 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.
; (1- FARE-UTILS::N)
; ==>
; (- FARE-UTILS::N 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).
;
; 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.
; compiling (DEFUN LENGTH<=-P ...)
; compiling (DEFUN LENGTH<=N-P ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN LENGTH<=N-P
; (1+ FARE-UTILS::N)
; ==>
; (+ FARE-UTILS::N 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).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, 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 T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; compiling (DEFUN LENGTH>-P ...)
; compiling (DEFUN LENGTH>N-P ...)
; compiling (DEFUN LENGTH>=-P ...)
; compiling (DEFUN LENGTH>=N-P ...)
; compiling (DEFUN CONS-TREE-MAP ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN CONS-TREE-MAP
; (FUNCALL FARE-UTILS::FUN FARE-UTILS::X)
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFMACRO MAKE-KEYS ...)
; compiling (DEFUN DEFAULT-BEHAVIOR ...)
; compiling (DEFUN ASSOCIATION ...)
; compiling (DEFINE-SETF-EXPANDER ASSOCIATION ...)
; compiling (DEFUN COPY-ARRAY-SHAPE ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN COPY-ARRAY-SHAPE
; (MAKE-ARRAY (ARRAY-DIMENSIONS ARRAY) :ELEMENT-TYPE (ARRAY-ELEMENT-TYPE ARRAY))
;
; note: unable to
; optimize
; because:
; The element-type is not constant; cannot open code array creation.
; compiling (DEFUN COPY-ARRAY ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN COPY-ARRAY
; (ARRAY-TOTAL-SIZE ARRAY)
;
; note: unable to optimize because: can't tell the rank at compile time
; (ROW-MAJOR-AREF ARRAY FARE-UTILS::I)
; --> SB-KERNEL:HAIRY-DATA-VECTOR-REF SB-KERNEL:%CHECK-BOUND
; ==>
; (ARRAY-TOTAL-SIZE ARRAY)
;
; note: unable to optimize because: can't tell the rank at compile time
; ==>
; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY
; (SB-KERNEL:%CHECK-BOUND ARRAY
; (ARRAY-TOTAL-SIZE
; ARRAY)
; SB-INT:INDEX))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a ARRAY, 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.
; (SETF (ROW-MAJOR-AREF FARE-UTILS::NEW-ARRAY FARE-UTILS::I)
; (ROW-MAJOR-AREF ARRAY FARE-UTILS::I))
; --> SB-KERNEL:%SET-ROW-MAJOR-AREF SB-KERNEL:HAIRY-DATA-VECTOR-SET
; --> SB-KERNEL:%CHECK-BOUND
; ==>
; (ARRAY-TOTAL-SIZE ARRAY)
;
; note: unable to optimize because: can't tell the rank at compile time
; --> SB-KERNEL:%SET-ROW-MAJOR-AREF
; ==>
; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY
; (SB-KERNEL:%CHECK-BOUND ARRAY
; (ARRAY-TOTAL-SIZE
; ARRAY)
; SB-INT:INDEX)
; SB-C::NEW-VALUE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SIMPLE-ARRAY, 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 FILL-ARRAY ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN FILL-ARRAY
; (ARRAY-TOTAL-SIZE ARRAY)
;
; note: unable to optimize because: can't tell the rank at compile time
; (FILL
; (MAKE-ARRAY (ARRAY-TOTAL-SIZE ARRAY)
; :ELEMENT-TYPE
; (ARRAY-ELEMENT-TYPE ARRAY)
; :DISPLACED-TO
; ARRAY)
; FARE-UTILS::VALUE)
;
; note: unable to
; open code
; because:
; upgraded array element type not known at compile time
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-BIT-VECTOR.
; The second argument is a T, not a BIT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-BASE-STRING.
; The second argument is a T, not a BASE-CHAR.
; compiling (DEFUN N-STREAM-HAS-CHAR-P ...)
; compiling (DEFUN N-STREAM-EOL-P ...)
; compiling (DEFUN COMPOSE/2 ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN COMPOSE/2
; (MULTIPLE-VALUE-CALL FARE-UTILS::F (APPLY FARE-UTILS::G REST))
; ==>
; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FARE-UTILS::F)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
; The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.
; (APPLY FARE-UTILS::G REST)
; --> MULTIPLE-VALUE-CALL
; ==>
; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FARE-UTILS::G)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
; The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.
; compiling (DEFUN COMPOSE ...)
; compiling (DEFUN I ...)
; compiling (DEFUN K ...)
; compiling (DEFUN S ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN S
; (FUNCALL FARE-UTILS::F FARE-UTILS::X)
; --> 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 SYMBOL), not a FUNCTION.
; (FUNCALL FARE-UTILS::G FARE-UTILS::X)
; --> 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 SYMBOL), not a FUNCTION.
; (FUNCALL (FUNCALL FARE-UTILS::F FARE-UTILS::X)
; (FUNCALL FARE-UTILS::G FARE-UTILS::X))
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFUN C ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN C
; (FUNCALL FARE-UTILS::G FARE-UTILS::X)
; --> 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 SYMBOL), not a FUNCTION.
; (FUNCALL FARE-UTILS::F (FUNCALL FARE-UTILS::G FARE-UTILS::X))
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFMACRO AIF ...)
; compiling (WITH-GENSYMS (RESULT TEST) ...)
; compiling (DEFUN BINDABLE-SYMBOL-P ...)
; compiling (DEFUN NORMALIZE-OPTIONAL-BINDING ...)
; compiling (DEFUN OPTIONAL-BINDING-SYMBOL ...)
; compiling (DEFUN FIRST-BINDING ...)
; compiling (DEFMACRO IF-BIND ...)
; compiling (DEFMACRO DEFXCOND ...)
; compiling (DEFXCOND ACOND ...)
; compiling (DEFXCOND COND2 ...)
; compiling (DEFXCOND ACOND2 ...)
; compiling (DEFMACRO MAPMACRO ...)
; compiling (DEFMACRO PROPMACRO ...)
; compiling (DEFMACRO PROPMACROS ...)
; compiling (DEFMACRO HASHMACRO ...)
; compiling (DEFMACRO HASHMACROS ...)
; compiling (DEFUN ERROR-BEHAVIOUR ...)
; compiling (DEFUN MAKE-PREDICATE-SYMBOL ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN MAKE-PREDICATE-SYMBOL
; (EVERY #'ALPHANUMERICP FARE-UTILS::N)
; --> LET BLOCK MAP LAMBDA FUNCTION LET FUNCALL SB-C::%FUNCALL BLOCK LET OR LET
; --> < IF
; ==>
; (< GC 5)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> LET BLOCK MAP TRULY-THE
; ==>
; (SB-KERNEL:%MAP SB-C::RESULT-TYPE-ARG SB-C::FUN #:G1127)
;
; note: unable to open code because: can't determine sequence argument type
; --> LET BLOCK MAP LAMBDA FUNCTION LET FUNCALL SB-C::%FUNCALL BLOCK LET OR LET
; --> IF OR = IF
; ==>
; (= GC 12)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; --> LET BLOCK MAP LAMBDA FUNCTION LET FUNCALL SB-C::%FUNCALL BLOCK LET OR LET
; --> < IF
; ==>
; (< GC 5)
;
; 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 (DEFUN SINGLE-ARG-FORM-P ...)
; compiling (DEFUN PROPER-LIST-P ...)
; compiling (DEFUN SINGLE-ARG ...)
; compiling (DEFMACRO MAKE-SINGLE-ARG-FORM ...)
; compiling (MAKE-SINGLE-ARG-FORM QUOTE ...)
; compiling (DEFUN COMBINATIONP ...)
; compiling (DEFUN LITERALP ...)
; compiling (DEFMACRO COPY-SYMBOL-VALUE ...)
; compiling (DEFMACRO COPY-SYMBOL-FUNCTION ...)
; compiling (DEFSTRUCT FIFO ...)
; compiling (DEFUN FIFO-EMPTY-P ...)
; compiling (DEFUN FIFO-ENQUEUE ...)
; compiling (DEFUN FIFO-DEQUEUE ...)
; compiling (DEFUN FIFO-NCONC2 ...)
; compiling (DEFUN FIFO-DEQUEUE-OBJECT ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN FIFO-DEQUEUE-OBJECT
; (EQL FARE-UTILS::OBJ FARE-UTILS::TOP)
;
; 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.
;
; 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 (DEFMACRO DEFCONSTANT* ...)
; compiling (DEFUN DO-BEGIN-GENSYM* ...)
; compiling (DEFUN DO-END-GENSYM* ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.lisp
; in: DEFUN DO-END-GENSYM*
; (DO-SYMBOLS (FARE-UTILS::L :TMP) (UNINTERN FARE-UTILS::L :TMP))
; --> BLOCK FLET LET* FLET BLOCK LET DOTIMES DO BLOCK LET TAGBODY TAGBODY WHEN
; --> COND IF PROGN LET UNLESS COND IF NOT IF MEMBER BLOCK LET DO BLOCK LET
; --> TAGBODY TAGBODY LET IF SB-IMPL::SATISFIES-THE-TEST LET COND IF PROGN
; --> FUNCALL SB-C::%FUNCALL
; ==>
; (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 (DEFUN GENSYM* ...)
; compiling (DEFMACRO BEGIN-GENSYM* ...)
; compiling (DEFMACRO END-GENSYM* ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/utils.fasl written
; compilation finished in 0:00:04
STYLE-WARNING: redefining NULL-STRING-P in DEFUN
STYLE-WARNING: redefining STUFF->STRING in DEFUN
STYLE-WARNING: redefining CONC-STRING in DEFUN
STYLE-WARNING: redefining CONC-SYMBOL-IN in DEFUN
STYLE-WARNING: redefining CONC-SYMBOL in DEFUN
STYLE-WARNING: redefining CONC-GENSYM in DEFUN
STYLE-WARNING: redefining CONC-KEYWORD in DEFUN
STYLE-WARNING: redefining PRINT-STRINGS in DEFUN
STYLE-WARNING: redefining JOIN-STRINGS in DEFUN
STYLE-WARNING: redefining PLIST->ALIST in DEFUN
STYLE-WARNING: redefining MAKE-PREDICATE-SYMBOL in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/msv.lisp" (written 03 NOV 2005 07:27:35 PM):
; compiling (IN-PACKAGE :FARE-UTILS)
; compiling (HASHMACRO MSV-NAMED)
; compiling (DEFUN MAKE-MSV-CACHE ...)
; compiling (DEFVAR *MSV-CACHE* ...)
; compiling (DEFSTRUCT (MAGIC-SPECIAL-VARIABLE # ...) ...)
; compiling (DEFSTRUCT (MAGIC-SPECIAL-VARIABLE-CACHE # ...) ...)
; compiling (DEFUN DO-WRITE-MSV ...)
; compiling (DEFUN DO-READ-MSV ...)
; compiling (DEFUN MSV-CACHE ...)
; compiling (DEFUN DO-MAKE-MSV-CACHE ...)
; compiling (DEFUN ENSURE-MSV-CACHE ...)
; compiling (DEFUN DO-FLUSH-MSV-WRITE-CACHE ...)
; compiling (DEFUN DO-INVALIDATE-MSV-CACHE ...)
; compiling (DEFUN DO-FLUSH-AND-INVALIDATE-MSV-CACHE ...)
; compiling (DEFUN DO-FILL-MSV-READ-CACHE ...)
; compiling (DEFUN MSV-GET ...)
; compiling (DEFUN MSV-SET ...)
; compiling (DEFUN (SETF MSV-GET) ...)
; compiling (DEFMACRO MAGIC-SPECIAL-VARIABLE ...)
; compiling (DEFUN FLUSH-ALL-MSV ...)
; compiling (DEFUN FLUSH-AND-INVALIDATE-ALL-MSV ...)
; compiling (DEFUN REGISTER-MSV ...)
; compiling (DEFMACRO REGISTER-MAGIC-SPECIAL-VARIABLE ...)
; compiling (DEFMACRO DEFINE-MAGIC-SPECIAL-VARIABLE ...)
; compiling (DEFMACRO WITH-MAGIC-SPECIAL-VARIABLES ...)
; compiling (DEFMACRO WITH-MAGIC-SPECIAL-VARIABLES-SAFELY ...)
; compiling (DEFMETHOD MAKE-LOAD-FORM ...)
; compiling (DEFINE-ABBREVS DEFMSV ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-utils/msv.fasl written
; compilation finished in 0:00:01
;
; compilation unit finished
; printed 101 notes
;;; ASDF-INSTALL: Downloading package FARE-MATCHER, required by exscribe
;;; ASDF-INSTALL: Downloading 19194 bytes from http://fare.tunes.org/asdf-packages/fare-matcher.tar.gz to /Users/gwking/temporary/asdf-test/fare-matcher.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/fare-matcher.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/
fare-matcher/clos-match.lisp
fare-matcher/fare-matcher.asd
fare-matcher/matcher.lisp
fare-matcher/mrd-extensions.lisp
fare-matcher/packages.lisp
fare-matcher/quasiquote.lisp
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/"
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/packages.lisp" (written 05 NOV 2005 09:20:32 PM):
; compiling (IN-PACKAGE #:CL-USER)
; compiling (DEFPACKAGE #:FARE-MATCHER ...)
; compiling (DEFPACKAGE #:FARE-QUASIQUOTE ...)
; compiling (DEFPACKAGE #:FARE-CLOS-MATCH ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/packages.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/matcher.lisp" (written 05 NOV 2005 08:57:57 PM):
; compiling (IN-PACKAGE :FARE-MATCHER)
; compiling (DEFVAR *REGS* ...)
; compiling (DEFUN MAKE-REG ...)
; compiling (DEFUN MAKE-REGS ...)
; compiling (DEFUN NREGS ...)
; compiling (DEFVAR *FORM ...)
; compiling (DEFVAR *FAILURE-CONTINUATION ...)
; compiling (DEFVAR *M%POINT ...)
; compiling (PROPMACROS SYMBOL-MATCHER ...)
; compiling (MAKE-SINGLE-ARG-FORM MACRO)
; compiling (DEFUN COUNT-VALUES ...)
; compiling (DEFUN CONSTRUCT-VALUES-CLOSURE ...)
; compiling (DEFUN CONSTRUCT-VALUES-CLOSURE-NARY ...)
; compiling (DEFMACRO MATCH ...)
; compiling (DEFMACRO IFMATCH ...)
; compiling (DEFINE-ABBREVS IFM ...)
; compiling (DEFMACRO EMATCH ...)
; compiling (DEFMACRO LETM ...)
; compiling (DEFUN EQL-MATCHER ...)
; compiling (DEFUN PATTERN-MATCHER ...)
; compiling (DEFUN COMBINATION-MATCHER ...)
; compiling (DEFUN FUNCTION-TO-MACRO-MATCHER ...)
; compiling (DEFUN MERGE-MATCHER-VARIABLES ...)
; compiling (DEFUN MERGE-VARIABLES/2 ...)
; compiling (DEFUN ADD-VARIABLE ...)
; compiling (DEFMACRO DEFINE-SYMBOL-MATCHER ...)
; compiling (DEFMACRO DEFINE-MACRO-MATCHER ...)
; compiling (DEFMACRO DEFINE-FUNCTION-MATCHER ...)
; compiling (DEFMACRO COPY-SYMBOL-MATCHER ...)
; compiling (DEFMACRO COPY-SYMBOL-AND-MATCHER ...)
; compiling (DEFMACRO COPY-FUNCTION-MATCHER ...)
; compiling (DEFMACRO COPY-FUNCTION-AND-MATCHER ...)
; compiling (DEFUN CONSTRUCTOR-MATCHER-TO-FUNCTION-MATCHER ...)
; compiling (DEFMACRO DEFINE-CONSTRUCTOR-MATCHER ...)
; compiling (DEFMACRO DEFINE-VARARY-CONSTRUCTOR-MATCHER ...)
; compiling (DEFUN M%SUCCESS ...)
; compiling (DEFMACRO M%FAIL ...)
; compiling (DEFMACRO M%VALUES ...)
; compiling (DEFMACRO M%SUCCEED ...)
; compiling (DEFMACRO M%AND ...)
; compiling (DEFMACRO M%WHEN ...)
; compiling (DEFMACRO M%OR ...)
; compiling (DEFINE-SYMBOL-MATCHER _ ...)
; compiling (DEFINE-MACRO-MATCHER QUOTE ...)
; compiling (DEFINE-MACRO-MATCHER VALUE ...)
; compiling (DEFINE-MACRO-MATCHER OF-TYPE ...)
; compiling (DEFINE-MACRO-MATCHER WHEN ...)
; compiling (DEFINE-MACRO-MATCHER LIKE-WHEN ...)
; compiling (DEFINE-MACRO-MATCHER AND ...)
; compiling (DEFINE-MACRO-MATCHER OR ...)
; compiling (DEFINE-CONSTRUCTOR-MATCHER CONS ...)
; compiling (DEFINE-VARARY-CONSTRUCTOR-MATCHER LIST ...)
; compiling (DEFINE-VARARY-CONSTRUCTOR-MATCHER LIST* ...)
; compiling (DEFINE-CONSTRUCTOR-MATCHER RCONS ...)
; compiling (DEFINE-VARARY-CONSTRUCTOR-MATCHER RLIST* ...)
; compiling (DEFINE-VARARY-CONSTRUCTOR-MATCHER VECTOR ...)
; compiling (DEFINE-VARARY-CONSTRUCTOR-MATCHER VECTOR ...)
; compiling (DEFUN MANY-FORM-MATCHER ...)
; compiling (DEFINE-MACRO-MATCHER SLOT* ...)
; compiling (DEFINE-MACRO-MATCHER ACCESSOR* ...)
; compiling (DEFINE-MACRO-MATCHER VALUES ...)
; compiling (COPY-FUNCTION-MATCHER SB-IMPL::BACKQ-LIST ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/matcher.fasl written
; compilation finished in 0:00:02
STYLE-WARNING: redefining MAKE-REG in DEFUN
STYLE-WARNING: redefining MAKE-REGS in DEFUN
STYLE-WARNING: redefining NREGS in DEFUN
STYLE-WARNING: redefining MAKE-MACRO in DEFUN
STYLE-WARNING: redefining MACROP in DEFUN
STYLE-WARNING: redefining COUNT-VALUES in DEFUN
STYLE-WARNING: redefining CONSTRUCT-VALUES-CLOSURE in DEFUN
STYLE-WARNING: redefining CONSTRUCT-VALUES-CLOSURE-NARY in DEFUN
STYLE-WARNING: redefining EQL-MATCHER in DEFUN
STYLE-WARNING: redefining PATTERN-MATCHER in DEFUN
STYLE-WARNING: redefining COMBINATION-MATCHER in DEFUN
STYLE-WARNING: redefining FUNCTION-TO-MACRO-MATCHER in DEFUN
STYLE-WARNING: redefining MERGE-MATCHER-VARIABLES in DEFUN
STYLE-WARNING: redefining MERGE-VARIABLES/2 in DEFUN
STYLE-WARNING: redefining ADD-VARIABLE in DEFUN
STYLE-WARNING: redefining CONSTRUCTOR-MATCHER-TO-FUNCTION-MATCHER in DEFUN
STYLE-WARNING: redefining M%SUCCESS in DEFUN
STYLE-WARNING: redefining MANY-FORM-MATCHER in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/quasiquote.lisp" (written 03 NOV 2005 07:29:03 PM):
; compiling (IN-PACKAGE :FARE-QUASIQUOTE)
; compiling (COPY-FUNCTION-MATCHER LIST ...)
; compiling (MAKE-SINGLE-ARG-FORM QUOTE ...)
; compiling (MAKE-SINGLE-ARG-FORM QUASIQUOTE)
; compiling (MAKE-SINGLE-ARG-FORM UNQUOTE)
; compiling (MAKE-SINGLE-ARG-FORM UNQUOTE-SPLICING)
; compiling (DEFMACRO QUOTE ...)
; compiling (DEFMACRO QUASIQUOTE ...)
; compiling (DEFMACRO UNQUOTE ...)
; compiling (DEFMACRO UNQUOTE-SPLICING ...)
; compiling (DEFINE-SYMBOL-MATCHER KNIL ...)
; compiling (DEFPARAMETER KNIL ...)
; compiling (DEFPARAMETER *QUASIQUOTE-LEVEL* ...)
; compiling (DEFUN QUASIQUOTE-EXPAND ...)
; compiling (DEFUN EXPAND ...)
; compiling (DEFUN EXPAND-LIST ...)
; compiling (DEFUN SIMPLIFY-HEAD ...)
; compiling (DEFUN SIMPLIFY ...)
; compiling (DEFSUBST LIST ...)
; compiling (DEFSUBST APPEND ...)
; compiling (DEFSUBST LIST* ...)
; compiling (DEFSUBST CONS ...)
; compiling (DEFSUBST VECTOR ...)
; compiling (DEFSUBST MAKE-VECTOR ...)
; compiling (DEFUN K-VECTOR ...)
; compiling (DEFUN K-LIST ...)
; compiling (DEFUN K-APPEND ...)
; compiling (DEFUN K-LIST* ...)
; compiling (DEFUN K-CONS ...)
; compiling (DEFUN INSERT ...)
; compiling (DEFUN LIST-EXTENDER ...)
; compiling (DEFUN SELF-EVALUATING-P ...)
; compiling (DEFUN CONSTANT-FORM-P ...)
; compiling (DEFUN ALL-CONSTANT-FORMS-P ...)
; compiling (DEFUN UNFOLD-CONSTANT-FORM ...)
; compiling (DEFUN UNFOLD-CONSTANT-FORMS ...)
; compiling (DEFUN PROTECT-CONSTANT-FORM ...)
; compiling (DEFUN PROTECT-CONSTANT-FORMS ...)
; compiling (DEFINE-MACRO-MATCHER QUASIQUOTE ...)
; compiling (DEFUN READ-QUASIQUOTE ...)
; compiling (DEFUN READ-UNQUOTE ...)
; compiling (DEFUN READ-UNQUOTE-SPLICING ...)
; compiling (DEFUN N-VECTOR ...)
; compiling (DEFUN READ-VECTOR ...)
; compiling (DEFUN ENABLE-RT-QUASIQUOTE ...)
; compiling NIL
; compiling NIL
; compiling (DEFUN ENABLE-QUASIQUOTE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/quasiquote.fasl written
; compilation finished in 0:00:01
STYLE-WARNING: redefining KWOTE in DEFUN
STYLE-WARNING: redefining QUOTEP in DEFUN
STYLE-WARNING: redefining MAKE-QUASIQUOTE in DEFUN
STYLE-WARNING: redefining QUASIQUOTEP in DEFUN
STYLE-WARNING: redefining MAKE-UNQUOTE in DEFUN
STYLE-WARNING: redefining UNQUOTEP in DEFUN
STYLE-WARNING: redefining MAKE-UNQUOTE-SPLICING in DEFUN
STYLE-WARNING: redefining UNQUOTE-SPLICING-P in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/clos-match.lisp" (written 05 NOV 2005 09:18:45 PM):
; compiling (IN-PACKAGE :FARE-CLOS-MATCH)
; compiling (EVAL-NOW (DEFGENERIC CLASS-INITARG-TO-SLOT ...) ...)
; compiling (DEFUN SIMPLE-LOAD-FORM ...)
; compiling (DEFINE-MACRO-MATCHER INSTANCE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/clos-match.fasl written
; compilation finished in 0:00:00
STYLE-WARNING: redefining CLASS-INITARG-TO-SLOT in DEFGENERIC
STYLE-WARNING: redefining CLASS-INITARG-TO-SLOT (STANDARD-CLASS) in DEFMETHOD
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/mrd-extensions.lisp" (written 23 SEP 2005 03:11:29 AM):
; compiling (DEFPACKAGE #:FARE-MATCHER-EXTENSIONS ...)
; compiling (IN-PACKAGE #:FARE-MATCHER-EXTENSIONS)
; compiling (DEFUN PARSE-PATTERN-LAMBDA-LIST ...)
; compiling (DEFUN MAYBE-FIRST ...)
; compiling (DEFMACRO DEFINE-ACCESSOR-MATCHER ...)
; compiling (DEFGENERIC RECORD-ACCESSOR ...)
; compiling (DEFMACRO DEFRECORD ...)
; compiling (DEFINE-ACCESSOR-MATCHER REC ...)
; compiling (DEFINE-MACRO-MATCHER AS ...)
; compiling (DEFPARAMETER *CLAUSE-BEGINNING-MARKERS* ...)
; compiling (DEFPARAMETER *CLAUSE-BODY-MARKERS* ...)
; compiling (DEFUN PARSE-CLAUSE-ARGS ...)
; compiling (DEFUN PARSE-CLAUSE ...)
; compiling (DEFUN PARSE-MATCHFUN-CLAUSES ...)
; compiling (DEFUN PROCESS-MATCHFUN ...)
; compiling (DEFMACRO DEFMFUN ...)
; compiling (DEFMACRO WITH-MFUNS ...)
; compiling (DEFMACRO MATCHFUN ...)
; compiling (DEFMACRO MFUN ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/fare-matcher/mrd-extensions.fasl written
; compilation finished in 0:00:01
STYLE-WARNING: redefining PARSE-PATTERN-LAMBDA-LIST in DEFUN
STYLE-WARNING: redefining MAYBE-FIRST in DEFUN
STYLE-WARNING: redefining PARSE-CLAUSE-ARGS in DEFUN
STYLE-WARNING: redefining PARSE-CLAUSE in DEFUN
STYLE-WARNING: redefining PARSE-MATCHFUN-CLAUSES in DEFUN
STYLE-WARNING: redefining PROCESS-MATCHFUN in DEFUN
;;; ASDF-INSTALL: Downloading package SCRIBBLE, required by exscribe
;;; ASDF-INSTALL: Downloading 6580 bytes from http://fare.tunes.org/asdf-packages/scribble.tar.gz to /Users/gwking/temporary/asdf-test/scribble.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/scribble.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/
scribble/package.lisp
scribble/scribble.asd
scribble/scribble.data
scribble/scribble.lisp
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/" ;;; ASDF-INSTALL: Downloading package META, required by scribble
;;; ASDF-INSTALL: Downloading 3032 bytes from http://fare.tunes.org/asdf-packages/meta-0.1.2.tar.gz to /Users/gwking/temporary/asdf-test/meta.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/meta.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/
meta/
meta/meta.asd
meta/package.lisp
meta/meta-src.lisp
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/meta/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/meta/"
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/meta/package.lisp" (written 06 NOV 2002 12:53:46 PM):
; compiling (IN-PACKAGE :CL-USER)
; compiling (DEFPACKAGE :META ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/meta/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/meta/meta-src.lisp" (written 11 JAN 2003 04:47:23 PM):
;
; caught STYLE-WARNING:
; Character decoding error in a ;-comment at position 2005 reading source file #<FD-STREAM for "file /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/meta/meta-src.lisp" {10955659}>, resyncing.
; compiling (IN-PACKAGE :META)
; compiling (DEFMACRO STRING-MATCH ...)
; compiling (DEFMACRO STRING-MATCH-TYPE ...)
; compiling (DEFMACRO LIST-MATCH ...)
; compiling (DEFMACRO LIST-MATCH-TYPE ...)
; compiling (DEFUN COMPILE-LIST ...)
; compiling (DEFMACRO STREAM-MATCH ...)
; compiling (DEFMACRO STREAM-MATCH-TYPE ...)
; compiling (DEFSTRUCT (META #) ...)
; compiling (DEFUN COMPILEIT ...)
;
; caught STYLE-WARNING:
; using deprecated EVAL-WHEN situation names EVAL LOAD COMPILE
; compiling (DEFPARAMETER *SAVED-READTABLE* ...)
; compiling (DEFPARAMETER *META-READTABLE* ...)
; compiling (DEFUN META-READER ...)
; compiling (MAPC (FUNCTION #) ...)
; compiling (SET-MACRO-CHARACTER #\{ ...)
; compiling (SET-MACRO-CHARACTER #\[ ...)
; compiling (MAPC (FUNCTION #) ...)
; compiling (DEFMACRO WITH-STREAM-META ...)
; compiling (DEFMACRO WITH-STRING-META ...)
; compiling (DEFMACRO WITH-LIST-META ...)
; compiling (DEFUN ENABLE-META-SYNTAX ...)
; compiling (DEFUN DISABLE-META-SYNTAX ...)
; compiling (PROVIDE (QUOTE META))
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/meta/meta-src.fasl written
; compilation finished in 0:00:01
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {400083E1}> on
#<CL-SOURCE-FILE "meta-src" {400083F1}>.
STYLE-WARNING: redefining META-READER in DEFUN
;
; compilation unit finished
; caught 2 STYLE-WARNING conditions
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/package.lisp" (written 01 NOV 2005 10:39:30 PM):
; compiling (DEFPACKAGE #:SCRIBBLE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/scribble.lisp" (written 05 NOV 2005 10:53:27 PM):
; compiling (IN-PACKAGE :SCRIBBLE)
; compiling (DECLAIM (OPTIMIZE # ...))
; compiling (DEFMACRO PP ...)
; compiling (DEFMACRO WITH-PREPROCESSOR ...)
; compiling (DEFVAR *SCRIBBLE-PREPROCESS* ...)
; compiling (DEFUN SCRIBBLE-PREPROCESS ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/scribble.lisp
; in: DEFUN SCRIBBLE-PREPROCESS
; (FUNCALL SCRIBBLE:*SCRIBBLE-PREPROCESS* SCRIBBLE::S)
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFVAR *SCRIBBLE-LIST* ...)
; compiling (DEFPARAMETER *SCRIBBLE-DEFAULT-HEAD* ...)
; compiling (DEFUN DEFAULT-SCRIBBLE-LIST ...)
; compiling (DEFUN DO-SCRIBBLE-LIST ...)
; compiling (DEFUN SCRIBBLE-LIST ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/scribble.lisp
; in: DEFUN SCRIBBLE-LIST
; (APPLY SCRIBBLE:*SCRIBBLE-LIST* LIST)
; --> MULTIPLE-VALUE-CALL
; ==>
; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SCRIBBLE:*SCRIBBLE-LIST*)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
; The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.
; compiling (DEFPARAMETER *SCRIBBLE-PACKAGE* ...)
; compiling (DEFMACRO WITHIN-PACKAGE ...)
; compiling (DEFMACRO WITHIN-SCRIBBLE-PACKAGE ...)
; compiling (DEFPARAMETER *SCRIBBLE-CONS* ...)
; compiling (DEFUN SCRIBBLE-CONS ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/scribble.lisp
; in: DEFUN SCRIBBLE-CONS
; (FUNCALL SCRIBBLE:*SCRIBBLE-CONS* SCRIBBLE::HEAD SCRIBBLE::BODY)
; --> 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 SYMBOL), not a FUNCTION.
; compiling (DEFUN ENSURE-LIST ...)
; compiling (DEFUN DEFAULT-SCRIBBLE-CONS ...)
; compiling (DEFUN SCRIBBLE-CONS-WITH-LIST-HEAD ...)
; compiling (DEFUN ISSUE-PARSE-ERROR ...)
; compiling (DEFTYPE SPACING-CHARACTER ...)
; compiling (ENABLE-META-SYNTAX)
; compiling (DEFUN PARSE-BRACKET ...)
; compiling (DISABLE-META-SYNTAX)
; compiling (DEFVAR *SAVED-READTABLES* ...)
; compiling (DEFUN PUSH-READTABLE ...)
; compiling (DEFUN POP-READTABLE ...)
; compiling (DEFVAR *SCRIBBLE-READTABLE* ...)
; compiling (DEFUN ENABLE-SCRIBBLE-SYNTAX ...)
; compiling (DEFUN DISABLE-SCRIBBLE-SYNTAX ...)
; compiling (DEFUN REENABLE-SCRIBBLE-SYNTAX ...)
; compiling (DEFVAR *SUB-SCRIBBLE-READTABLE* ...)
; compiling (DEFUN ENABLE-SUB-SCRIBBLE-SYNTAX ...)
; compiling (DEFUN DISABLE-SUB-SCRIBBLE-SYNTAX ...)
; compiling (DEFUN REENABLE-SUB-SCRIBBLE-SYNTAX ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE-FOR-ARANEIDA ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE-FOR-HTMLGEN ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE-FOR-LML2 ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE-FOR-TML ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE-FOR-WHO ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE-FOR-YACLML ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/scribble/scribble.fasl written
; compilation finished in 0:00:01
;
; compilation unit finished
; printed 3 notes
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/packages.lisp" (written 06 NOV 2005 02:46:10 AM):
; compiling (IN-PACKAGE :CL)
; compiling (DEFPACKAGE :SCHEME-MAKEUP ...)
; compiling (DEFPACKAGE :SCHEME-COMPAT ...)
; compiling (DEFPACKAGE :EXSCRIBE ...)
; compiling (DEFPACKAGE :EXSCRIBE-DATA ...)
; compiling (DEFPACKAGE :EXSCRIBE-HTML ...)
; compiling (DEFPACKAGE :EXSCRIBE-TXT ...)
; compiling (DEFPACKAGE :EXSCRIBE-TYPESET ...)
; compiling (DEFPACKAGE :EXSCRIBE-USER ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/packages.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/macros.lisp" (written 04 NOV 2005 05:53:12 AM):
; compiling (IN-PACKAGE :EXSCRIBE)
; compiling (DEFPARAMETER *LAMBDA-MARKUP-LIST-KEYWORDS* ...)
; compiling (DEFPARAMETER *ARGUMENT-SYNTAX* ...)
; compiling (DEFUN SYMBOL->KEYWORD ...)
; compiling (DEFUN KEYWORD->SYMBOL ...)
; compiling (DEFUN IDENTIFIERP ...)
; compiling (DEFUN DECODE-OPTIONAL-SPEC ...)
; compiling (DEFUN OPTIONAL-SPEC-P ...)
; compiling (DEFUN DECODE-KEY-SPEC ...)
; compiling (DEFUN KEY-SPEC-P ...)
; compiling (DEFUN PROCESSING-KEYS ...)
; compiling (DEFUN SCRIBE-STYLE-KEYWORD-ARG-P ...)
; compiling (DEFUN DO-DEFINE-MARKUP ...)
; compiling (DEFMACRO LAMBDA-MARKUP ...)
; compiling (DEFMACRO DEFINE-MARKUP ...)
; compiling (DEFMACRO DEFINE-MARKUP-MACRO ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/macros.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/specials.lisp" (written 06 NOV 2005 02:45:36 AM):
; compiling (IN-PACKAGE :EXSCRIBE)
; compiling (DEFVAR *EXSCRIBE-INITIALIZED* ...)
; compiling (DEFUN ENSURE-DIRECTORY-PATHNAME ...)
; compiling (DEFVAR *EXSCRIBE-DIRECTORY* ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/specials.lisp
; in: DEFVAR *EXSCRIBE-DIRECTORY*
; (OR
; #P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/specials.lisp"
; *COMPILE-FILE-PATHNAME*
; *LOAD-PATHNAME*)
; --> LET IF OR LET
; ==>
; *COMPILE-FILE-PATHNAME*
;
; note: deleting unreachable code
; --> LET IF OR LET IF OR
; ==>
; *LOAD-PATHNAME*
;
; note: deleting unreachable code
; compiling (DEFVAR *EXSCRIBE-PATH* ...)
; compiling (DEFVAR *EXSCRIBE-MODE* ...)
; compiling (DEFVAR *DOCUMENT* ...)
; compiling (DEFVAR *FOOTNOTES* ...)
; compiling (DEFVAR *FOOTNOTE-COUNTER* ...)
; compiling (DEFVAR *FOOTNOTES-TITLE* ...)
; compiling (DEFVAR *SECTION-COUNTER* ...)
; compiling (DEFVAR *SUBSECTION-COUNTER* ...)
; compiling (DEFVAR *SUBSUBSECTION-COUNTER* ...)
; compiling (DEFVAR *SECTION-NAME* ...)
; compiling (DEFVAR *SUBSECTION-NAME* ...)
; compiling (DEFVAR *SUBSUBSECTION-NAME* ...)
; compiling (DEFVAR *TOC* ...)
; compiling (DEFVAR *HTML* ...)
; compiling (DEFVAR *HEADER* ...)
; compiling (DEFVAR *FOOTER* ...)
; compiling (DEFVAR *BACKGROUND* ...)
; compiling (DEFVAR *FOREGROUND* ...)
; compiling (DEFVAR *TBACKGROUND* ...)
; compiling (DEFVAR *EXSCRIBE-VERBOSE* ...)
; compiling (DEFVAR *BIBLIOGRAPHY* ...)
; compiling (DEFVAR *BIBLIOGRAPHY-OPTIONS* ...)
; compiling (DEFVAR *BIBLIOGRAPHY-LOCATION* ...)
; compiling (DEFVAR *BIBLIOGRAPHY-HEADER* ...)
; compiling (DEFVAR *EXSCRIBE-DOCUMENT-HOOK* ...)
; compiling (DEFVAR *POSTPROCESS-HOOKS* ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/specials.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/scheme-compat.lisp" (written 03 NOV 2005 08:48:41 PM):
; compiling (IN-PACKAGE :SCHEME-COMPAT)
; compiling (DEFPARAMETER *SCHEME-TRUE* ...)
; compiling (DEFPARAMETER *SCHEME-FALSE* ...)
; compiling (DEFPARAMETER ELSE ...)
; compiling (DEFUN PROCESS-SCHEME-FORMALS ...)
; compiling (DEFUN MAKE-FUNCTION-DEFINITION ...)
; compiling (DEFMACRO DEFINE ...)
; compiling (DEFMACRO DEFALIAS ...)
; compiling (DEFMACRO DEFALIASES ...)
; compiling (DEFMACRO DEFXALIAS ...)
; compiling (DEFMACRO DEFXALIASES ...)
; compiling (DEFMACRO DEFMALIAS ...)
; compiling (DEFMACRO DEFMALIASES ...)
; compiling (DEFMACRO DEFVALIAS ...)
; compiling (DEFMACRO DEFVALIASES ...)
; compiling (DEFALIASES (X) ...)
; compiling (DEFALIASES (X Y) ...)
; compiling (DEFXALIASES DISPLAY ...)
; compiling (DEFVALIASES CURRENT-INPUT-PORT ...)
; compiling (DEFMALIASES SET! ...)
; compiling (DEFMACRO DEFINE-MACRO ...)
; compiling (DEFUN STRING-APPEND ...)
; compiling (DEFUN STRING->SYMBOL ...)
; compiling (DEFUN KEYWORD->STRING ...)
; compiling (DEFALIASES (X) ...)
; compiling (DEFVALIASES *SCRIBE-FORMAT* ...)
; compiling (DEFUN SET-SCHEME-MACRO-CHARACTERS ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/scheme-compat.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe.lisp" (written 04 NOV 2005 01:35:28 AM):
; compiling (IN-PACKAGE :EXSCRIBE)
; compiling (DEFUN ADD-EXSCRIBE-PATH ...)
; compiling (DEFUN ABSOLUTE-PATHNAME-P ...)
; compiling (DEFUN MAYBE-ERROR ...)
; compiling (DEFMACRO ON-ERROR ...)
; compiling (DEFUN FIND-FILE-IN-PATH ...)
; compiling (DEFUN FIND-EXSCRIBE-FILE ...)
; compiling (DEFUN EXSCRIBE-LOAD ...)
; compiling (DEFUN STYLE ...)
; compiling (DEFUN RECREATE-USER-PACKAGE ...)
; compiling (DEFUN KLIST ...)
; compiling (DEFUN CONFIGURE-SCRIBBLE-FOR-EXSCRIBE ...)
; compiling (DEFUN INIT-EXSCRIBE ...)
; compiling (DEFUN ENSURE-EXSCRIBE ...)
; compiling (DEFUN RESET-EXSCRIBE ...)
; compiling (DEFUN SET-EXSCRIBE-MODE ...)
; compiling (DEFUN CALL-WITH-EXSCRIBE-ENVIRONMENT ...)
; compiling (DEFMACRO WITH-EXSCRIBE-ENVIRONMENT ...)
; compiling (DEFUN EXSCRIBE-LOAD-DOCUMENT ...)
; compiling (DEFUN EXSCRIBE-MAKE-HTML ...)
; compiling (DEFPARAMETER *WILD-PATH* ...)
; compiling (DEFUN WILDEN ...)
; compiling (DEFUN MAKE-HTML-TREE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-data.lisp" (written 06 NOV 2005 03:39:25 AM):
; compiling (IN-PACKAGE :EXSCRIBE-DATA)
; compiling (DEFVAR *TODO-LIST* ...)
; compiling (DEFMACRO DEFTAG ...); in: LAMBDA NIL
; #'(LAMBDA (EXSCRIBE-DATA::X) (GENSYM))
;
; caught STYLE-WARNING:
; The variable X is defined but never used.
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-data.lisp
; in: DEFMACRO DEFTAG
; #'(LAMBDA (EXSCRIBE-DATA::X) (GENSYM))
;
; caught STYLE-WARNING:
; The variable X is defined but never used.
; compiling (DEFMACRO DEFSIMPLETAG ...)
; compiling (DEFMACRO DEFSIMPLETAGS ...)
; compiling (DEFSIMPLETAGS EMPH ...)
; compiling (DEFMACRO DEFINE-HEADER-TAG ...)
; compiling (DEFMACRO DEFINE-HEADER-TAGS ...)
; compiling (DEFINE-HEADER-TAGS H1 ...)
; compiling (DEFTAG BODY ...)
; compiling (DEFTAG P ...)
; compiling (DEFTAG FONT ...)
; compiling (DEFTAG TD ...)
; compiling (DEFTAG TH ...)
; compiling (DEFTAG TR ...)
; compiling (DEFTAG TABLE ...)
; compiling (DEFTAG IMG ...)
; compiling (DEFTAG ENUMERATE ...)
; compiling (DEFTAG ITEMIZE ...)
; compiling (DEFTAG ITEM ...)
; compiling (DEFTAG A ...)
; compiling (DEFTAG MAKE-DOCUMENT ...)
; compiling (DEFTAG AUTHOR ...)
; compiling (DEFTAG FOOTNOTE ...)
; compiling (DEFTAG REF ...)
; compiling (DEFTAG TABLE-OF-CONTENTS ...)
; compiling (DEFTAG SECTION ...)
; compiling (DEFTAG SUBSECTION ...)
; compiling (DEFTAG SUBSUBSECTION ...)
; compiling (DEFINE-MARKUP (CENTER . X) ...)
; compiling (DEFUN SMALL ...)
; compiling (DEFUN DOCUMENT-WALK-FURTHER ...)
; compiling (DEFMACRO WALKING-DOCUMENT ...)
; compiling (DEFINE-MARKUP (DOCUMENT . REST) ...)
; compiling (DEFUN BRLIST ...)
; compiling (DEFUN BR* ...)
; compiling (DEFUN SC ...)
; compiling (DEFINE-MARKUP (COLOR # ...) ...)
; compiling (DEFINE-MARKUP (IMAGE &KEY ...) ...)
; compiling (DEFUN MAKE-BIB-TABLE ...)
; compiling (DEFUN MAKE-BIB-FIELDS ...)
; compiling (DEFUN INIT-BIB-ENTRY ...)
; compiling (DEFUN ALLOCATE-BIB-ENTRY ...)
; compiling (DEFUN MAKE-BIB-ENTRY ...)
; compiling (DEFUN MERGE-BIB-ENTRY ...)
; compiling (DEFUN BIB-ADD! ...)
; compiling (DEFINE-MARKUP (BIBLIOGRAPHY &REST ...) ...)
; compiling (DEFUN PRINT-BIBLIOGRAPHY ...)
; compiling (DEFUN BIB-SORT/AUTHOR ...)
; compiling (DEFUN SORT-BIBLIOGRAPHY ...)
; compiling (DEFUN GET-BIB-ENTRY ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-data.fasl written
; compilation finished in 0:00:01
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {10006DB1}> on
#<CL-SOURCE-FILE "exscribe-data" {10006DC1}>.
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/html.lisp" (written 05 NOV 2005 06:48:01 PM):
; compiling (IN-PACKAGE :EXSCRIBE-HTML)
; compiling (DEFUN HTML-RESERVED-P ...)
; compiling (DEFUN HTML-ESCAPE-STREAM ...)
; compiling (DEFUN HTML-ESCAPE ...)
; compiling (DEFUN HTML-ESCAPE-TAG-STREAM ...)
; compiling (DEFUN DOLIST-HTML-STREAM ...)
; compiling (SETF (GET # ...) ...)
; compiling (SETF (GET # ...) ...)
; compiling (SETF (GET # ...) ...)
; compiling (SETF (GET # ...) ...)
; compiling (DEFUN HTML-ATTR ...)
; compiling (DEFUN HTML-KEYWORD ...)
; compiling (DEFUN HTML-ATTR-STREAM ...)
; compiling (DEFUN HTML-TAG-ATTR ...)
; compiling (DEFUN HTML-CLOSE-TAG ...)
; compiling (DEFUN EMPTY-ELEMENT-P ...)
; compiling (DEFUN HTML-STRING ...)
; compiling (DEFUN HTML ...)
; compiling (DEFUN HTML-STREAM ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/html.lisp
; in: DEFUN HTML-STREAM
; (FUNCALL EXSCRIBE-HTML::HANDLER
; STREAM
; EXSCRIBE-HTML::TAG
; EXSCRIBE-HTML::ATTR
; EXSCRIBE-HTML::CONTENT)
; --> 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 SYMBOL), not a FUNCTION.
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/html.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-html.lisp" (written 06 NOV 2005 03:30:20 AM):
; compiling (IN-PACKAGE :EXSCRIBE-HTML)
; compiling (CONFIGURE-SCRIBBLE-FOR-EXSCRIBE)
; compiling (SCRIBBLE:ENABLE-SCRIBBLE-SYNTAX)
; compiling (DEFUN MAKE-TITLE ...)
; compiling (DEFUN MAKE-AUTHOR ...)
; compiling (DEFUN EDITED-FOOTNOTE ...)
; compiling (DEFUN FIND-FIRST-PARAGRAPH ...)
; compiling (DEFUN EDIT-FOOTNOTE ...)
; compiling (DEFUN MAKE-FOOTNOTE ...)
; compiling (DEFUN TITLE-FONT ...)
; compiling (DEFUN MAKE-XSECTION ...)
; compiling (DEFUN MAKE-SECTION ...)
; compiling (DEFUN MAKE-SUBSECTION ...)
; compiling (DEFUN MAKE-SUBSUBSECTION ...)
; compiling (DEFUN COMPUTE-TOC ...)
; compiling (DEFUN MAKE-TOC ...)
; compiling (DEFUN BIB-REF-NAME ...)
; compiling (DEFUN COMPUTE-BIB-REF ...)
; compiling (DEFUN PREPARE-BIB-REF ...)
; compiling (DEFUN SHOW-BIB-ENTRY ...)
; compiling (DEFUN PROCESS-BIBLIOGRAPHY ...)
; compiling (DEFUN REPLACE-CONS! ...)
; compiling (DEFUN POSTPROCESS-DOCUMENT ...)
; compiling (DEFUN PRINT-DOCUMENT ...)
; compiling (DEFUN PROCESS-DOCUMENT ...)
; compiling (DEFUN INIT ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-html.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-txt.lisp" (written 02 NOV 2005 07:07:24 PM):
; compiling (IN-PACKAGE :EXSCRIBE-TXT)
; compiling (DEFUN PROCESS-DOCUMENT ...)
; compiling (DEFUN INIT ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-txt.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-typeset.lisp" (written 02 NOV 2005 07:07:33 PM):
; compiling (IN-PACKAGE :EXSCRIBE-TYPESET)
; compiling (DEFUN PROCESS-DOCUMENT ...)
; compiling (DEFUN INIT ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/exscribe/exscribe-typeset.fasl written
; compilation finished in 0:00:00
;
; compilation unit finished
; caught 2 STYLE-WARNING conditions
; printed 3 notes