racer

SBCL 1.4.12.120-6b7a9a7 / ASDF 3.3.1

lracer

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-core.lisp
; in: DEFUN READ-LINE-1
;     (RETURN-FROM RACER::READ-LINE-1 RACER::EOF-VALUE)
; ==>
;   RACER::EOF-VALUE
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ANNOTATION-CONCEPT-ASSERTIONS
;     (DEFUN ALL-ANNOTATION-CONCEPT-ASSERTIONS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ANNOTATION-CONCEPT-ASSERTIONS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (BLOCK ALL-ANNOTATION-CONCEPT-ASSERTIONS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ANNOTATION-ROLE-ASSERTIONS
;     (DEFUN ALL-ANNOTATION-ROLE-ASSERTIONS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ANNOTATION-ROLE-ASSERTIONS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (BLOCK ALL-ANNOTATION-ROLE-ASSERTIONS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ATOMIC-CONCEPTS
;     (DEFUN ALL-ATOMIC-CONCEPTS
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ATOMIC-CONCEPTS
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (BLOCK ALL-ATOMIC-CONCEPTS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ATTRIBUTE-ASSERTIONS
;     (DEFUN ALL-ATTRIBUTE-ASSERTIONS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             (RACER::INDIVIDUAL NIL RACER::INDIVIDUAL-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX RACER::INDIVIDUAL COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ATTRIBUTE-ASSERTIONS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;          (RACER::INDIVIDUAL NIL RACER::INDIVIDUAL-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX RACER::INDIVIDUAL COUNT))
;       (BLOCK ALL-ATTRIBUTE-ASSERTIONS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) (INDIVIDUAL NIL INDIVIDUAL-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ATTRIBUTES
;     (DEFUN ALL-ATTRIBUTES
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ATTRIBUTES
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (BLOCK ALL-ATTRIBUTES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-CONCEPT-ASSERTIONS
;     (DEFUN ALL-CONCEPT-ASSERTIONS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-CONCEPT-ASSERTIONS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (BLOCK ALL-CONCEPT-ASSERTIONS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-CONCEPT-ASSERTIONS-FOR-INDIVIDUAL
;     (DEFUN ALL-CONCEPT-ASSERTIONS-FOR-INDIVIDUAL
;            (RACER::INDIVIDUAL
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT RACER::INDIVIDUAL))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-CONCEPT-ASSERTIONS-FOR-INDIVIDUAL
;         (RACER::INDIVIDUAL &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;          &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT RACER::INDIVIDUAL))
;       (BLOCK ALL-CONCEPT-ASSERTIONS-FOR-INDIVIDUAL
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (INDIVIDUAL &OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-CONSTRAINTS
;     (DEFUN ALL-CONSTRAINTS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             (RACER::OBJECT-NAMES NIL RACER::OBJECT-NAMES-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX RACER::OBJECT-NAMES COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-CONSTRAINTS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;          (RACER::OBJECT-NAMES NIL RACER::OBJECT-NAMES-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX RACER::OBJECT-NAMES COUNT))
;       (BLOCK ALL-CONSTRAINTS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) (OBJECT-NAMES NIL OBJECT-NAMES-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-DIFFERENT-FROM-ASSERTIONS
;     (DEFUN ALL-DIFFERENT-FROM-ASSERTIONS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-DIFFERENT-FROM-ASSERTIONS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (BLOCK ALL-DIFFERENT-FROM-ASSERTIONS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-EQUIVALENT-CONCEPTS
;     (DEFUN ALL-EQUIVALENT-CONCEPTS
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-EQUIVALENT-CONCEPTS
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (BLOCK ALL-EQUIVALENT-CONCEPTS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-FEATURES
;     (DEFUN ALL-FEATURES
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-FEATURES
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (BLOCK ALL-FEATURES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-INDIVIDUALS
;     (DEFUN ALL-INDIVIDUALS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-INDIVIDUALS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (BLOCK ALL-INDIVIDUALS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ROLE-ASSERTIONS
;     (DEFUN ALL-ROLE-ASSERTIONS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ROLE-ASSERTIONS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (BLOCK ALL-ROLE-ASSERTIONS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-DOMAIN
;     (DEFUN ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-DOMAIN
;            (RACER::INDIVIDUAL
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT RACER::INDIVIDUAL))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-DOMAIN
;         (RACER::INDIVIDUAL &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;          &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT RACER::INDIVIDUAL))
;       (BLOCK ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-DOMAIN
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (INDIVIDUAL &OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-RANGE
;     (DEFUN ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-RANGE
;            (RACER::INDIVIDUAL
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT RACER::INDIVIDUAL))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-RANGE
;         (RACER::INDIVIDUAL &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;          &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT RACER::INDIVIDUAL))
;       (BLOCK ALL-ROLE-ASSERTIONS-FOR-INDIVIDUAL-IN-RANGE
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (INDIVIDUAL &OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-ROLES
;     (DEFUN ALL-ROLES
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P)
;             (RACER::TEST NIL RACER::TEST-SUPPLIED-P)
;             (RACER::INVERSE-TEST NIL RACER::INVERSE-TEST-SUPPLIED-P)
;             (DEFAULT NIL RACER::DEFAULT-SUPPLIED-P))
;       (DECLARE
;        (IGNORABLE RACER::TBOX COUNT RACER::TEST RACER::INVERSE-TEST DEFAULT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-ROLES
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P)
;          (RACER::TEST NIL RACER::TEST-SUPPLIED-P)
;          (RACER::INVERSE-TEST NIL RACER::INVERSE-TEST-SUPPLIED-P)
;          (DEFAULT NIL RACER::DEFAULT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE
;        (IGNORABLE RACER::TBOX COUNT RACER::TEST RACER::INVERSE-TEST DEFAULT))
;       (BLOCK ALL-ROLES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P) (TEST NIL TEST-SUPPLIED-P) (INVERSE-TEST NIL INVERSE-TEST-SUPPLIED-P) (DEFAULT NIL DEFAULT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-SAME-AS-ASSERTIONS
;     (DEFUN ALL-SAME-AS-ASSERTIONS
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-SAME-AS-ASSERTIONS
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::ABOX COUNT))
;       (BLOCK ALL-SAME-AS-ASSERTIONS
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN ALL-TRANSITIVE-ROLES
;     (DEFUN ALL-TRANSITIVE-ROLES
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA ALL-TRANSITIVE-ROLES
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (COUNT NIL RACER::COUNT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::TBOX COUNT))
;       (BLOCK ALL-TRANSITIVE-ROLES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (COUNT NIL COUNT-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN CHECK-TBOX-COHERENCE
;     (DEFUN CHECK-TBOX-COHERENCE
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (STREAM NIL RACER::STREAM-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::TBOX STREAM))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA CHECK-TBOX-COHERENCE
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (STREAM NIL RACER::STREAM-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::TBOX STREAM))
;       (BLOCK CHECK-TBOX-COHERENCE
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (STREAM NIL STREAM-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN DESCRIBE-ALL-QUERIES
;     (DEFUN DESCRIBE-ALL-QUERIES
;            (
;             &OPTIONAL (RACER::REWRITTEN-P NIL RACER::REWRITTEN-P-SUPPLIED-P)
;             &KEY (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             (RACER::TYPE-OF-SUBSTRATE NIL RACER::TYPE-OF-SUBSTRATE-SUPPLIED-P))
;       (DECLARE
;        (IGNORABLE RACER::REWRITTEN-P RACER::ABOX RACER::TYPE-OF-SUBSTRATE))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA DESCRIBE-ALL-QUERIES
;         (&OPTIONAL (RACER::REWRITTEN-P NIL RACER::REWRITTEN-P-SUPPLIED-P) &KEY
;          (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;          (RACER::TYPE-OF-SUBSTRATE NIL RACER::TYPE-OF-SUBSTRATE-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE
;        (IGNORABLE RACER::REWRITTEN-P RACER::ABOX RACER::TYPE-OF-SUBSTRATE))
;       (BLOCK DESCRIBE-ALL-QUERIES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (REWRITTEN-P NIL REWRITTEN-P-SUPPLIED-P) &KEY (ABOX NIL ABOX-SUPPLIED-P) (TYPE-OF-SUBSTRATE NIL TYPE-OF-SUBSTRATE-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN DESCRIBE-ALL-RULES
;     (DEFUN DESCRIBE-ALL-RULES
;            (
;             &OPTIONAL (RACER::REWRITTEN-P NIL RACER::REWRITTEN-P-SUPPLIED-P)
;             &KEY (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             (RACER::TYPE-OF-SUBSTRATE NIL RACER::TYPE-OF-SUBSTRATE-SUPPLIED-P))
;       (DECLARE
;        (IGNORABLE RACER::REWRITTEN-P RACER::ABOX RACER::TYPE-OF-SUBSTRATE))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA DESCRIBE-ALL-RULES
;         (&OPTIONAL (RACER::REWRITTEN-P NIL RACER::REWRITTEN-P-SUPPLIED-P) &KEY
;          (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;          (RACER::TYPE-OF-SUBSTRATE NIL RACER::TYPE-OF-SUBSTRATE-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE
;        (IGNORABLE RACER::REWRITTEN-P RACER::ABOX RACER::TYPE-OF-SUBSTRATE))
;       (BLOCK DESCRIBE-ALL-RULES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (REWRITTEN-P NIL REWRITTEN-P-SUPPLIED-P) &KEY (ABOX NIL ABOX-SUPPLIED-P) (TYPE-OF-SUBSTRATE NIL TYPE-OF-SUBSTRATE-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN GET-ABOX-GRAPH
;     (DEFUN GET-ABOX-GRAPH
;            (
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (RACER::DEPTH NIL RACER::DEPTH-SUPPLIED-P)
;             (RACER::NO-TRANSITIVES-P NIL RACER::NO-TRANSITIVES-P-SUPPLIED-P)
;             (RACER::NO-TOP-ROLE-P NIL RACER::NO-TOP-ROLE-P-SUPPLIED-P)
;             (RACER::BROWSING-MODE-P NIL RACER::BROWSING-MODE-P-SUPPLIED-P)
;             (RACER::TOLD-ONLY-P NIL RACER::TOLD-ONLY-P-SUPPLIED-P)
;             (RACER::ROOT-INDIVIDUALS NIL RACER::ROOT-INDIVIDUALS-SUPPLIED-P)
;             (RACER::SELECTED-INDIVIDUALS
;              NIL
;              RACER::SELECTED-INDIVIDUALS-SUPPLIED-P)
;             (RACER::ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P
;              NIL
;              RACER::ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P-SUPPLIED-P)
;             (RACER::FOR-ROLES NIL RACER::FOR-ROLES-SUPPLIED-P) ...)
;       (DECLARE
;        (IGNORABLE RACER::ABOX RACER::DEPTH RACER::NO-TRANSITIVES-P
;         RACER::NO-TOP-ROLE-P RACER::BROWSING-MODE-P RACER::TOLD-ONLY-P
;         RACER::ROOT-INDIVIDUALS RACER::SELECTED-INDIVIDUALS
;         RACER::ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P RACER::FOR-ROLES
;         RACER::FOR-DATATYPE-PROPERTIES ...))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA GET-ABOX-GRAPH
;         (&OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (RACER::DEPTH NIL RACER::DEPTH-SUPPLIED-P)
;          (RACER::NO-TRANSITIVES-P NIL RACER::NO-TRANSITIVES-P-SUPPLIED-P)
;          (RACER::NO-TOP-ROLE-P NIL RACER::NO-TOP-ROLE-P-SUPPLIED-P)
;          (RACER::BROWSING-MODE-P NIL RACER::BROWSING-MODE-P-SUPPLIED-P)
;          (RACER::TOLD-ONLY-P NIL RACER::TOLD-ONLY-P-SUPPLIED-P)
;          (RACER::ROOT-INDIVIDUALS NIL RACER::ROOT-INDIVIDUALS-SUPPLIED-P)
;          (RACER::SELECTED-INDIVIDUALS NIL
;           RACER::SELECTED-INDIVIDUALS-SUPPLIED-P)
;          (RACER::ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P NIL
;           RACER::ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P-SUPPLIED-P)
;          (RACER::FOR-ROLES NIL RACER::FOR-ROLES-SUPPLIED-P) ...)
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE
;        (IGNORABLE RACER::ABOX RACER::DEPTH RACER::NO-TRANSITIVES-P
;         RACER::NO-TOP-ROLE-P RACER::BROWSING-MODE-P RACER::TOLD-ONLY-P
;         RACER::ROOT-INDIVIDUALS RACER::SELECTED-INDIVIDUALS
;         RACER::ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P RACER::FOR-ROLES
;         RACER::FOR-DATATYPE-PROPERTIES ...))
;       (BLOCK GET-ABOX-GRAPH
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (DEPTH NIL DEPTH-SUPPLIED-P) (NO-TRANSITIVES-P NIL NO-TRANSITIVES-P-SUPPLIED-P) (NO-TOP-ROLE-P NIL NO-TOP-ROLE-P-SUPPLIED-P) (BROWSING-MODE-P NIL BROWSING-MODE-P-SUPPLIED-P) (TOLD-ONLY-P NIL TOLD-ONLY-P-SUPPLIED-P) (ROOT-INDIVIDUALS NIL ROOT-INDIVIDUALS-SUPPLIED-P) (SELECTED-INDIVIDUALS NIL SELECTED-INDIVIDUALS-SUPPLIED-P) (ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P NIL ONLY-SUCCESSORS-IN-SELECTED-INDIVIDUALS-P-SUPPLIED-P) (FOR-ROLES NIL FOR-ROLES-SUPPLIED-P) (FOR-DATATYPE-PROPERTIES NIL FOR-DATATYPE-PROPERTIES-SUPPLIED-P) (FOR-ANNOTATION-PROPERTIES NIL FOR-ANNOTATION-PROPERTIES-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN GET-CONCEPT-PROPERTIES
;     (DEFUN GET-CONCEPT-PROPERTIES
;            (RACER::CONCEPT
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (RACER::FOR-ROLES NIL RACER::FOR-ROLES-SUPPLIED-P)
;             (RACER::QUALIFICATIONS NIL RACER::QUALIFICATIONS-SUPPLIED-P))
;       (DECLARE
;        (IGNORABLE RACER::TBOX RACER::FOR-ROLES RACER::QUALIFICATIONS
;         RACER::CONCEPT))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA GET-CONCEPT-PROPERTIES
;         (RACER::CONCEPT &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (RACER::FOR-ROLES NIL RACER::FOR-ROLES-SUPPLIED-P)
;          (RACER::QUALIFICATIONS NIL RACER::QUALIFICATIONS-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE
;        (IGNORABLE RACER::TBOX RACER::FOR-ROLES RACER::QUALIFICATIONS
;         RACER::CONCEPT))
;       (BLOCK GET-CONCEPT-PROPERTIES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (CONCEPT &OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (FOR-ROLES NIL FOR-ROLES-SUPPLIED-P) (QUALIFICATIONS NIL QUALIFICATIONS-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN GET-NEXT-N-REMAINING-TUPLES
;     (DEFUN GET-NEXT-N-REMAINING-TUPLES
;            (QUERY
;             &OPTIONAL (RACER::N NIL RACER::N-SUPPLIED-P)
;             &KEY (RACER::EXECUTE-P NIL RACER::EXECUTE-P-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::N RACER::EXECUTE-P QUERY))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA GET-NEXT-N-REMAINING-TUPLES
;         (QUERY &OPTIONAL (RACER::N NIL RACER::N-SUPPLIED-P) &KEY
;          (RACER::EXECUTE-P NIL RACER::EXECUTE-P-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::N RACER::EXECUTE-P QUERY))
;       (BLOCK GET-NEXT-N-REMAINING-TUPLES
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (QUERY &OPTIONAL (N NIL N-SUPPLIED-P) &KEY (EXECUTE-P NIL EXECUTE-P-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN GET-ROLE-HIERARCHY
;     (DEFUN GET-ROLE-HIERARCHY
;            (
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (RACER::FOR-ROLES NIL RACER::FOR-ROLES-SUPPLIED-P))
;       (DECLARE (IGNORABLE RACER::TBOX RACER::FOR-ROLES))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA GET-ROLE-HIERARCHY
;         (&OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (RACER::FOR-ROLES NIL RACER::FOR-ROLES-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE (IGNORABLE RACER::TBOX RACER::FOR-ROLES))
;       (BLOCK GET-ROLE-HIERARCHY
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (FOR-ROLES NIL FOR-ROLES-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN SAVE-ABOX
;     (DEFUN SAVE-ABOX
;            (RACER::PATHNAME-OR-STREAM
;             &OPTIONAL (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P)
;             &KEY (RACER::SYNTAX NIL RACER::SYNTAX-SUPPLIED-P)
;             (RACER::TRANSFORMED NIL RACER::TRANSFORMED-SUPPLIED-P)
;             (RACER::IF-EXISTS NIL RACER::IF-EXISTS-SUPPLIED-P)
;             (RACER::IF-DOES-NOT-EXIST NIL RACER::IF-DOES-NOT-EXIST-SUPPLIED-P)
;             (RACER::HEADER NIL RACER::HEADER-SUPPLIED-P)
;             (RACER::URI NIL RACER::URI-SUPPLIED-P)
;             (RACER::IMPORT-LIST NIL RACER::IMPORT-LIST-SUPPLIED-P)
;             (RACER::ONTOLOGY-NAME NIL RACER::ONTOLOGY-NAME-SUPPLIED-P))
;       (DECLARE
;        (IGNORABLE RACER::ABOX RACER::SYNTAX RACER::TRANSFORMED RACER::IF-EXISTS
;         RACER::IF-DOES-NOT-EXIST RACER::HEADER RACER::URI RACER::IMPORT-LIST
;         RACER::ONTOLOGY-NAME RACER::PATHNAME-OR-STREAM))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA SAVE-ABOX
;         (RACER::PATHNAME-OR-STREAM &OPTIONAL
;          (RACER::ABOX NIL RACER::ABOX-SUPPLIED-P) &KEY
;          (RACER::SYNTAX NIL RACER::SYNTAX-SUPPLIED-P)
;          (RACER::TRANSFORMED NIL RACER::TRANSFORMED-SUPPLIED-P)
;          (RACER::IF-EXISTS NIL RACER::IF-EXISTS-SUPPLIED-P)
;          (RACER::IF-DOES-NOT-EXIST NIL RACER::IF-DOES-NOT-EXIST-SUPPLIED-P)
;          (RACER::HEADER NIL RACER::HEADER-SUPPLIED-P)
;          (RACER::URI NIL RACER::URI-SUPPLIED-P)
;          (RACER::IMPORT-LIST NIL RACER::IMPORT-LIST-SUPPLIED-P)
;          (RACER::ONTOLOGY-NAME NIL RACER::ONTOLOGY-NAME-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE
;        (IGNORABLE RACER::ABOX RACER::SYNTAX RACER::TRANSFORMED RACER::IF-EXISTS
;         RACER::IF-DOES-NOT-EXIST RACER::HEADER RACER::URI RACER::IMPORT-LIST
;         RACER::ONTOLOGY-NAME RACER::PATHNAME-OR-STREAM))
;       (BLOCK SAVE-ABOX
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (PATHNAME-OR-STREAM &OPTIONAL (ABOX NIL ABOX-SUPPLIED-P) &KEY (SYNTAX NIL SYNTAX-SUPPLIED-P) (TRANSFORMED NIL TRANSFORMED-SUPPLIED-P) (IF-EXISTS NIL IF-EXISTS-SUPPLIED-P) (IF-DOES-NOT-EXIST NIL IF-DOES-NOT-EXIST-SUPPLIED-P) (HEADER NIL HEADER-SUPPLIED-P) (URI NIL URI-SUPPLIED-P) (IMPORT-LIST NIL IMPORT-LIST-SUPPLIED-P) (ONTOLOGY-NAME NIL ONTOLOGY-NAME-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN SAVE-TBOX
;     (DEFUN SAVE-TBOX
;            (RACER::PATHNAME-OR-STREAM
;             &OPTIONAL (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P)
;             &KEY (RACER::SYNTAX NIL RACER::SYNTAX-SUPPLIED-P)
;             (RACER::TRANSFORMED NIL RACER::TRANSFORMED-SUPPLIED-P)
;             (RACER::AVOID-DUPLICATE-DEFINITIONS
;              NIL
;              RACER::AVOID-DUPLICATE-DEFINITIONS-SUPPLIED-P)
;             (RACER::IF-EXISTS NIL RACER::IF-EXISTS-SUPPLIED-P)
;             (RACER::IF-DOES-NOT-EXIST NIL RACER::IF-DOES-NOT-EXIST-SUPPLIED-P)
;             (RACER::URI NIL RACER::URI-SUPPLIED-P)
;             (RACER::ANONYMIZED NIL RACER::ANONYMIZED-SUPPLIED-P)
;             (RACER::HEADER NIL RACER::HEADER-SUPPLIED-P))
;       (DECLARE
;        (IGNORABLE RACER::TBOX RACER::SYNTAX RACER::TRANSFORMED
;         RACER::AVOID-DUPLICATE-DEFINITIONS RACER::IF-EXISTS
;         RACER::IF-DOES-NOT-EXIST RACER::URI RACER::ANONYMIZED RACER::HEADER
;         RACER::PATHNAME-OR-STREAM))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           (RACER::SERVICE-REQUEST RACER::REQ-STRING))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA SAVE-TBOX
;         (RACER::PATHNAME-OR-STREAM &OPTIONAL
;          (RACER::TBOX NIL RACER::TBOX-SUPPLIED-P) &KEY
;          (RACER::SYNTAX NIL RACER::SYNTAX-SUPPLIED-P)
;          (RACER::TRANSFORMED NIL RACER::TRANSFORMED-SUPPLIED-P)
;          (RACER::AVOID-DUPLICATE-DEFINITIONS NIL
;           RACER::AVOID-DUPLICATE-DEFINITIONS-SUPPLIED-P)
;          (RACER::IF-EXISTS NIL RACER::IF-EXISTS-SUPPLIED-P)
;          (RACER::IF-DOES-NOT-EXIST NIL RACER::IF-DOES-NOT-EXIST-SUPPLIED-P)
;          (RACER::URI NIL RACER::URI-SUPPLIED-P)
;          (RACER::ANONYMIZED NIL RACER::ANONYMIZED-SUPPLIED-P)
;          (RACER::HEADER NIL RACER::HEADER-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       (DECLARE
;        (IGNORABLE RACER::TBOX RACER::SYNTAX RACER::TRANSFORMED
;         RACER::AVOID-DUPLICATE-DEFINITIONS RACER::IF-EXISTS
;         RACER::IF-DOES-NOT-EXIST RACER::URI RACER::ANONYMIZED RACER::HEADER
;         RACER::PATHNAME-OR-STREAM))
;       (BLOCK SAVE-TBOX
;         (RACER::WITH-STANDARD-IO-SYNTAX-1
;           (LET (#)
;             (RACER::SERVICE-REQUEST RACER::REQ-STRING)))))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (PATHNAME-OR-STREAM &OPTIONAL (TBOX NIL TBOX-SUPPLIED-P) &KEY (SYNTAX NIL SYNTAX-SUPPLIED-P) (TRANSFORMED NIL TRANSFORMED-SUPPLIED-P) (AVOID-DUPLICATE-DEFINITIONS NIL AVOID-DUPLICATE-DEFINITIONS-SUPPLIED-P) (IF-EXISTS NIL IF-EXISTS-SUPPLIED-P) (IF-DOES-NOT-EXIST NIL IF-DOES-NOT-EXIST-SUPPLIED-P) (URI NIL URI-SUPPLIED-P) (ANONYMIZED NIL ANONYMIZED-SUPPLIED-P) (HEADER NIL HEADER-SUPPLIED-P))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFMACRO GET-RACER-VERSION
;     (DEFMACRO GET-RACER-VERSION ()
;       (DECLARE (IGNORABLE))
;       (RACER::WITH-STANDARD-IO-SYNTAX-1
;         (LET ((RACER::REQ-STRING #))
;           `(RACER::SERVICE-REQUEST ,RACER::REQ-STRING))))
; --> PROGN EVAL-WHEN 
; ==>
;   (SB-C::%DEFMACRO 'GET-RACER-VERSION
;                    (SB-INT:NAMED-LAMBDA (MACRO-FUNCTION GET-RACER-VERSION)
;                        (#:EXPR #:ENV)
;                      (DECLARE (SB-C::LAMBDA-LIST NIL))
;                      (DECLARE (IGNORE #:ENV))
;                      (SB-INT:NAMED-DS-BIND (:MACRO GET-RACER-VERSION . DEFMACRO)
;                          NIL
;                          (CDR #:EXPR)
;                        (DECLARE (IGNORABLE))
;                        (BLOCK GET-RACER-VERSION
;                          (RACER::WITH-STANDARD-IO-SYNTAX-1
;                            #))))
;                    (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   GET-RACER-VERSION is being redefined as a macro when it was previously defined to be a function.
; 
; caught STYLE-WARNING:
;   redefining RACER:GET-RACER-VERSION in DEFMACRO

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/racer/6c0bb5e966fae6690a306f1d6c97e969f321340a/racer-20181205-git/clients/lracer/lracer-stubs.lisp
; in: DEFUN EXIT-SERVER
;     (HANDLER-CASE
;      (RACER::WITH-STANDARD-IO-SYNTAX-1
;        (LET ((RACER::REQ-STRING #))
;          (RACER::SERVICE-REQUEST RACER::REQ-STRING)))
;      (RACER::RACER-ERROR (ERROR) (ERROR ERROR))
;      (RACER::LRACER-CONNECTION-ERROR (ERROR) T))
; --> SB-INT:DX-FLET FLET 
; ==>
;   (#:FUN3 (ERROR) (PROGN T))
; 
; caught STYLE-WARNING:
;   The variable ERROR is defined but never used.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "lracer" "lracer-stubs">
; 
; caught ERROR:
;   READ error during COMPILE-FILE: Lock on package SB-FORMAT violated when interning *FORMAT-WHITESPACE-CHARS* while in package RACER.
;   See also:
;     The SBCL Manual, Node "Package Locks"(in form starting at line: 57, column: 0, position: 1352)
Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING {10005305B3}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "lracer" "lracer-reader-macros">

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10005305B3}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100D262F03}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100D262F03}>)
2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100D262F03}>)
3: (ERROR UIOP/LISP-BUILD:COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "lracer" "lracer-reader-macros">)))
4: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "lracer" "lracer-reader-macros">)))
5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "lracer" "lracer-reader-macros">)
6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "lracer" "lracer-reader-macros">) [fast-method]
8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1005BCF8E3}>) [fast-method]
9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1005BCF8E3}>) [fast-method]
11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "lracer"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "lracer">)
13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "lracer">) [fast-method]
15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "lracer")
16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "lracer") [fast-method]
18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1005BC2DEB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1005B7D27B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "lracer") [fast-method]
22: (DEPCHECK::COMPUTE-DEPENDENCIES "lracer" "lracer")
23: (DEPCHECK::MAGIC "lracer" "lracer" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-7CWlHB3Y/depcheck-win.txt")
24: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "lracer" "lracer" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-7CWlHB3Y/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-7CWlHB3Y/depcheck-fail.txt"))
25: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
26: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
27: ((FLET "WITHOUT-INTERRUPTS-BODY-27" :IN SAVE-LISP-AND-DIE))
28: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

unhandled condition in --disable-debugger mode, quitting
; 
; compilation unit aborted
;   caught 2 fatal ERROR conditions
;   caught 1 ERROR condition
;   caught 30 STYLE-WARNING conditions
;   printed 1 note