cl-zeroconf on sbcl-0.9.9-darwin-ppc - Details

Author:John Wiseman <jjwiseman@yahoo.com>
Version:0.2
Description:
Started at:2006-04-16 00:28:56
Ended at:2006-04-16 00:29:18
Elapsed time (seconds):22
Depends On:uffi
Error:erred while invoking #<COMPILE-OP NIL {40006D99}> on #<CL-SOURCE-FILE \"sysdeps\" {40006DA9}>
Most recent change:2005-12-20 15:31:03
Most recent file:/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/bonjour-apple-mdns.lisp

REPL Output

;;; ASDF-INSTALL: Downloading 18805 bytes from http://lemonodor.com/code/cl-zeroconf_0.2.tar.gz to /Users/gwking/temporary/asdf-test/CL-ZEROCONF.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/CL-ZEROCONF.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/
cl-zeroconf_0.2/
cl-zeroconf_0.2/bonjour-apple-mdns.lisp
cl-zeroconf_0.2/cl-zeroconf.asd
cl-zeroconf_0.2/conditions.lisp
cl-zeroconf_0.2/examples.lisp
cl-zeroconf_0.2/LICENSE.txt
cl-zeroconf_0.2/mdns-ffi.lisp
cl-zeroconf_0.2/package.lisp
cl-zeroconf_0.2/sysdeps.lisp
cl-zeroconf_0.2/test-browse.lisp
cl-zeroconf_0.2/TODO
cl-zeroconf_0.2/unit-test.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/" ;;; ASDF-INSTALL: Downloading package UFFI, required by cl-zeroconf

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

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/uffi.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/
uffi-1.5.9/
uffi-1.5.9/LICENSE
uffi-1.5.9/ChangeLog
uffi-1.5.9/AUTHORS
uffi-1.5.9/src/
uffi-1.5.9/src/corman/
uffi-1.5.9/src/corman/corman-notes.txt
uffi-1.5.9/src/corman/getenv-ccl.lisp
uffi-1.5.9/src/readmacros-mcl.lisp
uffi-1.5.9/src/aggregates.lisp
uffi-1.5.9/src/objects.lisp
uffi-1.5.9/src/primitives.lisp
uffi-1.5.9/src/strings.lisp
uffi-1.5.9/src/package.lisp
uffi-1.5.9/src/libraries.lisp
uffi-1.5.9/src/os.lisp
uffi-1.5.9/src/Makefile
uffi-1.5.9/src/functions.lisp
uffi-1.5.9/src/objects.lisp.rej
uffi-1.5.9/tests/
uffi-1.5.9/tests/Makefile.msvc
uffi-1.5.9/tests/casts.lisp
uffi-1.5.9/tests/atoifl.lisp
uffi-1.5.9/tests/uffi-c-test-lib.lisp
uffi-1.5.9/tests/gethostname.lisp
uffi-1.5.9/tests/foreign-var.lisp
uffi-1.5.9/tests/make.sh
uffi-1.5.9/tests/rt.lisp
uffi-1.5.9/tests/strtol.lisp
uffi-1.5.9/tests/getenv.lisp
uffi-1.5.9/tests/union.lisp
uffi-1.5.9/tests/compress.lisp
uffi-1.5.9/tests/package.lisp
uffi-1.5.9/tests/structs.lisp
uffi-1.5.9/tests/foreign-loader.lisp
uffi-1.5.9/tests/time.lisp
uffi-1.5.9/tests/arrays.lisp
uffi-1.5.9/tests/uffi-c-test.c
uffi-1.5.9/tests/Makefile
uffi-1.5.9/tests/objects.lisp
uffi-1.5.9/README
uffi-1.5.9/uffi.asd
uffi-1.5.9/doc/
uffi-1.5.9/doc/catalog-darwin.xml
uffi-1.5.9/doc/ref_aggregate.xml
uffi-1.5.9/doc/schemas.xml
uffi-1.5.9/doc/COPYING.GFDL
uffi-1.5.9/doc/catalog-suse.xml
uffi-1.5.9/doc/notes.xml
uffi-1.5.9/doc/uffi.xml
uffi-1.5.9/doc/catalog-debian.xml
uffi-1.5.9/doc/xinclude.mod
uffi-1.5.9/doc/ref_declare.xml
uffi-1.5.9/doc/intro.xml
uffi-1.5.9/doc/entities.inc
uffi-1.5.9/doc/ref_func_libr.xml
uffi-1.5.9/doc/catalog-suse90.xml
uffi-1.5.9/doc/ref_object.xml
uffi-1.5.9/doc/uffi.pdf
uffi-1.5.9/doc/ref_string.xml
uffi-1.5.9/doc/html_chunk.xsl
uffi-1.5.9/doc/glossary.xml
uffi-1.5.9/doc/ref_primitive.xml
uffi-1.5.9/doc/preface.xml
uffi-1.5.9/doc/bookinfo.xml
uffi-1.5.9/doc/appendix.xml
uffi-1.5.9/doc/html.tar.gz
uffi-1.5.9/doc/fo.xsl
uffi-1.5.9/doc/html.xsl
uffi-1.5.9/doc/Makefile
uffi-1.5.9/doc/catalog-mandrake.xml
uffi-1.5.9/doc/catalog-suse91.xml
uffi-1.5.9/uffi-tests.asd
uffi-1.5.9/INSTALL
uffi-1.5.9/TODO
uffi-1.5.9/Makefile.common
uffi-1.5.9/Makefile
uffi-1.5.9/NEWS
uffi-1.5.9/benchmarks/
uffi-1.5.9/benchmarks/allocation.lisp
uffi-1.5.9/benchmarks/Makefile
uffi-1.5.9/examples/
uffi-1.5.9/examples/run-examples.lisp
uffi-1.5.9/examples/gethostname.lisp
uffi-1.5.9/examples/Makefile.msvc
uffi-1.5.9/examples/atoifl.lisp
uffi-1.5.9/examples/test-examples.lisp
uffi-1.5.9/examples/c-test-fns.lisp
uffi-1.5.9/examples/strtol.lisp
uffi-1.5.9/examples/Makefile
uffi-1.5.9/examples/acl-compat-tester.lisp
uffi-1.5.9/examples/getenv.lisp
uffi-1.5.9/examples/union.lisp
uffi-1.5.9/examples/getshells.lisp
uffi-1.5.9/examples/compress.lisp
uffi-1.5.9/examples/gettime.lisp
uffi-1.5.9/examples/c-test-fns.c
uffi-1.5.9/examples/arrays.lisp
uffi-1.5.9/examples/file-socket.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/" 
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/package.lisp" (written 14 NOV 2005 09:39:19 PM):
; compiling (IN-PACKAGE #:CL-USER)
; compiling (DEFPACKAGE #:UFFI ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/primitives.lisp" (written 05 JUL 2005 08:35:14 PM):
; compiling (IN-PACKAGE #:UFFI)
; compiling (DEFMACRO DEF-CONSTANT ...)
; compiling (DEFMACRO DEF-TYPE ...)
; compiling (DEFMACRO NULL-CHAR-P ...)
; compiling (DEFMACRO DEF-FOREIGN-TYPE ...)
; compiling (DEFVAR +TYPE-CONVERSION-HASH+ ...)
; compiling (DEFVAR *CMU-DEF-TYPE-HASH* ...)
; compiling (DEFVAR *CMU-SBCL-DEF-TYPE-LIST* ...)
; compiling (DEFVAR *TYPE-CONVERSION-LIST* ...)
; compiling (SETQ *TYPE-CONVERSION-LIST* ...)
; compiling (DOLIST (TYPE *TYPE-CONVERSION-LIST*) ...)
; compiling (DOLIST (TYPE *CMU-SBCL-DEF-TYPE-LIST*) ...)
; compiling (DEFUN BASIC-CONVERT-FROM-UFFI-TYPE ...)
; compiling (DEFUN %CONVERT-FROM-UFFI-TYPE ...)
; compiling (DEFUN CONVERT-FROM-UFFI-TYPE ...)
; compiling (WHEN (CHAR= #\a ...) ...); in: LAMBDA NIL
;     (PUSHNEW :UFFI-LOWERCASE-READER *FEATURES*)
; --> LET* ADJOIN 
; ==>
;   *FEATURES*
; 
; note: deleting unreachable code

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/primitives.lisp
; in: EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)
;     (PUSHNEW :UFFI-LOWERCASE-READER *FEATURES*)
; --> LET* ADJOIN 
; ==>
;   *FEATURES*
; 
; note: deleting unreachable code

; compiling (WHEN (NOT #) ...); in: LAMBDA NIL
;     (PUSHNEW :UFFI-CASE-SENSITIVE *FEATURES*)
; --> LET* ADJOIN 
; ==>
;   *FEATURES*
; 
; note: deleting unreachable code

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/primitives.lisp
; in: EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)
;     (PUSHNEW :UFFI-CASE-SENSITIVE *FEATURES*)
; --> LET* ADJOIN 
; ==>
;   *FEATURES*
; 
; note: deleting unreachable code

; compiling (DEFUN MAKE-LISP-NAME ...)
; compiling (SETQ *FEATURES* ...)
; compiling (SETQ *FEATURES* ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/primitives.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/objects.lisp" (written 18 SEP 2005 03:23:45 AM):
; compiling (IN-PACKAGE #:UFFI)
; compiling (DEFUN SIZE-OF-FOREIGN-TYPE ...)
; compiling (DEFMACRO ALLOCATE-FOREIGN-OBJECT ...)
; compiling (DEFMACRO FREE-FOREIGN-OBJECT ...)
; compiling (DEFMACRO NULL-POINTER-P ...)
; compiling (DEFMACRO MAKE-NULL-POINTER ...)
; compiling (DEFMACRO MAKE-POINTER ...)
; compiling (DEFMACRO CHAR-ARRAY-TO-POINTER ...)
; compiling (DEFMACRO DEREF-POINTER ...)
; compiling (DEFMACRO ENSURE-CHAR-CHARACTER ...)
; compiling (DEFMACRO ENSURE-CHAR-INTEGER ...)
; compiling (DEFMACRO ENSURE-CHAR-STORABLE ...)
; compiling (DEFMACRO POINTER-ADDRESS ...)
; compiling (DEFMACRO WITH-FOREIGN-OBJECT ...)
; compiling (DEFMACRO WITH-FOREIGN-OBJECTS ...)
; compiling (DEFMACRO WITH-CAST-POINTER ...)
; compiling (DEFMACRO DEF-FOREIGN-VAR ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/objects.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/aggregates.lisp" (written 05 JUL 2005 08:35:14 PM):
; compiling (IN-PACKAGE #:UFFI)
; compiling (DEFMACRO DEF-ENUM ...)
; compiling (DEFMACRO DEF-ARRAY-POINTER ...)
; compiling (DEFUN PROCESS-STRUCT-FIELDS ...)
; compiling (DEFMACRO DEF-STRUCT ...)
; compiling (DEFMACRO GET-SLOT-VALUE ...)
; compiling (DEFMACRO GET-SLOT-POINTER ...)
; compiling (DEFMACRO DEREF-ARRAY ...)
; compiling (DEFMACRO DEF-UNION ...)
; compiling (SB-EXT:WITHOUT-PACKAGE-LOCKS (DEFVAR *SYSTEM-COPY-FN* ...) ...)
; compiling (DEFUN CONVERT-FROM-FOREIGN-USB8 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/aggregates.lisp
; in: DEFUN CONVERT-FROM-FOREIGN-USB8
;     (MAKE-ARRAY UFFI::LEN :ELEMENT-TYPE '(UNSIGNED-BYTE 8))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MOD 536870911) CONS NULL), not a INTEGER.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MOD 536870911) CONS NULL), not a LIST.

;     (FUNCALL UFFI::*SYSTEM-COPY-FN*
;            UFFI::SAP
;            0
;            UFFI::RESULT
;            UFFI::+SYSTEM-COPY-OFFSET+
;            (* UFFI::LEN UFFI::+SYSTEM-COPY-MULTIPLIER+))
; --> 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/uffi-1.5.9/src/aggregates.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/functions.lisp" (written 05 JUL 2005 08:35:14 PM):
; compiling (IN-PACKAGE #:UFFI)
; compiling (DEFUN PROCESS-FUNCTION-ARGS ...)
; compiling (DEFUN PROCESS-ONE-FUNCTION-ARG ...)
; compiling (DEFUN ALLEGRO-CONVERT-RETURN-TYPE ...)
; compiling (DEFUN FUNCALLABLE-LAMBDA-LIST ...)
; compiling (DEFUN CONVERT-LISPWORKS-ARGS ...)
; compiling (DEFUN PREPROCESS-NAMES ...)
; compiling (DEFUN PREPROCESS-ARGS ...)
; compiling (DEFMACRO DEF-FUNCTION ...); in: LAMBDA NIL
;     (MULTIPLE-VALUE-BIND
;       (UFFI::LISP-ARGS UFFI::OUT UFFI::PROCESSED)
;       (UFFI::PREPROCESS-ARGS UFFI::ARGS)
;     (IF (= (LENGTH UFFI::OUT) 0)
;         `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                               ,UFFI::ARGS
;                               ,@(IF UFFI::MODULE
;                                     (LIST :MODULE UFFI::MODULE)
;                                     (VALUES))
;                               ,@(IF UFFI::RETURNING
;                                     (LIST :RETURNING UFFI::RETURNING)
;                                     (VALUES)))
;         `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                               ,UFFI::ARGS
;                               ,@(IF UFFI::RETURNING
;                                     (LIST :RETURNING UFFI::RETURNING)
;                                     (VALUES)))))
; --> MULTIPLE-VALUE-CALL 
; ==>
;   #'(LAMBDA
;         (&OPTIONAL (UFFI::LISP-ARGS) (UFFI::OUT) (UFFI::PROCESSED) &REST #:G3)
;       (DECLARE (IGNORE #:G3))
;       (IF (= (LENGTH UFFI::OUT) 0)
;           `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                                 ,UFFI::ARGS
;                                 ,@(IF UFFI::MODULE
;                                       (LIST :MODULE UFFI::MODULE)
;                                       (VALUES))
;                                 ,@(IF UFFI::RETURNING
;                                       (LIST :RETURNING UFFI::RETURNING)
;                                       (VALUES)))
;           `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                                 ,UFFI::ARGS
;                                 ,@(IF UFFI::RETURNING
;                                       (LIST :RETURNING UFFI::RETURNING)
;                                       (VALUES)))))
; 
; caught STYLE-WARNING:
;   The variable LISP-ARGS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable PROCESSED is defined but never used.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/functions.lisp
; in: DEFMACRO DEF-FUNCTION
;     (MULTIPLE-VALUE-BIND
;       (UFFI::LISP-ARGS UFFI::OUT UFFI::PROCESSED)
;       (UFFI::PREPROCESS-ARGS UFFI::ARGS)
;     (IF (= (LENGTH UFFI::OUT) 0)
;         `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                               ,UFFI::ARGS
;                               ,@(IF UFFI::MODULE
;                                     (LIST :MODULE UFFI::MODULE)
;                                     (VALUES))
;                               ,@(IF UFFI::RETURNING
;                                     (LIST :RETURNING UFFI::RETURNING)
;                                     (VALUES)))
;         `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                               ,UFFI::ARGS
;                               ,@(IF UFFI::RETURNING
;                                     (LIST :RETURNING UFFI::RETURNING)
;                                     (VALUES)))))
; --> MULTIPLE-VALUE-CALL 
; ==>
;   #'(LAMBDA
;         (&OPTIONAL (UFFI::LISP-ARGS) (UFFI::OUT) (UFFI::PROCESSED) &REST #:G57)
;       (DECLARE (IGNORE #:G57))
;       (IF (= (LENGTH UFFI::OUT) 0)
;           `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                                 ,UFFI::ARGS
;                                 ,@(IF UFFI::MODULE
;                                       (LIST :MODULE UFFI::MODULE)
;                                       (VALUES))
;                                 ,@(IF UFFI::RETURNING
;                                       (LIST :RETURNING UFFI::RETURNING)
;                                       (VALUES)))
;           `(UFFI::%DEF-FUNCTION ,UFFI::NAMES
;                                 ,UFFI::ARGS
;                                 ,@(IF UFFI::RETURNING
;                                       (LIST :RETURNING UFFI::RETURNING)
;                                       (VALUES)))))
; 
; caught STYLE-WARNING:
;   The variable LISP-ARGS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable PROCESSED is defined but never used.

; compiling (DEFMACRO %DEF-FUNCTION ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/functions.fasl written
; compilation finished in 0:00:01
WARNING:
   COMPILE-FILE warned while performing #<COMPILE-OP NIL {10007DA1}> on
   #<CL-SOURCE-FILE "functions" {100DD721}>.
STYLE-WARNING: redefining SIZE-OF-FOREIGN-TYPE in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/strings.lisp" (written 14 NOV 2005 09:40:18 PM):
; compiling (IN-PACKAGE #:UFFI)
; compiling (DEFVAR +NULL-CSTRING-POINTER+ ...)
; compiling (DEFMACRO CONVERT-FROM-CSTRING ...)
; compiling (DEFMACRO CONVERT-TO-CSTRING ...)
; compiling (DEFMACRO FREE-CSTRING ...)
; compiling (DEFMACRO WITH-CSTRING ...)
; compiling (DEFMACRO WITH-CSTRINGS ...)
; compiling (DEFMACRO CONVERT-TO-FOREIGN-STRING ...)
; compiling (DEFMACRO CONVERT-FROM-FOREIGN-STRING ...); in: LAMBDA NIL
;     (LET* ((UFFI::OBJ (CAR (CDR #:WHOLE40)))
;          (LENGTH
;           (IF (SB-KERNEL::KEYWORD-SUPPLIED-P :LENGTH #:KEYWORDS-42)
;               (SB-KERNEL::LOOKUP-KEYWORD :LENGTH #:KEYWORDS-42)
;               NIL))
;          (UFFI::LOCALE
;           (IF #:SUPPLIEDP-43
;               (SB-KERNEL::LOOKUP-KEYWORD ':LOCALE #:KEYWORDS-42)
;               :DEFAULT))
;          (UFFI::NULL-TERMINATED-P
;           (IF #:SUPPLIEDP-44
;               (SB-KERNEL::LOOKUP-KEYWORD ':NULL-TERMINATED-P #:KEYWORDS-42)
;               T)))
;     (BLOCK UFFI:CONVERT-FROM-FOREIGN-STRING
;       (LET ((UFFI::STORED-OBJ #))
;         `(LET (#)
;            (IF # ,NIL #)))))
; 
; caught STYLE-WARNING:
;   The variable LOCALE is defined but never used.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/strings.lisp
; in: DEFMACRO CONVERT-FROM-FOREIGN-STRING
;     (DEFMACRO UFFI:CONVERT-FROM-FOREIGN-STRING
;             (UFFI::OBJ
;              &KEY LENGTH (UFFI::LOCALE :DEFAULT) (UFFI::NULL-TERMINATED-P T))
;     (LET ((UFFI::STORED-OBJ (GENSYM)))
;       `(LET ((,UFFI::STORED-OBJ ,UFFI::OBJ))
;          (IF (UFFI:NULL-POINTER-P ,UFFI::STORED-OBJ)
;              ,NIL
;              (UFFI::SBCL-NATURALIZE-CSTRING #
;                                             :LENGTH
;                                             ,LENGTH
;                                             :NULL-TERMINATED-P
;                                             ,UFFI::NULL-TERMINATED-P)))))
; --> EVAL-WHEN SB-C::%DEFMACRO SB-C::%DEFMACRO FUNCTION LET* 
; ==>
;   (LET* ((UFFI::OBJ (CAR (CDR #:WHOLE40)))
;          (LENGTH
;           (IF (SB-KERNEL::KEYWORD-SUPPLIED-P :LENGTH #:KEYWORDS-42)
;               (SB-KERNEL::LOOKUP-KEYWORD :LENGTH #:KEYWORDS-42)
;               NIL))
;          (UFFI::LOCALE
;           (IF #:SUPPLIEDP-43
;               (SB-KERNEL::LOOKUP-KEYWORD ':LOCALE #:KEYWORDS-42)
;               :DEFAULT))
;          (UFFI::NULL-TERMINATED-P
;           (IF #:SUPPLIEDP-44
;               (SB-KERNEL::LOOKUP-KEYWORD ':NULL-TERMINATED-P #:KEYWORDS-42)
;               T)))
;     (BLOCK UFFI:CONVERT-FROM-FOREIGN-STRING
;       (LET ((UFFI::STORED-OBJ #))
;         `(LET (#)
;            (IF # ,NIL #)))))
; 
; caught STYLE-WARNING:
;   The variable LOCALE is defined but never used.

; compiling (DEFMACRO ALLOCATE-FOREIGN-STRING ...)
; compiling (DEFUN FOREIGN-STRING-LENGTH ...)
; compiling (DEFMACRO WITH-FOREIGN-STRING ...)
; compiling (DEFMACRO WITH-FOREIGN-STRINGS ...)
; compiling (DEFUN SBCL-NATURALIZE-CSTRING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/strings.lisp
; in: DEFUN SBCL-NATURALIZE-CSTRING
;     (SUBSEQ UFFI::CASTED 0 LENGTH)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR NULL
;                               (SIMPLE-ARRAY CHARACTER (*))
;                               (SIMPLE-ARRAY NIL (*))
;                               SIMPLE-BASE-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 (OR NULL
;                               (SIMPLE-ARRAY CHARACTER (*))
;                               (SIMPLE-ARRAY NIL (*))
;                               SIMPLE-BASE-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).

;     (COPY-SEQ (SUBSEQ UFFI::CASTED 0 LENGTH))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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 (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), 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).

;     (COPY-SEQ UFFI::CASTED)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR NULL
;                               (SIMPLE-ARRAY CHARACTER (*))
;                               (SIMPLE-ARRAY NIL (*))
;                               SIMPLE-BASE-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 (OR NULL
;                               (SIMPLE-ARRAY CHARACTER (*))
;                               (SIMPLE-ARRAY NIL (*))
;                               SIMPLE-BASE-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).

;     (FUNCALL UFFI::*SYSTEM-COPY-FN*
;            UFFI::SAP
;            0
;            UFFI::RESULT
;            UFFI::+SYSTEM-COPY-OFFSET+
;            (* LENGTH UFFI::+SYSTEM-COPY-MULTIPLIER+))
; --> 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 (DEF-FUNCTION "strlen" ...)
; compiling (DEF-TYPE CHAR-PTR-DEF ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/strings.fasl written
; compilation finished in 0:00:01
WARNING:
   COMPILE-FILE warned while performing #<COMPILE-OP NIL {10007DA1}> on
   #<CL-SOURCE-FILE "strings" {100DD159}>.
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/libraries.lisp" (written 09 NOV 2005 12:09:02 AM):
; compiling (IN-PACKAGE #:UFFI)
; compiling (DEFVAR *LOADED-LIBRARIES* ...)
; compiling (DEFUN DEFAULT-FOREIGN-LIBRARY-TYPE ...)
; compiling (DEFUN FOREIGN-LIBRARY-TYPES ...)
; compiling (DEFUN FIND-FOREIGN-LIBRARY ...)
; compiling (DEFUN LOAD-FOREIGN-LIBRARY ...)
; compiling (DEFUN CONVERT-SUPPORTING-LIBRARIES-TO-STRING ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/libraries.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/os.lisp" (written 14 NOV 2005 02:02:47 PM):
; compiling (IN-PACKAGE #:UFFI)
; compiling (DEFUN GETENV ...)
; compiling (DEFUN RUN-SHELL-COMMAND ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/uffi-1.5.9/src/os.fasl written
; compilation finished in 0:00:00
STYLE-WARNING: redefining STRLEN in DEFUN
; 
; compilation unit finished
;   caught 6 STYLE-WARNING conditions
;   printed 29 notes
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/package.lisp" (written 20 DEC 2005 03:31:03 PM):
; compiling (DEFPACKAGE "DNS-SD" ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/mdns-ffi.lisp" (written 20 DEC 2005 03:31:03 PM):
; compiling (IN-PACKAGE "DNS-SD")
; compiling (DEFMACRO DEF-DNSSD-TYPE ...)
; compiling (DEFMACRO DEF-DNSSD-FUNCTION ...)
; compiling (DEFUN HANDLE-DNS-SD-ERROR ...)
; compiling (DEF-DNSSD-TYPE VOIDPTR ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-REF ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-REF-PTR ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-FLAGS ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-ERROR-TYPE ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-REGISTER-REPLY ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-BROWSE-REPLY ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-RESOLVE-REPLY ...)
; compiling (DEF-DNSSD-TYPE DNS-SERVICE-QUERY-RECORD-REPLY ...)
; compiling (UFFI:DEF-FUNCTION ("DNSServiceRefSockFD" %DNS-SERVICE-REF-SOCK-FD) ...)
; compiling (DEFUN DNS-SERVICE-REF-SOCK-FD ...)
; compiling (UFFI:DEF-FUNCTION ("DNSServiceRefDeallocate" DNS-SERVICE-REF-DEALLOCATE) ...)
; compiling (DEF-DNSSD-FUNCTION DNS-SERVICE-PROCESS-RESULT ...)
; compiling (DEF-DNSSD-FUNCTION DNS-SERVICE-BROWSE ...)
; compiling (DEF-DNSSD-FUNCTION DNS-SERVICE-RESOLVE ...)
; compiling (DEF-DNSSD-FUNCTION DNS-SERVICE-QUERY-RECORD ...)
; compiling (DEF-DNSSD-FUNCTION DNS-SERVICE-REGISTER ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-NO-ERR ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-UNKNOWN ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-NO-SUCH-NAME ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-NO-MEMORY ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-BAD-PARAM ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-BAD-REFERENCE ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-BAD-STATE ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-BAD-FLAGS ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-UNSUPPORTED ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-NOT-INITIALIZED ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-ALREADY-REGISTERED ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-NAME-CONFLICT ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-INVALID ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-INCOMPATIBLE ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-ERR-BAD-INTERFACE-INDEX ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-MORE-COMING ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-FINISHED ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-ADD ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-DEFAULT ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-REMOVE ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-NO-AUTO-RENAME ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-AUTO-RENAME ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-SHARED ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-UNIQUE ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-BROWSE-DOMAINS ...)
; compiling (UFFI:DEF-CONSTANT DNS-SERVICE-FLAGS-REGISTRATION-DOMAINS ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/mdns-ffi.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/conditions.lisp" (written 20 DEC 2005 03:31:03 PM):
; compiling (IN-PACKAGE "DNS-SD")
; compiling (DEFSTRUCT ERROR-INFO ...)
; compiling (DEFPARAMETER *DNS-SD-ERRORS* ...)
; compiling (DEFMACRO DEF-DNS-SD-ERROR ...)
; compiling (DEFUN DNS-SD-ERROR ...)
; compiling (DEFUN ERROR-CODE->ERROR-CLASS ...)
; compiling (DEFINE-CONDITION DNS-SD-ERROR ...)
; compiling (DEFINE-CONDITION DNS-SD-RESULT-ERROR ...)
; compiling (SETF (DOCUMENTATION # ...) ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-UNKNOWN-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-NO-SUCH-NAME-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-NO-MEMORY-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-BAD-PARAM-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-BAD-REFERENCE-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-BAD-STATE-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-BAD-FLAGS-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-UNSUPPORTED-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-NOT-INITIALIZED-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-ALREADY-REGISTERED-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-NAME-CONFLICT-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-INVALID-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-INCOMPATIBLE-ERROR ...)
; compiling (DEF-DNS-SD-ERROR DNS-SD-BAD-INTERFACE-INDEX-ERROR ...)
; compiling (DEFINE-CONDITION SERVICE-ALREADY-PUBLISHED-ERROR ...)
; compiling (DEFINE-CONDITION SERVICE-NOT-PUBLISHED-ERROR ...)
; compiling (DEFINE-CONDITION SOCKET-FD-ERROR ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/conditions.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/sysdeps.lisp" (written 20 DEC 2005 03:31:03 PM):
; compiling (IN-PACKAGE "DNS-SD")
; compiling (DEFUN MAKE-LOCK ...)
; compiling (DEFMACRO WITH-LOCK ...)
; compiling (DEFUN FDS-INPUT-AVAILABLE-P ...)
; compiling (DEFINE-ALIEN-FUNCTION %%PUBLISH-CALLBACK-TRAMPOLINE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/sysdeps.lisp
; in: DEFINE-ALIEN-FUNCTION %%PUBLISH-CALLBACK-TRAMPOLINE
;     (DNS-SD::CONTEXT (* T))
; 
; note: deleting unreachable code

;     (* T)
; --> VALUES PROG1 LET 
; ==>
;   (THE NUMBER T)
; 
; caught WARNING:
;   Asserted type NUMBER conflicts with derived type (VALUES (MEMBER T) &OPTIONAL).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; compiling (DEFPARAMETER %PUBLISH-CALLBACK-TRAMPOLINE ...)
; compiling (DEFINE-ALIEN-FUNCTION %%BROWSE-CALLBACK-TRAMPOLINE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/sysdeps.lisp
; in: DEFINE-ALIEN-FUNCTION %%BROWSE-CALLBACK-TRAMPOLINE
;     (DNS-SD::CONTEXT (* T))
; 
; note: deleting unreachable code

;     (* T)
; --> VALUES PROG1 LET 
; ==>
;   (THE NUMBER T)
; 
; caught WARNING:
;   Asserted type NUMBER conflicts with derived type (VALUES (MEMBER T) &OPTIONAL).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; compiling (DEFPARAMETER %BROWSE-CALLBACK-TRAMPOLINE ...)
; compiling (DEFINE-ALIEN-FUNCTION %%RESOLVE-CALLBACK-TRAMPOLINE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/sysdeps.lisp
; in: DEFINE-ALIEN-FUNCTION %%RESOLVE-CALLBACK-TRAMPOLINE
;     (DNS-SD::CONTEXT (* T))
; 
; note: deleting unreachable code

;     (* T)
; --> VALUES PROG1 LET 
; ==>
;   (THE NUMBER T)
; 
; caught WARNING:
;   Asserted type NUMBER conflicts with derived type (VALUES (MEMBER T) &OPTIONAL).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; compiling (DEFPARAMETER %RESOLVE-CALLBACK-TRAMPOLINE ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/cl-zeroconf_0.2/sysdeps.fasl written
; compilation finished in 0:00:03
WARNING:
   COMPILE-FILE warned while performing #<COMPILE-OP NIL {40006D99}> on
   #<CL-SOURCE-FILE "sysdeps" {40006DA9}>.
; 
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   caught 3 WARNING conditions
;   printed 3 notes
erred while invoking #<COMPILE-OP NIL {40006D99}> on
#<CL-SOURCE-FILE "sysdeps" {40006DA9}>