REPL Output
;;; ASDF-INSTALL: Downloading 16822 bytes from http://common-lisp.net/project/linedit/files/linedit_latest.tar.gz to /Users/gwking/temporary/asdf-test/LINEDIT.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/LINEDIT.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/
linedit_0.15.12/
linedit_0.15.12/LICENSE
linedit_0.15.12/linedit.asd
linedit_0.15.12/backend.lisp
linedit_0.15.12/buffer.lisp
linedit_0.15.12/command-functions.lisp
linedit_0.15.12/command-keys.lisp
linedit_0.15.12/complete.lisp
linedit_0.15.12/dumb-terminal.lisp
linedit_0.15.12/editor.lisp
linedit_0.15.12/line.lisp
linedit_0.15.12/main.lisp
linedit_0.15.12/matcher.lisp
linedit_0.15.12/packages.lisp
linedit_0.15.12/rewindable.lisp
linedit_0.15.12/sbcl-repl.lisp
linedit_0.15.12/smart-terminal.lisp
linedit_0.15.12/terminal-translations.lisp
linedit_0.15.12/terminal.lisp
linedit_0.15.12/utility-functions.lisp
linedit_0.15.12/utility-macros.lisp
linedit_0.15.12/signals.c
linedit_0.15.12/terminal_glue.c
linedit_0.15.12/version.lisp-expr
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/" ;;; ASDF-INSTALL: Downloading package OSICAT, required by linedit
;;; ASDF-INSTALL: Downloading 14558 bytes from http://common-lisp.net/project/osicat/files/osicat_latest.tar.gz to /Users/gwking/temporary/asdf-test/osicat.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/osicat.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/
osicat_0.5.0/
osicat_0.5.0/osicat.asd
osicat_0.5.0/ports.lisp
osicat_0.5.0/ffi.lisp
osicat_0.5.0/early-util.lisp
osicat_0.5.0/grovel-constants.lisp
osicat_0.5.0/packages.lisp
osicat_0.5.0/osicat.lisp
osicat_0.5.0/osicat-glue.c
osicat_0.5.0/version.txt
osicat_0.5.0/test-tools.lisp
osicat_0.5.0/test-osicat.lisp
osicat_0.5.0/LICENSE
osicat_0.5.0/README
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/"
STYLE-WARNING: redefining OUTPUT-FILES (COMPILE-OP C-SOURCE-FILE) in DEFMETHOD
STYLE-WARNING: redefining PERFORM (LOAD-OP C-SOURCE-FILE) in DEFMETHOD
STYLE-WARNING: redefining PERFORM (COMPILE-OP C-SOURCE-FILE) in DEFMETHOD
;;; ASDF-INSTALL: Downloading package UFFI, required by osicat
;;; 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:00
; 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:01
; 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:00
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {10008291}> on
#<CL-SOURCE-FILE "functions" {100E4489}>.
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 {10008291}> on
#<CL-SOURCE-FILE "strings" {100E3EC1}>.
; 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:01
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/osicat_0.5.0/packages.lisp" (written 06 OCT 2005 06:25:31 PM):
; compiling (DEFPACKAGE :OSICAT ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/packages.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/grovel.lisp-temp" (written 16 APR 2006 01:08:39 AM):
; compiling (IN-PACKAGE :OSICAT)
; compiling (DEFCONSTANT MODE-MASK ...)
; compiling (DEFCONSTANT DIRECTORY ...)
; compiling (DEFCONSTANT CHARACTER-DEVICE ...)
; compiling (DEFCONSTANT BLOCK-DEVICE ...)
; compiling (DEFCONSTANT REGULAR-FILE ...)
; compiling (DEFCONSTANT SYMBOLIC-LINK ...)
; compiling (DEFCONSTANT SOCKET ...)
; compiling (DEFCONSTANT PIPE ...)
; compiling (DEFCONSTANT USER-READ ...)
; compiling (DEFCONSTANT USER-WRITE ...)
; compiling (DEFCONSTANT USER-EXEC ...)
; compiling (DEFCONSTANT GROUP-READ ...)
; compiling (DEFCONSTANT GROUP-WRITE ...)
; compiling (DEFCONSTANT GROUP-EXEC ...)
; compiling (DEFCONSTANT OTHER-READ ...)
; compiling (DEFCONSTANT OTHER-WRITE ...)
; compiling (DEFCONSTANT OTHER-EXEC ...)
; compiling (DEFCONSTANT SET-USER-ID ...)
; compiling (DEFCONSTANT SET-GROUP-ID ...)
; compiling (DEFCONSTANT STICKY ...)
; compiling (DEFCONSTANT EOF ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/grovel-constants.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/early-util.lisp" (written 06 OCT 2005 06:25:31 PM):
; compiling (IN-PACKAGE :OSICAT)
; compiling (DEFMACRO WITH-UNIQUE-NAMES ...)
; compiling (DEFINE-CONDITION BUG ...)
; compiling (DEFMACRO WITH-C-NAME ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/early-util.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ffi.lisp" (written 06 OCT 2005 06:25:31 PM):
; compiling (IN-PACKAGE :OSICAT)
; compiling (DEF-FOREIGN-TYPE :SIZE-T ...)
; compiling (DEF-FOREIGN-TYPE :MODE-T ...)
; compiling (DEF-FUNCTION ("osicat_mode" C-FILE-MODE) ...)
; compiling (DEF-FUNCTION ("osicat_getcwd" C-GETCWD) ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ffi.lisp
; in: DEF-FUNCTION ("osicat_getcwd" C-GETCWD)
; (UFFI:DEF-FUNCTION ("osicat_getcwd" OSICAT::C-GETCWD)
; NIL
; :MODULE
; "osicat"
; :RETURNING
; (* :UNSIGNED-CHAR))
; --> UFFI::%DEF-FUNCTION DEFINE-ALIEN-ROUTINE PROGN DEFUN PROGN EVAL-WHEN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES PROG1
; --> LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE
; ==>
; (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
; '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
; (UNSIGNED
; 8))>)
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
; compiling (DEF-FUNCTION "osicat_dirent_name" ...)
; compiling (DEF-FUNCTION "osicat_pwent_name" ...)
; compiling (DEF-FUNCTION "osicat_pwent_passwd" ...)
; compiling (DEF-FUNCTION "osicat_pwent_uid" ...)
; compiling (DEF-FUNCTION "osicat_pwent_gid" ...)
; compiling (DEF-FUNCTION "osicat_pwent_gecos" ...)
; compiling (DEF-FUNCTION "osicat_pwent_home" ...)
; compiling (DEF-FUNCTION "osicat_pwent_shell" ...)
; compiling (DEF-FUNCTION "osicat_tmpfile" ...)
; compiling (DEF-FUNCTION "opendir" ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ffi.lisp
; in: DEF-FUNCTION "opendir"
; (UFFI:DEF-FUNCTION "opendir"
; ((OSICAT::NAME :CSTRING))
; :MODULE
; "osicat"
; :RETURNING
; :POINTER-VOID)
; --> UFFI::%DEF-FUNCTION DEFINE-ALIEN-ROUTINE PROGN DEFUN PROGN EVAL-WHEN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES PROG1
; --> LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE
; ==>
; (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
; '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
; T)>)
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
; compiling (DEF-FUNCTION "closedir" ...)
; compiling (DEF-FUNCTION "readdir" ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ffi.lisp
; in: DEF-FUNCTION "readdir"
; (UFFI:DEF-FUNCTION "readdir"
; ((OSICAT::DIR :POINTER-VOID))
; :MODULE
; "osicat"
; :RETURNING
; :POINTER-VOID)
; --> UFFI::%DEF-FUNCTION DEFINE-ALIEN-ROUTINE PROGN DEFUN PROGN EVAL-WHEN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES PROG1
; --> LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE
; ==>
; (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
; '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
; T)>)
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
; compiling (DEF-FUNCTION "rmdir" ...)
; compiling (DEF-FUNCTION "getenv" ...)
; compiling (DEF-FUNCTION "setenv" ...)
; compiling (DEF-FUNCTION "unsetenv" ...)
; compiling (DEF-FOREIGN-TYPE CSTRING-PTR ...)
; compiling (DEF-FOREIGN-VAR "environ" ...)
; compiling (DEF-FUNCTION "getpwnam" ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ffi.lisp
; in: DEF-FUNCTION "getpwnam"
; (UFFI:DEF-FUNCTION "getpwnam"
; ((OSICAT::NAME :CSTRING))
; :MODULE
; "osicat"
; :RETURNING
; :POINTER-VOID)
; --> UFFI::%DEF-FUNCTION DEFINE-ALIEN-ROUTINE PROGN DEFUN PROGN EVAL-WHEN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES PROG1
; --> LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE
; ==>
; (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
; '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
; T)>)
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
; compiling (DEF-FUNCTION "getpwuid" ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ffi.lisp
; in: DEF-FUNCTION "getpwuid"
; (UFFI:DEF-FUNCTION "getpwuid"
; ((OSICAT::ID :INT))
; :MODULE
; "osicat"
; :RETURNING
; :POINTER-VOID)
; --> UFFI::%DEF-FUNCTION DEFINE-ALIEN-ROUTINE PROGN DEFUN PROGN EVAL-WHEN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES PROG1
; --> LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE
; ==>
; (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
; '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
; T)>)
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
; compiling (DEF-FUNCTION "readlink" ...)
; compiling (DEF-FUNCTION "symlink" ...)
; compiling (DEF-FUNCTION "link" ...)
; compiling (DEF-FUNCTION "chmod" ...)
; compiling (DEF-FUNCTION "chdir" ...)
; compiling (DEF-FUNCTION "tmpnam" ...)
; compiling (DEF-FUNCTION "unlink" ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ffi.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ports.lisp" (written 06 OCT 2005 06:25:31 PM):
; compiling (IN-PACKAGE :OSICAT)
; compiling (DEFUN MAKE-FD-STREAM ...)
; compiling (PUSHNEW (QUOTE FD-STREAMS) ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/ports.fasl written
; compilation finished in 0:00:00
STYLE-WARNING: redefining GETENV in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/osicat.lisp" (written 06 OCT 2005 06:25:31 PM):
; compiling (IN-PACKAGE :OSICAT)
; compiling (DEFPARAMETER *OSICAT-VERSION* ...)
; compiling (DECLAIM (INLINE C-FILE-KIND))
; compiling (DEF)
; compiling (DEFMACRO WITH-C-FILE ...)
; compiling (DEFUN ABSOLUTE-PATHNAME-P ...)
; compiling (DEFUN RELATIVE-PATHNAME-P ...)
; compiling (DEFUN ABSOLUTE-PATHNAME ...)
; compiling (DEFUN UNMERGE-PATHNAMES ...)
; compiling (DEFUN FILE-KIND ...)
; compiling (DEFUN OPEN-TEMPORARY-FILE ...)
; compiling (DEFMACRO WITH-TEMPORARY-FILE ...)
; compiling (DEFMACRO WITH-DIRECTORY-ITERATOR ...)
; compiling (DEFUN CALL-WITH-DIRECTORY-ITERATOR ...)
; compiling (DEFUN MAPDIR ...)
; compiling (DEFUN DELETE-DIRECTORY ...)
; compiling (DEFUN ENVIRONMENT-VARIABLE ...)
; compiling (DEFUN (SETF ENVIRONMENT-VARIABLE) ...)
; compiling (DEFUN MAKUNBOUND-ENVIRONMENT-VARIABLE ...)
; compiling (DEFUN ENVIRONMENT ...)
; compiling (DEFUN (SETF ENVIRONMENT) ...)
; compiling (DEFUN READ-LINK ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/osicat.lisp
; in: DEFUN READ-LINK
; (UFFI:ALLOCATE-FOREIGN-STRING OSICAT::SIZE)
; --> MAKE-ALIEN
; ==>
; (SB-ALIEN-INTERNALS:%SAP-ALIEN (SB-ALIEN::%MAKE-ALIEN (* 8 OSICAT::SIZE))
; '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
; (UNSIGNED
; 8))>)
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
; compiling (DEFUN MAKE-LINK ...)
; compiling (DEFCONSTANT +PERMISSIONS+ ...)
; compiling (DEFUN FILE-PERMISSIONS ...)
; compiling (DEFUN (SETF FILE-PERMISSIONS) ...)
; compiling (DEFUN CURRENT-DIRECTORY ...)
; compiling (DEFUN (SETF CURRENT-DIRECTORY) ...)
; compiling (DEFUN USER-INFO ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/osicat.lisp
; in: DEFUN USER-INFO
; (UFFI:MAKE-NULL-POINTER :POINTER-VOID)
; --> SAP-ALIEN
; ==>
; (SB-ALIEN-INTERNALS:%SAP-ALIEN (SB-SYS:INT-SAP 0)
; '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
; (*
; T))>)
;
; note: unable to
; optimize
; because:
; could not optimize away %SAP-ALIEN: forced to do runtime
; allocation of alien-value structure
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/osicat_0.5.0/osicat.fasl written
; compilation finished in 0:00:02
;
; compilation unit finished
; printed 8 notes
;;; ASDF-INSTALL: Downloading package TERMINFO, required by linedit
;;; ASDF-INSTALL: Downloading 10224 bytes from http://common-lisp.net/project/linedit/files/terminfo_latest.tar.gz to /Users/gwking/temporary/asdf-test/terminfo.asdf-install-tmp ...
;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/terminfo.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/
terminfo_1.3/
terminfo_1.3/terminfo.lisp
terminfo_1.3/terminfo.asd
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/"
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/"
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/terminfo.lisp" (written 24 NOV 2003 04:51:06 PM):
;
; caught STYLE-WARNING:
; Character decoding error in a ;-comment at position 70 reading source file #<FD-STREAM for "file /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/terminfo.lisp" {103DB2D9}>, resyncing.
; compiling (IN-PACKAGE "COMMON-LISP-USER")
; compiling (UNLESS (FIND-PACKAGE "TERMINFO") ...)
; compiling (IN-PACKAGE "TERMINFO")
; compiling (EXPORT (QUOTE #))
; compiling (DEFVAR *TERMINFO-DIRECTORIES* ...)
; compiling (DEFVAR *TERMINFO* ...)
; compiling (DEFVAR *CAPABILITIES* ...)
; compiling (FLET (#) ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/terminfo.lisp
; in: DEFSTRUCT TERMINFO
; (DEFSTRUCT
; (TERMINFO::TERMINFO
; (:PRINT-FUNCTION
; (LAMBDA (TERMINFO::OBJECT STREAM TERMINFO::DEPTH)
; (DECLARE #)
; (PRINT-UNREADABLE-OBJECT # #))))
; (TERMINFO::NAMES (TERMINFO::REQUIRED-ARGUMENT) :TYPE LIST :READ-ONLY T)
; (TERMINFO::BOOLEANS (TERMINFO::REQUIRED-ARGUMENT)
; :TYPE
; (SIMPLE-ARRAY (MEMBER T NIL) (*)))
; (TERMINFO::NUMBERS (TERMINFO::REQUIRED-ARGUMENT)
; :TYPE
; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)))
; (TERMINFO::STRINGS (TERMINFO::REQUIRED-ARGUMENT)
; :TYPE
; (SIMPLE-ARRAY T (*))))
; --> PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET TRULY-THE SB-KERNEL::%MAKE-INSTANCE-WITH-LAYOUT
; ==>
; (SB-KERNEL::%DELAYED-GET-COMPILER-LAYOUT TERMINFO::TERMINFO)
;
; note: implementation limitation: Non-toplevel DEFSTRUCT constructors are slow.
; --> PROGN LOCALLY SB-INT:DEF!METHOD
; ==>
; (DEFMETHOD PRINT-OBJECT
; ((#:G25 TERMINFO::TERMINFO) #:G26)
; (FUNCALL
; #'(LAMBDA (TERMINFO::OBJECT STREAM TERMINFO::DEPTH)
; (DECLARE (IGNORE TERMINFO::DEPTH))
; (PRINT-UNREADABLE-OBJECT
; (TERMINFO::OBJECT STREAM :TYPE T :IDENTITY T)
; (FORMAT STREAM "~A" #)))
; #:G25
; #:G26
; SB-KERNEL:*CURRENT-LEVEL-IN-PRINT*))
;
; caught STYLE-WARNING:
; (in macroexpansion of (DEFMETHOD PRINT-OBJECT # ...))
; (hint: For more precise location, try *BREAK-ON-SIGNALS*.)
; can't find type for presumed class TERMINFO in
; SB-PCL::PARAMETER-SPECIALIZER-DECLARATION-IN-DEFMETHOD.
; compiling (DEFUN %CAPABILITY ...)
; compiling (DECLAIM (INLINE CAPABILITY))
; compiling (DEFUN CAPABILITY ...)
; compiling (DEFINE-COMPILER-MACRO CAPABILITY ...)
; compiling (DEFMACRO DEFCAP ...)
; compiling (DEFCAP AUTO-LEFT-MARGIN ...)
; compiling (DEFCAP AUTO-RIGHT-MARGIN ...)
; compiling (DEFCAP NO-ESC-CTLC ...)
; compiling (DEFCAP CEOL-STANDOUT-GLITCH ...)
; compiling (DEFCAP EAT-NEWLINE-GLITCH ...)
; compiling (DEFCAP ERASE-OVERSTRIKE ...)
; compiling (DEFCAP GENERIC-TYPE ...)
; compiling (DEFCAP HARD-COPY ...)
; compiling (DEFCAP HAS-META-KEY ...)
; compiling (DEFCAP HAS-STATUS-LINE ...)
; compiling (DEFCAP INSERT-NULL-GLITCH ...)
; compiling (DEFCAP MEMORY-ABOVE ...)
; compiling (DEFCAP MEMORY-BELOW ...)
; compiling (DEFCAP MOVE-INSERT-MODE ...)
; compiling (DEFCAP MOVE-STANDOUT-MODE ...)
; compiling (DEFCAP OVER-STRIKE ...)
; compiling (DEFCAP STATUS-LINE-ESC-OK ...)
; compiling (DEFCAP DEST-TABS-MAGIC-SMSO ...)
; compiling (DEFCAP TILDE-GLITCH ...)
; compiling (DEFCAP TRANSPARENT-UNDERLINE ...)
; compiling (DEFCAP XON-XOFF ...)
; compiling (DEFCAP NEEDS-XON-XOFF ...)
; compiling (DEFCAP PRTR-SILENT ...)
; compiling (DEFCAP HARD-CURSOR ...)
; compiling (DEFCAP NON-REV-RMCUP ...)
; compiling (DEFCAP NO-PAD-CHAR ...)
; compiling (DEFCAP NON-DEST-SCROLL-REGION ...)
; compiling (DEFCAP CAN-CHANGE ...)
; compiling (DEFCAP BACK-COLOR-ERASE ...)
; compiling (DEFCAP HUE-LIGHTNESS-SATURATION ...)
; compiling (DEFCAP COL-ADDR-GLITCH ...)
; compiling (DEFCAP CR-CANCELS-MICRO-MODE ...)
; compiling (DEFCAP HAS-PRINT-WHEEL ...)
; compiling (DEFCAP ROW-ADDR-GLITCH ...)
; compiling (DEFCAP SEMI-AUTO-RIGHT-MARGIN ...)
; compiling (DEFCAP CPI-CHANGES-RES ...)
; compiling (DEFCAP LPI-CHANGES-RES ...)
; compiling (DEFCAP COLUMNS ...)
; compiling (DEFCAP INIT-TABS ...)
; compiling (DEFCAP LINES ...)
; compiling (DEFCAP LINES-OF-MEMORY ...)
; compiling (DEFCAP MAGIC-COOKIE-GLITCH ...)
; compiling (DEFCAP PADDING-BAUD-RATE ...)
; compiling (DEFCAP VIRTUAL-TERMINAL ...)
; compiling (DEFCAP WIDTH-STATUS-LINE ...)
; compiling (DEFCAP NUM-LABELS ...)
; compiling (DEFCAP LABEL-HEIGHT ...)
; compiling (DEFCAP LABEL-WIDTH ...)
; compiling (DEFCAP MAX-ATTRIBUTES ...)
; compiling (DEFCAP MAXIMUM-WINDOWS ...)
; compiling (DEFCAP MAX-COLORS ...)
; compiling (DEFCAP MAX-PAIRS ...)
; compiling (DEFCAP NO-COLOR-VIDEO ...)
; compiling (DEFCAP BUFFER-CAPACITY ...)
; compiling (DEFCAP DOT-VERT-SPACING ...)
; compiling (DEFCAP DOT-HORZ-SPACING ...)
; compiling (DEFCAP MAX-MICRO-ADDRESS ...)
; compiling (DEFCAP MAX-MICRO-JUMP ...)
; compiling (DEFCAP MICRO-COL-SIZE ...)
; compiling (DEFCAP MICRO-LINE-SIZE ...)
; compiling (DEFCAP NUMBER-OF-PINS ...)
; compiling (DEFCAP OUTPUT-RES-CHAR ...)
; compiling (DEFCAP OUTPUT-RES-LINE ...)
; compiling (DEFCAP OUTPUT-RES-HORZ-INCH ...)
; compiling (DEFCAP OUTPUT-RES-VERT-INCH ...)
; compiling (DEFCAP PRINT-RATE ...)
; compiling (DEFCAP WIDE-CHAR-SIZE ...)
; compiling (DEFCAP BUTTONS ...)
; compiling (DEFCAP BIT-IMAGE-ENTWINING ...)
; compiling (DEFCAP BIT-IMAGE-TYPE ...)
; compiling (DEFCAP BACK-TAB ...)
; compiling (DEFCAP BELL ...)
; compiling (DEFCAP CARRIAGE-RETURN ...)
; compiling (DEFCAP CHANGE-SCROLL-REGION ...)
; compiling (DEFCAP CLEAR-ALL-TABS ...)
; compiling (DEFCAP CLEAR-SCREEN ...)
; compiling (DEFCAP CLR-EOL ...)
; compiling (DEFCAP CLR-EOS ...)
; compiling (DEFCAP COLUMN-ADDRESS ...)
; compiling (DEFCAP COMMAND-CHARACTER ...)
; compiling (DEFCAP CURSOR-ADDRESS ...)
; compiling (DEFCAP CURSOR-DOWN ...)
; compiling (DEFCAP CURSOR-HOME ...)
; compiling (DEFCAP CURSOR-INVISIBLE ...)
; compiling (DEFCAP CURSOR-LEFT ...)
; compiling (DEFCAP CURSOR-MEM-ADDRESS ...)
; compiling (DEFCAP CURSOR-NORMAL ...)
; compiling (DEFCAP CURSOR-RIGHT ...)
; compiling (DEFCAP CURSOR-TO-LL ...)
; compiling (DEFCAP CURSOR-UP ...)
; compiling (DEFCAP CURSOR-VISIBLE ...)
; compiling (DEFCAP DELETE-CHARACTER ...)
; compiling (DEFCAP DELETE-LINE ...)
; compiling (DEFCAP DIS-STATUS-LINE ...)
; compiling (DEFCAP DOWN-HALF-LINE ...)
; compiling (DEFCAP ENTER-ALT-CHARSET-MODE ...)
; compiling (DEFCAP ENTER-BLINK-MODE ...)
; compiling (DEFCAP ENTER-BOLD-MODE ...)
; compiling (DEFCAP ENTER-CA-MODE ...)
; compiling (DEFCAP ENTER-DELETE-MODE ...)
; compiling (DEFCAP ENTER-DIM-MODE ...)
; compiling (DEFCAP ENTER-INSERT-MODE ...)
; compiling (DEFCAP ENTER-SECURE-MODE ...)
; compiling (DEFCAP ENTER-PROTECTED-MODE ...)
; compiling (DEFCAP ENTER-REVERSE-MODE ...)
; compiling (DEFCAP ENTER-STANDOUT-MODE ...)
; compiling (DEFCAP ENTER-UNDERLINE-MODE ...)
; compiling (DEFCAP ERASE-CHARS ...)
; compiling (DEFCAP EXIT-ALT-CHARSET-MODE ...)
; compiling (DEFCAP EXIT-ATTRIBUTE-MODE ...)
; compiling (DEFCAP EXIT-CA-MODE ...)
; compiling (DEFCAP EXIT-DELETE-MODE ...)
; compiling (DEFCAP EXIT-INSERT-MODE ...)
; compiling (DEFCAP EXIT-STANDOUT-MODE ...)
; compiling (DEFCAP EXIT-UNDERLINE-MODE ...)
; compiling (DEFCAP FLASH-SCREEN ...)
; compiling (DEFCAP FORM-FEED ...)
; compiling (DEFCAP FROM-STATUS-LINE ...)
; compiling (DEFCAP INIT-1STRING ...)
; compiling (DEFCAP INIT-2STRING ...)
; compiling (DEFCAP INIT-3STRING ...)
; compiling (DEFCAP INIT-FILE ...)
; compiling (DEFCAP INSERT-CHARACTER ...)
; compiling (DEFCAP INSERT-LINE ...)
; compiling (DEFCAP INSERT-PADDING ...)
; compiling (DEFCAP KEY-BACKSPACE ...)
; compiling (DEFCAP KEY-CATAB ...)
; compiling (DEFCAP KEY-CLEAR ...)
; compiling (DEFCAP KEY-CTAB ...)
; compiling (DEFCAP KEY-DC ...)
; compiling (DEFCAP KEY-DL ...)
; compiling (DEFCAP KEY-DOWN ...)
; compiling (DEFCAP KEY-EIC ...)
; compiling (DEFCAP KEY-EOL ...)
; compiling (DEFCAP KEY-EOS ...)
; compiling (DEFCAP KEY-F0 ...)
; compiling (DEFCAP KEY-F1 ...)
; compiling (DEFCAP KEY-F10 ...)
; compiling (DEFCAP KEY-F2 ...)
; compiling (DEFCAP KEY-F3 ...)
; compiling (DEFCAP KEY-F4 ...)
; compiling (DEFCAP KEY-F5 ...)
; compiling (DEFCAP KEY-F6 ...)
; compiling (DEFCAP KEY-F7 ...)
; compiling (DEFCAP KEY-F8 ...)
; compiling (DEFCAP KEY-F9 ...)
; compiling (DEFCAP KEY-HOME ...)
; compiling (DEFCAP KEY-IC ...)
; compiling (DEFCAP KEY-IL ...)
; compiling (DEFCAP KEY-LEFT ...)
; compiling (DEFCAP KEY-LL ...)
; compiling (DEFCAP KEY-NPAGE ...)
; compiling (DEFCAP KEY-PPAGE ...)
; compiling (DEFCAP KEY-RIGHT ...)
; compiling (DEFCAP KEY-SF ...)
; compiling (DEFCAP KEY-SR ...)
; compiling (DEFCAP KEY-STAB ...)
; compiling (DEFCAP KEY-UP ...)
; compiling (DEFCAP KEYPAD-LOCAL ...)
; compiling (DEFCAP KEYPAD-XMIT ...)
; compiling (DEFCAP LAB-F0 ...)
; compiling (DEFCAP LAB-F1 ...)
; compiling (DEFCAP LAB-F10 ...)
; compiling (DEFCAP LAB-F2 ...)
; compiling (DEFCAP LAB-F3 ...)
; compiling (DEFCAP LAB-F4 ...)
; compiling (DEFCAP LAB-F5 ...)
; compiling (DEFCAP LAB-F6 ...)
; compiling (DEFCAP LAB-F7 ...)
; compiling (DEFCAP LAB-F8 ...)
; compiling (DEFCAP LAB-F9 ...)
; compiling (DEFCAP META-OFF ...)
; compiling (DEFCAP META-ON ...)
; compiling (DEFCAP NEWLINE ...)
; compiling (DEFCAP PAD-CHAR ...)
; compiling (DEFCAP PARM-DCH ...)
; compiling (DEFCAP PARM-DELETE-LINE ...)
; compiling (DEFCAP PARM-DOWN-CURSOR ...)
; compiling (DEFCAP PARM-ICH ...)
; compiling (DEFCAP PARM-INDEX ...)
; compiling (DEFCAP PARM-INSERT-LINE ...)
; compiling (DEFCAP PARM-LEFT-CURSOR ...)
; compiling (DEFCAP PARM-RIGHT-CURSOR ...)
; compiling (DEFCAP PARM-RINDEX ...)
; compiling (DEFCAP PARM-UP-CURSOR ...)
; compiling (DEFCAP PKEY-KEY ...)
; compiling (DEFCAP PKEY-LOCAL ...)
; compiling (DEFCAP PKEY-XMIT ...)
; compiling (DEFCAP PRINT-SCREEN ...)
; compiling (DEFCAP PRTR-OFF ...)
; compiling (DEFCAP PRTR-ON ...)
; compiling (DEFCAP REPEAT-CHAR ...)
; compiling (DEFCAP RESET-1STRING ...)
; compiling (DEFCAP RESET-2STRING ...)
; compiling (DEFCAP RESET-3STRING ...)
; compiling (DEFCAP RESET-FILE ...)
; compiling (DEFCAP RESTORE-CURSOR ...)
; compiling (DEFCAP ROW-ADDRESS ...)
; compiling (DEFCAP SAVE-CURSOR ...)
; compiling (DEFCAP SCROLL-FORWARD ...)
; compiling (DEFCAP SCROLL-REVERSE ...)
; compiling (DEFCAP SET-ATTRIBUTES ...)
; compiling (DEFCAP SET-TAB ...)
; compiling (DEFCAP SET-WINDOW ...)
; compiling (DEFCAP TAB ...)
; compiling (DEFCAP TO-STATUS-LINE ...)
; compiling (DEFCAP UNDERLINE-CHAR ...)
; compiling (DEFCAP UP-HALF-LINE ...)
; compiling (DEFCAP INIT-PROG ...)
; compiling (DEFCAP KEY-A1 ...)
; compiling (DEFCAP KEY-A3 ...)
; compiling (DEFCAP KEY-B2 ...)
; compiling (DEFCAP KEY-C1 ...)
; compiling (DEFCAP KEY-C3 ...)
; compiling (DEFCAP PRTR-NON ...)
; compiling (DEFCAP CHAR-PADDING ...)
; compiling (DEFCAP ACS-CHARS ...)
; compiling (DEFCAP PLAB-NORM ...)
; compiling (DEFCAP KEY-BTAB ...)
; compiling (DEFCAP ENTER-XON-MODE ...)
; compiling (DEFCAP EXIT-XON-MODE ...)
; compiling (DEFCAP ENTER-AM-MODE ...)
; compiling (DEFCAP EXIT-AM-MODE ...)
; compiling (DEFCAP XON-CHARACTER ...)
; compiling (DEFCAP XOFF-CHARACTER ...)
; compiling (DEFCAP ENA-ACS ...)
; compiling (DEFCAP LABEL-ON ...)
; compiling (DEFCAP LABEL-OFF ...)
; compiling (DEFCAP KEY-BEG ...)
; compiling (DEFCAP KEY-CANCEL ...)
; compiling (DEFCAP KEY-CLOSE ...)
; compiling (DEFCAP KEY-COMMAND ...)
; compiling (DEFCAP KEY-COPY ...)
; compiling (DEFCAP KEY-CREATE ...)
; compiling (DEFCAP KEY-END ...)
; compiling (DEFCAP KEY-ENTER ...)
; compiling (DEFCAP KEY-EXIT ...)
; compiling (DEFCAP KEY-FIND ...)
; compiling (DEFCAP KEY-HELP ...)
; compiling (DEFCAP KEY-MARK ...)
; compiling (DEFCAP KEY-MESSAGE ...)
; compiling (DEFCAP KEY-MOVE ...)
; compiling (DEFCAP KEY-NEXT ...)
; compiling (DEFCAP KEY-OPEN ...)
; compiling (DEFCAP KEY-OPTIONS ...)
; compiling (DEFCAP KEY-PREVIOUS ...)
; compiling (DEFCAP KEY-PRINT ...)
; compiling (DEFCAP KEY-REDO ...)
; compiling (DEFCAP KEY-REFERENCE ...)
; compiling (DEFCAP KEY-REFRESH ...)
; compiling (DEFCAP KEY-REPLACE ...)
; compiling (DEFCAP KEY-RESTART ...)
; compiling (DEFCAP KEY-RESUME ...)
; compiling (DEFCAP KEY-SAVE ...)
; compiling (DEFCAP KEY-SUSPEND ...)
; compiling (DEFCAP KEY-UNDO ...)
; compiling (DEFCAP KEY-SBEG ...)
; compiling (DEFCAP KEY-SCANCEL ...)
; compiling (DEFCAP KEY-SCOMMAND ...)
; compiling (DEFCAP KEY-SCOPY ...)
; compiling (DEFCAP KEY-SCREATE ...)
; compiling (DEFCAP KEY-SDC ...)
; compiling (DEFCAP KEY-SDL ...)
; compiling (DEFCAP KEY-SELECT ...)
; compiling (DEFCAP KEY-SEND ...)
; compiling (DEFCAP KEY-SEOL ...)
; compiling (DEFCAP KEY-SEXIT ...)
; compiling (DEFCAP KEY-SFIND ...)
; compiling (DEFCAP KEY-SHELP ...)
; compiling (DEFCAP KEY-SHOME ...)
; compiling (DEFCAP KEY-SIC ...)
; compiling (DEFCAP KEY-SLEFT ...)
; compiling (DEFCAP KEY-SMESSAGE ...)
; compiling (DEFCAP KEY-SMOVE ...)
; compiling (DEFCAP KEY-SNEXT ...)
; compiling (DEFCAP KEY-SOPTIONS ...)
; compiling (DEFCAP KEY-SPREVIOUS ...)
; compiling (DEFCAP KEY-SPRINT ...)
; compiling (DEFCAP KEY-SREDO ...)
; compiling (DEFCAP KEY-SREPLACE ...)
; compiling (DEFCAP KEY-SRIGHT ...)
; compiling (DEFCAP KEY-SRSUME ...)
; compiling (DEFCAP KEY-SSAVE ...)
; compiling (DEFCAP KEY-SSUSPEND ...)
; compiling (DEFCAP KEY-SUNDO ...)
; compiling (DEFCAP REQ-FOR-INPUT ...)
; compiling (DEFCAP KEY-F11 ...)
; compiling (DEFCAP KEY-F12 ...)
; compiling (DEFCAP KEY-F13 ...)
; compiling (DEFCAP KEY-F14 ...)
; compiling (DEFCAP KEY-F15 ...)
; compiling (DEFCAP KEY-F16 ...)
; compiling (DEFCAP KEY-F17 ...)
; compiling (DEFCAP KEY-F18 ...)
; compiling (DEFCAP KEY-F19 ...)
; compiling (DEFCAP KEY-F20 ...)
; compiling (DEFCAP KEY-F21 ...)
; compiling (DEFCAP KEY-F22 ...)
; compiling (DEFCAP KEY-F23 ...)
; compiling (DEFCAP KEY-F24 ...)
; compiling (DEFCAP KEY-F25 ...)
; compiling (DEFCAP KEY-F26 ...)
; compiling (DEFCAP KEY-F27 ...)
; compiling (DEFCAP KEY-F28 ...)
; compiling (DEFCAP KEY-F29 ...)
; compiling (DEFCAP KEY-F30 ...)
; compiling (DEFCAP KEY-F31 ...)
; compiling (DEFCAP KEY-F32 ...)
; compiling (DEFCAP KEY-F33 ...)
; compiling (DEFCAP KEY-F34 ...)
; compiling (DEFCAP KEY-F35 ...)
; compiling (DEFCAP KEY-F36 ...)
; compiling (DEFCAP KEY-F37 ...)
; compiling (DEFCAP KEY-F38 ...)
; compiling (DEFCAP KEY-F39 ...)
; compiling (DEFCAP KEY-F40 ...)
; compiling (DEFCAP KEY-F41 ...)
; compiling (DEFCAP KEY-F42 ...)
; compiling (DEFCAP KEY-F43 ...)
; compiling (DEFCAP KEY-F44 ...)
; compiling (DEFCAP KEY-F45 ...)
; compiling (DEFCAP KEY-F46 ...)
; compiling (DEFCAP KEY-F47 ...)
; compiling (DEFCAP KEY-F48 ...)
; compiling (DEFCAP KEY-F49 ...)
; compiling (DEFCAP KEY-F50 ...)
; compiling (DEFCAP KEY-F51 ...)
; compiling (DEFCAP KEY-F52 ...)
; compiling (DEFCAP KEY-F53 ...)
; compiling (DEFCAP KEY-F54 ...)
; compiling (DEFCAP KEY-F55 ...)
; compiling (DEFCAP KEY-F56 ...)
; compiling (DEFCAP KEY-F57 ...)
; compiling (DEFCAP KEY-F58 ...)
; compiling (DEFCAP KEY-F59 ...)
; compiling (DEFCAP KEY-F60 ...)
; compiling (DEFCAP KEY-F61 ...)
; compiling (DEFCAP KEY-F62 ...)
; compiling (DEFCAP KEY-F63 ...)
; compiling (DEFCAP CLR-BOL ...)
; compiling (DEFCAP CLEAR-MARGINS ...)
; compiling (DEFCAP SET-LEFT-MARGIN ...)
; compiling (DEFCAP SET-RIGHT-MARGIN ...)
; compiling (DEFCAP LABEL-FORMAT ...)
; compiling (DEFCAP SET-CLOCK ...)
; compiling (DEFCAP DISPLAY-CLOCK ...)
; compiling (DEFCAP REMOVE-CLOCK ...)
; compiling (DEFCAP CREATE-WINDOW ...)
; compiling (DEFCAP GOTO-WINDOW ...)
; compiling (DEFCAP HANGUP ...)
; compiling (DEFCAP DIAL-PHONE ...)
; compiling (DEFCAP QUICK-DIAL ...)
; compiling (DEFCAP TONE ...)
; compiling (DEFCAP PULSE ...)
; compiling (DEFCAP FLASH-HOOK ...)
; compiling (DEFCAP FIXED-PAUSE ...)
; compiling (DEFCAP WAIT-TONE ...)
; compiling (DEFCAP USER0 ...)
; compiling (DEFCAP USER1 ...)
; compiling (DEFCAP USER2 ...)
; compiling (DEFCAP USER3 ...)
; compiling (DEFCAP USER4 ...)
; compiling (DEFCAP USER5 ...)
; compiling (DEFCAP USER6 ...)
; compiling (DEFCAP USER7 ...)
; compiling (DEFCAP USER8 ...)
; compiling (DEFCAP USER9 ...)
; compiling (DEFCAP ORIG-PAIR ...)
; compiling (DEFCAP ORIG-COLORS ...)
; compiling (DEFCAP INITIALIZE-COLOR ...)
; compiling (DEFCAP INITIALIZE-PAIR ...)
; compiling (DEFCAP SET-COLOR-PAIR ...)
; compiling (DEFCAP SET-FOREGROUND ...)
; compiling (DEFCAP SET-BACKGROUND ...)
; compiling (DEFCAP CHANGE-CHAR-PITCH ...)
; compiling (DEFCAP CHANGE-LINE-PITCH ...)
; compiling (DEFCAP CHANGE-RES-HORZ ...)
; compiling (DEFCAP CHANGE-RES-VERT ...)
; compiling (DEFCAP DEFINE-CHAR ...)
; compiling (DEFCAP ENTER-DOUBLEWIDE-MODE ...)
; compiling (DEFCAP ENTER-DRAFT-QUALITY ...)
; compiling (DEFCAP ENTER-ITALICS-MODE ...)
; compiling (DEFCAP ENTER-LEFTWARD-MODE ...)
; compiling (DEFCAP ENTER-MICRO-MODE ...)
; compiling (DEFCAP ENTER-NEAR-LETTER-QUALITY ...)
; compiling (DEFCAP ENTER-NORMAL-QUALITY ...)
; compiling (DEFCAP ENTER-SHADOW-MODE ...)
; compiling (DEFCAP ENTER-SUBSCRIPT-MODE ...)
; compiling (DEFCAP ENTER-SUPERSCRIPT-MODE ...)
; compiling (DEFCAP ENTER-UPWARD-MODE ...)
; compiling (DEFCAP EXIT-DOUBLEWIDE-MODE ...)
; compiling (DEFCAP EXIT-ITALICS-MODE ...)
; compiling (DEFCAP EXIT-LEFTWARD-MODE ...)
; compiling (DEFCAP EXIT-MICRO-MODE ...)
; compiling (DEFCAP EXIT-SHADOW-MODE ...)
; compiling (DEFCAP EXIT-SUBSCRIPT-MODE ...)
; compiling (DEFCAP EXIT-SUPERSCRIPT-MODE ...)
; compiling (DEFCAP EXIT-UPWARD-MODE ...)
; compiling (DEFCAP MICRO-COLUMN-ADDRESS ...)
; compiling (DEFCAP MICRO-DOWN ...)
; compiling (DEFCAP MICRO-LEFT ...)
; compiling (DEFCAP MICRO-RIGHT ...)
; compiling (DEFCAP MICRO-ROW-ADDRESS ...)
; compiling (DEFCAP MICRO-UP ...)
; compiling (DEFCAP ORDER-OF-PINS ...)
; compiling (DEFCAP PARM-DOWN-MICRO ...)
; compiling (DEFCAP PARM-LEFT-MICRO ...)
; compiling (DEFCAP PARM-RIGHT-MICRO ...)
; compiling (DEFCAP PARM-UP-MICRO ...)
; compiling (DEFCAP SELECT-CHAR-SET ...)
; compiling (DEFCAP SET-BOTTOM-MARGIN ...)
; compiling (DEFCAP SET-BOTTOM-MARGIN-PARM ...)
; compiling (DEFCAP SET-LEFT-MARGIN-PARM ...)
; compiling (DEFCAP SET-RIGHT-MARGIN-PARM ...)
; compiling (DEFCAP SET-TOP-MARGIN ...)
; compiling (DEFCAP SET-TOP-MARGIN-PARM ...)
; compiling (DEFCAP START-BIT-IMAGE ...)
; compiling (DEFCAP START-CHAR-SET-DEF ...)
; compiling (DEFCAP STOP-BIT-IMAGE ...)
; compiling (DEFCAP STOP-CHAR-SET-DEF ...)
; compiling (DEFCAP SUBSCRIPT-CHARACTERS ...)
; compiling (DEFCAP SUPERSCRIPT-CHARACTERS ...)
; compiling (DEFCAP THESE-CAUSE-CR ...)
; compiling (DEFCAP ZERO-MOTION ...)
; compiling (DEFCAP CHAR-SET-NAMES ...)
; compiling (DEFCAP KEY-MOUSE ...)
; compiling (DEFCAP MOUSE-INFO ...)
; compiling (DEFCAP REQ-MOUSE-POS ...)
; compiling (DEFCAP GET-MOUSE ...)
; compiling (DEFCAP SET-A-FOREGROUND ...)
; compiling (DEFCAP SET-A-BACKGROUND ...)
; compiling (DEFCAP PKEY-PLAB ...)
; compiling (DEFCAP DEVICE-TYPE ...)
; compiling (DEFCAP CODE-SET-INIT ...)
; compiling (DEFCAP SET0-DES-SEQ ...)
; compiling (DEFCAP SET1-DES-SEQ ...)
; compiling (DEFCAP SET2-DES-SEQ ...)
; compiling (DEFCAP SET3-DES-SEQ ...)
; compiling (DEFCAP SET-LR-MARGIN ...)
; compiling (DEFCAP SET-TB-MARGIN ...)
; compiling (DEFCAP BIT-IMAGE-REPEAT ...)
; compiling (DEFCAP BIT-IMAGE-NEWLINE ...)
; compiling (DEFCAP BIT-IMAGE-CARRIAGE-RETURN ...)
; compiling (DEFCAP COLOR-NAMES ...)
; compiling (DEFCAP DEFINE-BIT-IMAGE-REGION ...)
; compiling (DEFCAP END-BIT-IMAGE-REGION ...)
; compiling (DEFCAP SET-COLOR-BAND ...)
; compiling (DEFCAP SET-PAGE-LENGTH ...)
; compiling (DEFCAP DISPLAY-PC-CHAR ...)
; compiling (DEFCAP ENTER-PC-CHARSET-MODE ...)
; compiling (DEFCAP EXIT-PC-CHARSET-MODE ...)
; compiling (DEFCAP ENTER-SCANCODE-MODE ...)
; compiling (DEFCAP EXIT-SCANCODE-MODE ...)
; compiling (DEFCAP PC-TERM-OPTIONS ...)
; compiling (DEFCAP SCANCODE-ESCAPE ...)
; compiling (DEFCAP ALT-SCANCODE-ESC ...)
; compiling (DEFCAP ENTER-HORIZONTAL-HL-MODE ...)
; compiling (DEFCAP ENTER-LEFT-HL-MODE ...)
; compiling (DEFCAP ENTER-LOW-HL-MODE ...)
; compiling (DEFCAP ENTER-RIGHT-HL-MODE ...)
; compiling (DEFCAP ENTER-TOP-HL-MODE ...)
; compiling (DEFCAP ENTER-VERTICAL-HL-MODE ...)
; compiling (DEFCAP SET-A-ATTRIBUTES ...)
; compiling (DEFCAP SET-PGLEN-INCH ...)
; compiling (DEFCAP TERMCAP-INIT2 ...)
; compiling (DEFCAP TERMCAP-RESET ...)
; compiling (DEFCAP MAGIC-COOKIE-GLITCH-UL ...)
; compiling (DEFCAP BACKSPACES-WITH-BS ...)
; compiling (DEFCAP CRT-NO-SCROLLING ...)
; compiling (DEFCAP NO-CORRECTLY-WORKING-CR ...)
; compiling (DEFCAP CARRIAGE-RETURN-DELAY ...)
; compiling (DEFCAP NEW-LINE-DELAY ...)
; compiling (DEFCAP LINEFEED-IF-NOT-LF ...)
; compiling (DEFCAP BACKSPACE-IF-NOT-BS ...)
; compiling (DEFCAP GNU-HAS-META-KEY ...)
; compiling (DEFCAP LINEFEED-IS-NEWLINE ...)
; compiling (DEFCAP BACKSPACE-DELAY ...)
; compiling (DEFCAP HORIZONTAL-TAB-DELAY ...)
; compiling (DEFCAP NUMBER-OF-FUNCTION-KEYS ...)
; compiling (DEFCAP OTHER-NON-FUNCTION-KEYS ...)
; compiling (DEFCAP ARROW-KEY-MAP ...)
; compiling (DEFCAP HAS-HARDWARE-TABS ...)
; compiling (DEFCAP RETURN-DOES-CLR-EOL ...)
; compiling (DEFCAP ACS-ULCORNER ...)
; compiling (DEFCAP ACS-LLCORNER ...)
; compiling (DEFCAP ACS-URCORNER ...)
; compiling (DEFCAP ACS-LRCORNER ...)
; compiling (DEFCAP ACS-LTEE ...)
; compiling (DEFCAP ACS-RTEE ...)
; compiling (DEFCAP ACS-BTEE ...)
; compiling (DEFCAP ACS-TTEE ...)
; compiling (DEFCAP ACS-HLINE ...)
; compiling (DEFCAP ACS-VLINE ...)
; compiling (DEFCAP ACS-PLUS ...)
; compiling (DEFCAP MEMORY-LOCK ...)
; compiling (DEFCAP MEMORY-UNLOCK ...)
; compiling (DEFCAP BOX-CHARS-1 ...)
; compiling (DEFUN LOAD-TERMINFO ...)
; compiling (DEFUN TPARM ...)
; compiling (DEFUN STREAM-FILENO ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/terminfo.lisp
; in: DEFUN STREAM-FILENO
; (TERMINFO::STREAM-FILENO (ECHO-STREAM-OUTPUT-STREAM STREAM))
;
; note: deleting unreachable code
; compiling (DEFUN STREAM-BAUD-RATE ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/terminfo.lisp
; in: DEFUN STREAM-BAUD-RATE
; (DEFUN TERMINFO::STREAM-BAUD-RATE (STREAM))
; --> PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA TERMINFO::STREAM-BAUD-RATE
; (STREAM)
; (BLOCK TERMINFO::STREAM-BAUD-RATE))
;
; caught STYLE-WARNING:
; The variable STREAM is defined but never used.
; compiling (DEFUN TPUTS ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/terminfo.lisp
; in: DEFUN TPUTS
; (NULL TERMINFO::PB)
; --> IF
; ==>
; TERMINFO::PB
;
; note: deleting unreachable code
; (> TERMINFO::RATE TERMINFO::PB)
; ==>
; TERMINFO::RATE
;
; note: deleting unreachable code
; (TERMINFO::CAPABILITY :NO-PAD-CHAR TERMINFO::TERMINFO)
; --> LET
; ==>
; TERMINFO::TERMINFO
;
; note: deleting unreachable code
; (FINISH-OUTPUT STREAM)
; ==>
; STREAM
;
; note: deleting unreachable code
; (LET ((TERMINFO::TMP (TERMINFO::CAPABILITY :PAD-CHAR TERMINFO::TERMINFO)))
; (WHEN TERMINFO::TMP (SETF TERMINFO::PAD (SCHAR TERMINFO::TMP 0))))
;
; note: deleting unreachable code
; (SCHAR TERMINFO::TMP 0)
; --> AREF THE
; ==>
; TERMINFO::TMP
;
; note: deleting unreachable code
; (LET ((TERMINFO::TMP (TERMINFO::CAPABILITY :PAD-CHAR TERMINFO::TERMINFO)))
; (WHEN TERMINFO::TMP (SETF TERMINFO::PAD (SCHAR TERMINFO::TMP 0))))
;
; note: deleting unreachable code
;
; note: deleting unreachable code
; (* TERMINFO::RATE TIME)
; ==>
; TERMINFO::RATE
;
; note: deleting unreachable code
; (PRINC TERMINFO::PAD STREAM)
; ==>
; TERMINFO::PAD
;
; note: deleting unreachable code
; compiling (DEFUN SET-TERMINAL ...)
; compiling (PROVIDE :TERMINFO)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/terminfo_1.3/terminfo.fasl written
; compilation finished in 0:00:12
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {40008491}> on
#<CL-SOURCE-FILE "terminfo" {400084A1}>.
;
; compilation unit finished
; caught 3 STYLE-WARNING conditions
; printed 12 notes
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/packages.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling NIL
; compiling NIL
; compiling (DEFPACKAGE :LINEDIT ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/packages.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/utility-macros.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFMACRO AIF ...)
; compiling (DEFMACRO ACASE ...)
; compiling (DEFMACRO WITH-UNIQUE-NAMES ...)
; compiling (DEFMACRO AWHEN ...)
; compiling (DEFMACRO DO-INTERNAL-SYMBOLS ...)
; compiling (DEFMACRO INVARIANT ...)
; compiling (DEFMACRO ENSURE ...)
; compiling (DEFMACRO DBG-VALUES ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/utility-macros.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/utility-functions.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DECLAIM (TYPE SIMPLE-STRING ...))
; compiling (DEFPARAMETER *WORD-DELIMITERS* ...)
; compiling (DEFVAR *DEBUG* ...)
; compiling (DEFUN REQUIRED ...)
; compiling (DEFUN CONCAT ...)
; compiling (DEFUN WORD-DELIMITER-P ...)
; compiling (DEFUN MAKE-WHITESPACE ...)
; compiling (DEFUN WHITESPACEP ...)
; compiling (DEFUN AT-DELIMITER-P ...)
; compiling (DEFUN START-DEBUG ...)
; compiling (DEFUN END-DEBUG ...)
; compiling (DEFUN DBG ...)
; compiling (DEFUN MIN* ...)
; compiling (DEFUN META-ESCAPE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/utility-functions.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/matcher.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFUN QUOTED-P ...)
; compiling (DEFUN FIND-OPEN-QUOTE ...)
; compiling (DEFUN FIND-CLOSE-QUOTE ...)
; compiling (DEFUN AFTER-CLOSE-P ...)
; compiling (DEFUN AT-OPEN-P ...)
; compiling (DEFUN PAREN-COUNT-DELTA ...)
; compiling (DEFUN FIND-OPEN-PAREN ...)
; compiling (DEFUN FIND-CLOSE-PAREN ...)
; compiling (DEFUN DWIM-MATCH-PARENS ...)
; compiling (DEFUN DWIM-MARK-PARENS ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/matcher.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/backend.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFPARAMETER *DEFAULT-COLUMNS* ...)
; compiling (DEFPARAMETER *DEFAULT-LINES* ...)
; compiling (DEFCLASS BACKEND ...)
; compiling (DEFMACRO WITH-BACKEND ...)
; compiling (DEFMACRO WITHOUT-BACKEND ...)
; compiling (DEFGENERIC DISPLAY ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/backend.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/terminal-translations.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFVAR *TERMINAL-TRANSLATIONS* ...)
; compiling (DEFMACRO DEFTRANS ...)
; compiling (DEFTRANS "C-Space" ...)
; compiling (DEFTRANS "C-A" ...)
; compiling (DEFTRANS "C-B" ...)
; compiling (DEFTRANS "C-C" ...)
; compiling (DEFTRANS "C-D" ...)
; compiling (DEFTRANS "C-E" ...)
; compiling (DEFTRANS "C-F" ...)
; compiling (DEFTRANS "C-G" ...)
; compiling (DEFTRANS "C-Backspace" ...)
; compiling (DEFTRANS "Tab" ...)
; compiling (DEFTRANS "C-K" ...)
; compiling (DEFTRANS "C-L" ...)
; compiling (DEFTRANS "Return" ...)
; compiling (DEFTRANS "C-N" ...)
; compiling (DEFTRANS "C-O" ...)
; compiling (DEFTRANS "C-P" ...)
; compiling (DEFTRANS "C-Q" ...)
; compiling (DEFTRANS "C-R" ...)
; compiling (DEFTRANS "C-S" ...)
; compiling (DEFTRANS "C-T" ...)
; compiling (DEFTRANS "C-U" ...)
; compiling (DEFTRANS "C-V" ...)
; compiling (DEFTRANS "C-W" ...)
; compiling (DEFTRANS "C-X" ...)
; compiling (DEFTRANS "C-Y" ...)
; compiling (DEFTRANS "C-Z" ...)
; compiling (DEFTRANS "C--" ...)
; compiling (DEFTRANS "Backspace" ...)
; compiling (DEFTRANS "M-A" ...)
; compiling (DEFTRANS "M-B" ...)
; compiling (DEFTRANS "M-C" ...)
; compiling (DEFTRANS "M-D" ...)
; compiling (DEFTRANS "M-E" ...)
; compiling (DEFTRANS "M-F" ...)
; compiling (DEFTRANS "M-G" ...)
; compiling (DEFTRANS "M-H" ...)
; compiling (DEFTRANS "M-I" ...)
; compiling (DEFTRANS "M-J" ...)
; compiling (DEFTRANS "M-K" ...)
; compiling (DEFTRANS "M-L" ...)
; compiling (DEFTRANS "M-M" ...)
; compiling (DEFTRANS "M-N" ...)
; compiling (DEFTRANS "M-O" ...)
; compiling (DEFTRANS "M-P" ...)
; compiling (DEFTRANS "M-Q" ...)
; compiling (DEFTRANS "M-R" ...)
; compiling (DEFTRANS "M-S" ...)
; compiling (DEFTRANS "M-T" ...)
; compiling (DEFTRANS "M-U" ...)
; compiling (DEFTRANS "M-V" ...)
; compiling (DEFTRANS "M-W" ...)
; compiling (DEFTRANS "M-X" ...)
; compiling (DEFTRANS "M-Y" ...)
; compiling (DEFTRANS "M-Z" ...)
; compiling (DEFTRANS "M-0" ...)
; compiling (DEFTRANS "M-1" ...)
; compiling (DEFTRANS "M-2" ...)
; compiling (DEFTRANS "M-3" ...)
; compiling (DEFTRANS "M-4" ...)
; compiling (DEFTRANS "M-5" ...)
; compiling (DEFTRANS "M-6" ...)
; compiling (DEFTRANS "M-7" ...)
; compiling (DEFTRANS "M-8" ...)
; compiling (DEFTRANS "M-9" ...)
; compiling (DEFTRANS "C-M-f" ...)
; compiling (DEFTRANS "C-M-b" ...)
; compiling (DEFTRANS "C-M-k" ...)
; compiling (DEFTRANS "Up-arrow" ...)
; compiling (DEFTRANS "Down-arrow" ...)
; compiling (DEFTRANS "Right-arrow" ...)
; compiling (DEFTRANS "Left-arrow" ...)
; compiling (DEFTRANS "Insert" ...)
; compiling (DEFTRANS "Delete" ...)
; compiling (DEFTRANS "C-Delete" ...)
; compiling (DEFTRANS "Page-up" ...)
; compiling (DEFTRANS "Page-down" ...)
; compiling (DEFTRANS "Home" ...)
; compiling (DEFTRANS "End" ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/terminal-translations.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/terminal.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFCLASS TERMINAL ...)
; compiling (UFFI:DEF-FUNCTION ("linedit_terminal_columns" C-TERMINAL-COLUMNS) ...)
; compiling (DEFMETHOD BACKEND-COLUMNS ...)
; compiling (UFFI:DEF-FUNCTION ("linedit_terminal_lines" C-TERMINAL-LINES) ...)
; compiling (DEFMETHOD BACKEND-LINES ...)
; compiling (UFFI:DEF-FUNCTION ("linedit_terminal_init" C-TERMINAL-INIT) ...)
; compiling (DEFMETHOD BACKEND-INIT ...)
; compiling (UFFI:DEF-FUNCTION ("linedit_terminal_close" C-TERMINAL-CLOSE) ...)
; compiling (DEFMETHOD BACKEND-CLOSE ...)
; compiling (DEFMETHOD READ-CHORD ...)
; compiling (DEFMETHOD BEEP ...)
; compiling (DEFMETHOD PAGE ...)
; compiling (DEFMETHOD PRINT-IN-COLUMNS ...)
; compiling (DEFMETHOD PRINT-IN-LINES ...)
; compiling (DEFMETHOD NEWLINE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/terminal.fasl written
; compilation finished in 0:00:01
STYLE-WARNING: implicitly creating new generic function BACKEND-COLUMNS
STYLE-WARNING: implicitly creating new generic function BACKEND-LINES
STYLE-WARNING: implicitly creating new generic function BACKEND-INIT
STYLE-WARNING: implicitly creating new generic function BACKEND-CLOSE
STYLE-WARNING: implicitly creating new generic function READ-CHORD
STYLE-WARNING: implicitly creating new generic function BEEP
STYLE-WARNING: implicitly creating new generic function PAGE
STYLE-WARNING: implicitly creating new generic function PRINT-IN-COLUMNS
STYLE-WARNING: implicitly creating new generic function PRINT-IN-LINES
STYLE-WARNING: implicitly creating new generic function NEWLINE
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/smart-terminal.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFCLASS SMART-TERMINAL ...)
; compiling (DEFUN SET-COLUMN-ADDRESS ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/smart-terminal.lisp
; in: DEFUN SET-COLUMN-ADDRESS
; (TERMINFO:TPUTS TERMINFO:COLUMN-ADDRESS LINEDIT::N)
; ==>
; LINEDIT::N
;
; note: deleting unreachable code
; compiling (DEFUN SMART-TERMINAL-P ...)
; compiling (DEFMETHOD BACKEND-INIT ...)
; compiling (DEFUN FIND-ROW ...)
; compiling (DEFUN FIND-COL ...)
; compiling (DEFUN MOVE-IN-COLUMN ...)
; compiling (DEFUN FIX-WRAPAROUND ...)
; compiling (DEFUN PLACE-POINT ...)
; compiling (DEFMETHOD DISPLAY ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/smart-terminal.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/dumb-terminal.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFCLASS DUMB-TERMINAL ...)
; compiling (DEFMETHOD DISPLAY ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/dumb-terminal.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/rewindable.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DECLAIM (OPTIMIZE # ...))
; compiling (DEFCLASS REWINDABLE ...)
; compiling (DEFUN %REWIND-COUNT ...)
; compiling (DEFUN LAST-STATE ...)
; compiling (DEFUN SAVE-REWINDABLE-STATE ...)
; compiling (DEFMETHOD REWIND-STATE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/rewindable.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/line.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFCLASS LINE ...)
; compiling (DEFMETHOD (SETF GET-STRING) ...)
; compiling (DEFMETHOD (SETF GET-POINT) ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/line.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/buffer.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFCLASS BUFFER ...)
; compiling (DEFUN BUFFER-PUSH ...)
; compiling (DEFUN BUFFER-PREVIOUS ...)
; compiling (DEFUN BUFFER-PEEK ...)
; compiling (DEFUN BUFFER-NEXT ...)
; compiling (DEFUN BUFFER-CYCLE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/buffer.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/command-keys.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFVAR *COMMANDS* ...)
; compiling (DEFMACRO DEFCOMMAND ...)
; compiling (DEFCOMMAND "C-A" ...)
; compiling (DEFCOMMAND "C-B" ...)
; compiling (DEFCOMMAND "C-C" ...)
; compiling (DEFCOMMAND "C-D" ...)
; compiling (DEFCOMMAND "C-E" ...)
; compiling (DEFCOMMAND "C-F" ...)
; compiling (DEFCOMMAND "C-G")
; compiling (DEFCOMMAND "C-J")
; compiling (DEFCOMMAND "C-K" ...)
; compiling (DEFCOMMAND "C-L")
; compiling (DEFCOMMAND "C-N" ...)
; compiling (DEFCOMMAND "C-O" ...)
; compiling (DEFCOMMAND "C-P" ...)
; compiling (DEFCOMMAND "C-Q")
; compiling (DEFCOMMAND "C-R")
; compiling (DEFCOMMAND "C-S")
; compiling (DEFCOMMAND "C-T")
; compiling (DEFCOMMAND "C-U" ...)
; compiling (DEFCOMMAND "C-V")
; compiling (DEFCOMMAND "C-W" ...)
; compiling (DEFCOMMAND "C-X")
; compiling (DEFCOMMAND "C-Y" ...)
; compiling (DEFCOMMAND "C-Z" ...)
; compiling (DEFCOMMAND "C--" ...)
; compiling (DEFCOMMAND "M-A" ...)
; compiling (DEFCOMMAND "M-B" ...)
; compiling (DEFCOMMAND "M-C")
; compiling (DEFCOMMAND "M-D" ...)
; compiling (DEFCOMMAND "M-E")
; compiling (DEFCOMMAND "M-F" ...)
; compiling (DEFCOMMAND "M-G")
; compiling (DEFCOMMAND "M-H" ...)
; compiling (DEFCOMMAND "M-I" ...)
; compiling (DEFCOMMAND "M-J")
; compiling (DEFCOMMAND "M-K")
; compiling (DEFCOMMAND "M-L")
; compiling (DEFCOMMAND "M-M")
; compiling (DEFCOMMAND "M-N")
; compiling (DEFCOMMAND "M-O")
; compiling (DEFCOMMAND "M-P")
; compiling (DEFCOMMAND "M-Q")
; compiling (DEFCOMMAND "M-R")
; compiling (DEFCOMMAND "M-S")
; compiling (DEFCOMMAND "M-T")
; compiling (DEFCOMMAND "M-U" ...)
; compiling (DEFCOMMAND "M-V")
; compiling (DEFCOMMAND "M-W" ...)
; compiling (DEFCOMMAND "M-X")
; compiling (DEFCOMMAND "M-Y" ...)
; compiling (DEFCOMMAND "M-Z")
; compiling (DEFCOMMAND "M-1")
; compiling (DEFCOMMAND "M-2")
; compiling (DEFCOMMAND "M-3")
; compiling (DEFCOMMAND "M-4")
; compiling (DEFCOMMAND "M-5")
; compiling (DEFCOMMAND "M-6")
; compiling (DEFCOMMAND "M-7")
; compiling (DEFCOMMAND "M-8")
; compiling (DEFCOMMAND "M-9")
; compiling (DEFCOMMAND "M-0")
; compiling (DEFCOMMAND "C-M-b" ...)
; compiling (DEFCOMMAND "C-M-f" ...)
; compiling (DEFCOMMAND "C-M-k" ...)
; compiling (DEFCOMMAND "C-Space" ...)
; compiling (DEFCOMMAND "C-Backspace" ...)
; compiling (DEFCOMMAND "Tab" ...)
; compiling (DEFCOMMAND "Backspace" ...)
; compiling (DEFCOMMAND "Return" ...)
; compiling (DEFCOMMAND "Up-arrow" ...)
; compiling (DEFCOMMAND "Down-arrow" ...)
; compiling (DEFCOMMAND "Right-arrow" ...)
; compiling (DEFCOMMAND "Left-arrow" ...)
; compiling (DEFCOMMAND "Insert" ...)
; compiling (DEFCOMMAND "Delete" ...)
; compiling (DEFCOMMAND "C-Delete")
; compiling (DEFCOMMAND "Page-up")
; compiling (DEFCOMMAND "Page-down")
; compiling (DEFCOMMAND "Home" ...)
; compiling (DEFCOMMAND "End" ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/command-keys.fasl written
; compilation finished in 0:00:00
STYLE-WARNING: implicitly creating new generic function REWIND-STATE
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/editor.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFVAR *VERSION* ...)
; compiling (DEFVAR *HISTORY* ...)
; compiling (DEFVAR *KILLRING* ...)
; compiling (DEFCLASS EDITOR ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/editor.lisp
; in: DEFMETHOD INITIALIZE-INSTANCE :AFTER (EDITOR)
; (DEFMETHOD INITIALIZE-INSTANCE
; :AFTER
; ((LINEDIT::EDITOR LINEDIT::EDITOR) &REST LINEDIT::INITARGS)
; (LINEDIT::SAVE-STATE LINEDIT::EDITOR))
; --> PROGN SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST*
; --> SB-INT:NAMED-LAMBDA FUNCTION MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-MACROS MACROLET
; --> SB-PCL::BIND-LEXICAL-METHOD-FUNCTIONS SB-PCL::CALL-NEXT-METHOD-BIND LET
; --> FLET SB-PCL::WITH-REBOUND-ORIGINAL-ARGS LET SB-PCL::BIND-ARGS
; ==>
; (LET* ((SB-PCL::.ARGS-TAIL. SB-PCL::.REST-ARG.)
; (LINEDIT::INITARGS SB-PCL::.ARGS-TAIL.)
; (SB-PCL::.DUMMY0.))
; (DECLARE (IGNORABLE SB-PCL::.ARGS-TAIL. SB-PCL::.DUMMY0.))
; (DECLARE (SB-PCL::%CLASS LINEDIT::EDITOR LINEDIT::EDITOR))
; (BLOCK INITIALIZE-INSTANCE (LINEDIT::SAVE-STATE LINEDIT::EDITOR)))
;
; caught STYLE-WARNING:
; The variable INITARGS is defined but never used.
; compiling (DEFCLASS SMART-EDITOR ...)
; compiling (DEFCLASS DUMB-EDITOR ...)
; compiling (LET (#) ...)
; compiling (DEFUN SAVE-STATE ...)
; compiling (DEFMETHOD REWIND-STATE ...)
; compiling (DEFVAR *DEBUG-INFO* ...)
; compiling (DEFUN REDRAW-LINE ...)
; compiling (DEFUN NEXT-CHORD ...)
; compiling (DEFUN GET-FINISHED-STRING ...)
; compiling (DEFMACRO WITH-EDITOR-POINT-AND-STRING ...)
; compiling (UFFI:DEF-FUNCTION ("linedit_interrupt" C-INTERRUPT) ...)
; compiling (DEFUN EDITOR-INTERRUPT ...)
; compiling (UFFI:DEF-FUNCTION ("linedit_stop" C-STOP) ...)
; compiling (DEFUN EDITOR-STOP ...)
; compiling (DEFUN EDITOR-WORD-START ...)
; compiling (DEFUN EDITOR-PREVIOUS-WORD-START ...)
; compiling (DEFUN EDITOR-WORD-END ...)
; compiling (DEFUN EDITOR-NEXT-WORD-END ...)
; compiling (DEFUN EDITOR-WORD ...)
; compiling (DEFUN EDITOR-SEXP-START ...)
; compiling (DEFUN EDITOR-SEXP-END ...)
; compiling (DEFUN EDITOR-COMPLETE ...)
; compiling (DEFUN REMEMBER-YANK ...)
; compiling (DEFUN FORGET-YANK ...)
; compiling (DEFUN TRY-YANK ...)
; compiling (DEFUN EDITOR-REPLACE-WORD ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/editor.lisp
; in: DEFUN EDITOR-REPLACE-WORD
; (LINEDIT::WITH-EDITOR-POINT-AND-STRING
; ((LINEDIT::POINT STRING) LINEDIT::EDITOR)
; (LET ((LINEDIT::START (LINEDIT::EDITOR-WORD-START LINEDIT::EDITOR))
; (LINEDIT::END (LINEDIT::EDITOR-WORD-END LINEDIT::EDITOR)))
; (SETF (LINEDIT::GET-STRING LINEDIT::EDITOR)
; (LINEDIT::CONCAT (SUBSEQ STRING 0 LINEDIT::START)
; LINEDIT::WORD
; (SUBSEQ STRING LINEDIT::END))
; (LINEDIT::GET-POINT LINEDIT::EDITOR)
; (+ LINEDIT::START (LENGTH LINEDIT::WORD)))))
; ==>
; (LET ((LINEDIT::POINT (LINEDIT::GET-POINT LINEDIT::EDITOR))
; (STRING (LINEDIT::GET-STRING LINEDIT::EDITOR)))
; (LET ((LINEDIT::START (LINEDIT::EDITOR-WORD-START LINEDIT::EDITOR))
; (LINEDIT::END (LINEDIT::EDITOR-WORD-END LINEDIT::EDITOR)))
; (SETF (LINEDIT::GET-STRING LINEDIT::EDITOR)
; (LINEDIT::CONCAT (SUBSEQ STRING 0 LINEDIT::START)
; LINEDIT::WORD
; (SUBSEQ STRING LINEDIT::END))
; (LINEDIT::GET-POINT LINEDIT::EDITOR)
; (+ LINEDIT::START (LENGTH LINEDIT::WORD)))))
;
; caught STYLE-WARNING:
; The variable POINT is defined but never used.
; compiling (DEFUN IN-QUOTED-STRING-P ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/editor.fasl written
; compilation finished in 0:00:01
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {100087F1}> on
#<CL-SOURCE-FILE "editor" {10008801}>.
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/main.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFUN LINEDIT ...)
; compiling (DEFUN FORMEDIT ...)
; compiling (DEFUN SEMICOLON-READER ...)
; compiling (DEFUN COLON-READER ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/main.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/complete.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFUN PATHNAME-DIRECTORY-PATHNAME ...)
; compiling (DEFUN UNDERLYING-DIRECTORY-P ...)
; compiling (DEFUN LOGICAL-PATHNAME-P ...)
; compiling (DEFUN LOGICAL-PATHNAME-COMPLETE ...)
; compiling (DEFUN TILDE-EXPAND-STRING ...)
; compiling (DEFUN DIRECTORY-COMPLETE ...)
; compiling (DEFUN LISP-COMPLETE ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/complete.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/command-functions.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (DEFUN ADD-CHAR ...)
; compiling (DEFUN DELETE-CHAR-BACKWARDS ...)
; compiling (DEFUN DELETE-CHAR-FORWARDS ...)
; compiling (DEFUN DELETE-CHAR-FORWARDS-OR-EOF ...)
; compiling (DEFUN DELETE-WORD-BACKWARDS ...)
; compiling (DEFUN FINISH-INPUT ...)
; compiling (FLET (#) ...)
; compiling (DEFUN MOVE-TO-BOL ...)
; compiling (DEFUN MOVE-TO-EOL ...)
; compiling (DEFUN MOVE-CHAR-RIGHT ...)
; compiling (DEFUN MOVE-CHAR-LEFT ...)
; compiling (DEFUN MOVE-WORD-BACKWARDS ...)
; compiling (DEFUN MOVE-WORD-FORWARDS ...)
; compiling (DEFUN UNDO ...)
; compiling (DEFUN HISTORY-PREVIOUS ...)
; compiling (DEFUN HISTORY-NEXT ...)
; compiling (DEFUN %YANK ...)
; compiling (DEFUN YANK ...)
; compiling (DEFUN YANK-CYCLE ...)
; compiling (DEFUN KILL-TO-EOL ...)
; compiling (DEFUN KILL-TO-BOL ...)
; compiling (DEFUN COPY-REGION ...)
; compiling (DEFUN CUT-REGION ...)
; compiling (DEFUN SET-MARK ...)
; compiling (DEFUN FORWARD-SEXP ...)
; compiling (DEFUN BACKWARD-SEXP ...)
; compiling (DEFUN KILL-SEXP ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/command-functions.lisp
; in: DEFUN KILL-SEXP
; (LINEDIT::WITH-EDITOR-POINT-AND-STRING
; ((LINEDIT::POINT STRING) LINEDIT::EDITOR)
; (LET ((LINEDIT::START (LINEDIT::EDITOR-SEXP-START LINEDIT::EDITOR))
; (LINEDIT::END (MIN # #)))
; (LINEDIT::BUFFER-PUSH (SUBSEQ STRING LINEDIT::START LINEDIT::END)
; (LINEDIT::EDITOR-KILLRING LINEDIT::EDITOR))
; (SETF (LINEDIT::GET-STRING LINEDIT::EDITOR)
; (LINEDIT::CONCAT (SUBSEQ STRING 0 LINEDIT::START)
; (SUBSEQ STRING LINEDIT::END))
; (LINEDIT::GET-POINT LINEDIT::EDITOR)
; LINEDIT::START)))
; ==>
; (LET ((LINEDIT::POINT (LINEDIT::GET-POINT LINEDIT::EDITOR))
; (STRING (LINEDIT::GET-STRING LINEDIT::EDITOR)))
; (LET ((LINEDIT::START (LINEDIT::EDITOR-SEXP-START LINEDIT::EDITOR))
; (LINEDIT::END (MIN # #)))
; (LINEDIT::BUFFER-PUSH (SUBSEQ STRING LINEDIT::START LINEDIT::END)
; (LINEDIT::EDITOR-KILLRING LINEDIT::EDITOR))
; (SETF (LINEDIT::GET-STRING LINEDIT::EDITOR)
; (LINEDIT::CONCAT (SUBSEQ STRING 0 LINEDIT::START)
; (SUBSEQ STRING LINEDIT::END))
; (LINEDIT::GET-POINT LINEDIT::EDITOR)
; LINEDIT::START)))
;
; caught STYLE-WARNING:
; The variable POINT is defined but never used.
; compiling (DEFUN CLOSE-ALL-SEXP ...)
; compiling (DEFUN INTERRUPT-LISP ...)
; compiling (DEFUN STOP-LISP ...)
; compiling (DEFUN HELP ...)
; compiling (DEFUN UNKNOWN-COMMAND ...)
; compiling (DEFUN COMPLETE ...)
; compiling (DEFUN APROPOS-WORD ...)
; compiling (DEFUN DESCRIBE-WORD ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/command-functions.fasl written
; compilation finished in 0:00:01
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {40006F69}> on
#<CL-SOURCE-FILE "command-functions" {40006F79}>.
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/sbcl-repl.lisp" (written 25 APR 2004 11:08:43 AM):
; compiling (IN-PACKAGE :LINEDIT)
; compiling (LET (PROMPT-FUN READ-FORM-FUN) ...)
; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/sbcl-repl.lisp
; in: DEFUN INSTALL-REPL
; (HANDLER-CASE
; (LINEDIT:FORMEDIT :PROMPT1
; LINEDIT::PROMPT
; :PROMPT2
; (MAKE-STRING (LENGTH LINEDIT::PROMPT)
; :INITIAL-ELEMENT
; #\ ))
; (END-OF-FILE (LINEDIT::E)
; (IF LINEDIT::EOF-QUITS
; (AND (FRESH-LINE) (LINEDIT::EOF-HANDLER))
; "#.''end-of-file")))
; --> BLOCK LET TAGBODY RETURN-FROM
; ==>
; (LET ((LINEDIT::E #:G15))
; (IF LINEDIT::EOF-QUITS
; (AND (FRESH-LINE) (LINEDIT::EOF-HANDLER))
; "#.''end-of-file"))
;
; caught STYLE-WARNING:
; The variable E is defined but never used.
; compiling (DEFUN EOF-HANDLER ...)
; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/linedit_0.15.12/sbcl-repl.fasl written
; compilation finished in 0:00:00
WARNING:
COMPILE-FILE warned while performing #<COMPILE-OP NIL {40006F69}> on
#<CL-SOURCE-FILE "sbcl-repl" {4011DAB9}>.
;
; compilation unit finished
; caught 4 STYLE-WARNING conditions
; printed 1 note
