...
Compiling core/pnr-ticket-linking.lisp
INFO: Control stack guard page unprotected
Control stack guard page temporarily disabled: proceed with caution
BORK:
Control stack exhausted (no more space for function call frames).
This is probably due to heavily nested or infinitely recursive function
calls, or a tail call that SBCL cannot or has not optimized away.

PROCEED WITH CAUTION.

debugger invoked on a SB-KERNEL::CONTROL-STACK-EXHAUSTED in thread #<THREAD "main thread" RUNNING {1002971623}>: Control stack exhausted (no more space for function call frames).
This is probably due to heavily nested or infinitely recursive function
calls, or a tail call that SBCL cannot or has not optimized away.

PROCEED WITH CAUTION.

Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [RETRY   ] Retry compiling core/pnr-ticket-linking.lisp.
  1: [ACCEPT  ] Continue, treating compiling core/pnr-ticket-linking.lisp as having been successful.
  2: [RETRY   ] Retry EVAL of current toplevel form.
  3: [CONTINUE] Ignore error and continue loading file "/ita/x1/qres/lisp/./make-qres.lisp".
  4: [ABORT   ] Abort loading file "/ita/x1/qres/lisp/./make-qres.lisp".
  5:            Ignore runtime option --eval "(progn
#.(progn (in-package :cl-user) nil)
(in-package :cl-user)

'#.(load \"./make-qres.lisp\" :verbose nil :print nil))".
  6:            Skip rest of --eval and --load options.
  7:            Skip to toplevel READ/EVAL/PRINT loop.
  8: [EXIT    ] Exit SBCL (calling #'EXIT, killing the process).

(SB-DEBUG::DEBUG-LOOP-FUN)
0] 
WARNING: Starting a poll(2) without a timeout while interrupts are disabled.

backtrace
0: (SB-DEBUG::DEBUG-LOOP-FUN)
1: (SB-DEBUG:INTERNAL-DEBUG)
2: (SB-DEBUG::%INVOKE-DEBUGGER #<SB-KERNEL::CONTROL-STACK-EXHAUSTED {10207E20E3}>)
3: ((LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX))
4: (SB-IMPL::CALL-WITH-SANE-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {10207E98CB}>)
5: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {10207E988B}>)
6: (INVOKE-DEBUGGER #<SB-KERNEL::CONTROL-STACK-EXHAUSTED {10207E20E3}>)
7: (XCVB-DRIVER:BORK #<SB-KERNEL::CONTROL-STACK-EXHAUSTED {10207E20E3}>)
8: (SIGNAL #<SB-KERNEL::CONTROL-STACK-EXHAUSTED {10207E20E3}>)
9: (ERROR SB-KERNEL::CONTROL-STACK-EXHAUSTED)
10: (SB-KERNEL::CONTROL-STACK-EXHAUSTED-ERROR)
11: ("foreign function: call_into_lisp")
12: ("foreign function: post_signal_tramp")
13: (SB-C::MAKE-LAMBDA)[:EXTERNAL]
14: (SB-C::IR1-CONVERT-LAMBDA-BODY ((MULTIPLE-VALUE-PROG1 (PROGN (THE (OR # LEGACY-PNR) SB-PCL::VALUE)) (VALUES))) (#<SB-C::LAMBDA-VAR :%SOURCE-NAME SB-PCL::VALUE {10207E1E83}>) :AUX-VARS NIL :AUX-VALS NIL :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (SB-PCL::SLOT-TYPECHECK (OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) :NOTE-LEXICAL-BINDINGS T :POST-BINDING-LEXENV NIL :SYSTEM-LAMBDA NIL)
15: (SB-C::IR1-CONVERT-LAMBDA (LAMBDA #1=(SB-PCL::VALUE) (THE (OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR) . #1#)) :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (SB-PCL::SLOT-TYPECHECK (OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) :MAYBE-ADD-DEBUG-CATCH T :SYSTEM-LAMBDA NIL)
16: (SB-C::FUN-NAME-LEAF (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#)))
17: (SB-C::IR1-CONVERT-FUNCTION #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 2 {10207E1D43}> #<SB-C::LVAR 3 {10207E1983}> (FUNCTION (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
18: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 2 {10207E1D43}> #<SB-C::LVAR 3 {10207E1983}> (FUNCTION (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) NIL)
19: (SB-C::IR1-CONVERT-GLOBAL-FUNCTOID #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 2 {10207E1D43}> #<SB-C::LVAR 3 {10207E1983}> (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#)) SB-INT:NAMED-LAMBDA)
20: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 2 {10207E1D43}> #<SB-C::LVAR 3 {10207E1983}> (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#)) NIL)
21: (SB-C::IR1-CONVERT-PROGN-BODY #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 2 {10207E1D43}> #<SB-C::LVAR 3 {10207E1983}> ((SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
22: (SB-C::IR1-CONVERT-PROGN #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 2 {10207E1D43}> #<SB-C::LVAR 3 {10207E1983}> (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
23: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 2 {10207E1D43}> #<SB-C::LVAR 3 {10207E1983}> (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) NIL)
24: (SB-C::IR1-CONVERT-MULTIPLE-VALUE-PROG1 #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 4 {10207E1953}> #<SB-C::LVAR 3 {10207E1983}> (MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR # LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES)))
25: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 4 {10207E1953}> #<SB-C::LVAR 3 {10207E1983}> (MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR # LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES)) NIL)
26: (SB-C::IR1-CONVERT-PROGN-BODY #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 4 {10207E1953}> #<SB-C::LVAR 3 {10207E1983}> ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))))
27: (SB-C::IR1-CONVERT-AUX-BINDINGS #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 4 {10207E1953}> #<SB-C::LVAR 3 {10207E1983}> ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))) NIL NIL NIL)
28: (SB-C::IR1-CONVERT-SPECIAL-BINDINGS #<SB-C::CTRAN 1 {10207E1BE3}> #<SB-C::CTRAN 4 {10207E1953}> #<SB-C::LVAR 3 {10207E1983}> ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))) NIL NIL NIL NIL)
29: (SB-C::IR1-CONVERT-LAMBDA-BODY ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))) NIL :AUX-VARS NIL :AUX-VALS NIL :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (LAMBDA NIL :IN "/ita/x1/qres/lisp/core/pnr-ticket-linking.lisp") :NOTE-LEXICAL-BINDINGS T :POST-BINDING-LEXENV NIL :SYSTEM-LAMBDA NIL)
30: (SB-C::IR1-CONVERT-LAMBDA (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (LAMBDA NIL :IN "/ita/x1/qres/lisp/core/pnr-ticket-linking.lisp") :MAYBE-ADD-DEBUG-CATCH T :SYSTEM-LAMBDA NIL)
31: (SB-C::MAKE-FUNCTIONAL-FROM-TOPLEVEL-LAMBDA (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) :NAME NIL :PATH (SB-C::ORIGINAL-SOURCE-START 0 0))
32: (SB-C::%COMPILE (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) #<SB-C::CORE-OBJECT > :NAME NIL :PATH (SB-C::ORIGINAL-SOURCE-START 0 0))
33: ((LAMBDA NIL :IN SB-C::ACTUALLY-COMPILE))
34: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
35: (SB-C::ACTUALLY-COMPILE NIL (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) #<NULL-LEXENV> NIL NIL)
36: (SB-C:COMPILE-IN-LEXENV NIL (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) #<NULL-LEXENV> NIL NIL)
37: (COMPILE NIL (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
38: ((FLET SB-THREAD::WITH-RECURSIVE-SYSTEM-LOCK-THUNK :IN SB-PCL::GENERATE-SLOTD-TYPECHECK))
39: ((FLET #:WITHOUT-INTERRUPTS-BODY-89298 :IN SB-THREAD::CALL-WITH-RECURSIVE-SYSTEM-LOCK))
40: (SB-PCL::GENERATE-SLOTD-TYPECHECK #<STANDARD-EFFECTIVE-SLOT-DEFINITION PNR>)
41: ((SB-PCL::FAST-METHOD INITIALIZE-INSTANCE :AFTER (EFFECTIVE-SLOT-DEFINITION)) #<unused argument> #<unused argument> #<STANDARD-EFFECTIVE-SLOT-DEFINITION PNR>)
42: ((SB-PCL::EMF INITIALIZE-INSTANCE) #<unused argument> #<unused argument> #<STANDARD-EFFECTIVE-SLOT-DEFINITION PNR> :NAME PNR :INITFORM NIL :INITFUNCTION NIL :INITARGS (:PNR) :ALLOCATION :INSTANCE :ALLOCATION-CLASS #<STANDARD-CLASS LEGACY-PNR-PAX> :TYPE (OR (EQL QUAKE::LAZY-SLOT-NOT-YET-LOADED) LEGACY-PNR) :CLASS #<STANDARD-CLASS LEGACY-PNR-PAX> :DOCUMENTATION "The pnr this passenger is a member of")
43: ((SB-PCL::FAST-METHOD MAKE-INSTANCE (CLASS)) #<unused argument> #<unused argument> #<STANDARD-CLASS STANDARD-EFFECTIVE-SLOT-DEFINITION> #<unavailable &REST argument>)
44: ((SB-PCL::FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION (SB-PCL::SLOT-CLASS T T)) #<unavailable argument> #<unavailable argument> #<STANDARD-CLASS LEGACY-PNR-PAX> #<unavailable argument> (#<STANDARD-DIRECT-SLOT-DEFINITION PNR>))
45: (SB-PCL::STD-COMPUTE-SLOTS #<STANDARD-CLASS LEGACY-PNR-PAX>)
46: ((SB-PCL::FAST-METHOD COMPUTE-SLOTS :AROUND (STANDARD-CLASS)) #<unavailable argument> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD COMPUTE-SLOTS #)> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (1)) #<STANDARD-CLASS LEGACY-PNR-PAX>)
47: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS))
48: ((FLET #:WITHOUT-INTERRUPTS-BODY-89254 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
49: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS LEGACY-PNR-PAX> T)
...
12756: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS LEGACY-PNR-PAX> T)
12757: (SB-KERNEL::%ENSURE-CLASSOID-VALID #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-PCL::WRAPPER #<STANDARD-CLASS LEGACY-PNR-PAX> {1002BC3B03}> NIL)
12758: (SB-KERNEL::%ENSURE-BOTH-CLASSOIDS-VALID #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-KERNEL:BUILT-IN-CLASSOID FUNCTION (read-only)> NIL)
12759: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-KERNEL::CLASSOID-SIMPLE-SUBTYPEP-TYPE-METHOD))
12760: ((FLET #:WITHOUT-INTERRUPTS-BODY-89254 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
12761: (SB-KERNEL::CLASSOID-SIMPLE-SUBTYPEP-TYPE-METHOD #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-KERNEL:BUILT-IN-CLASSOID FUNCTION (read-only)>)
12762: (SB-KERNEL:CSUBTYPEP #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-KERNEL:BUILT-IN-CLASSOID FUNCTION (read-only)>)
12763: (SB-KERNEL:CTYPEP NIL #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX>)
12764: ((LAMBDA (ELT) :IN SB-KERNEL::MEMBER-COMPLEX-SUBTYPEP-ARG1-TYPE-METHOD) NIL)
12765: (SB-INT:MAP-XSET #<CLOSURE (LAMBDA (ELT) :IN SB-KERNEL::MEMBER-COMPLEX-SUBTYPEP-ARG1-TYPE-METHOD) {101BAA1E7B}> #S(SB-INT:XSET :LIST-SIZE 1 :DATA (NIL)))
12766: (SB-KERNEL:MAPC-MEMBER-TYPE-MEMBERS #<CLOSURE (LAMBDA (ELT) :IN SB-KERNEL::MEMBER-COMPLEX-SUBTYPEP-ARG1-TYPE-METHOD) {101BAA1E7B}> #<SB-KERNEL:MEMBER-TYPE NULL>)
12767: (SB-KERNEL::MEMBER-COMPLEX-SUBTYPEP-ARG1-TYPE-METHOD #<SB-KERNEL:MEMBER-TYPE NULL> #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX>)
12768: (SB-KERNEL:CSUBTYPEP #<SB-KERNEL:MEMBER-TYPE NULL> #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX>)
12769: (SB-KERNEL::TYPE-UNION2 #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-KERNEL:MEMBER-TYPE NULL>)
12770: (SB-KERNEL::SIMPLIFY-UNIONS (#<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-KERNEL:MEMBER-TYPE NULL>))
12771: (SB-KERNEL::SIMPLIFY-UNIONS (#<SB-KERNEL:MEMBER-TYPE (MEMBER :UNKNOWN)> #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-KERNEL:MEMBER-TYPE NULL>))
12772: (SB-KERNEL::%TYPE-UNION (#<SB-KERNEL:MEMBER-TYPE (MEMBER :UNKNOWN)> #<SB-KERNEL:STANDARD-CLASSOID LEGACY-PNR-PAX> #<SB-KERNEL:MEMBER-TYPE NULL>))
12773: (SB-KERNEL:VALUES-SPECIFIER-TYPE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL))
12774: (SB-C::CAREFUL-VALUES-SPECIFIER-TYPE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL))
12775: (SB-C::COMPILER-VALUES-SPECIFIER-TYPE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL))
12776: (SB-C::THE-IN-POLICY (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1) (SB-C:STORE-COVERAGE-DATA . 0) (SB-C::TYPE-CHECK . 3) (SB-C:VERIFY-ARG-COUNT . 0)) #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1558 {101BAA1A03}> #<SB-C::LVAR 1559 {101BAA1603}>)
12777: (SB-C::IR1-CONVERT-THE #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1558 {101BAA1A03}> #<SB-C::LVAR 1559 {101BAA1603}> (THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE))
12778: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1558 {101BAA1A03}> #<SB-C::LVAR 1559 {101BAA1603}> (THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE) NIL)
12779: (SB-C::IR1-CONVERT-PROGN-BODY #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1558 {101BAA1A03}> #<SB-C::LVAR 1559 {101BAA1603}> ((THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE)))
12780: (SB-C::IR1-CONVERT-PROGN #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1558 {101BAA1A03}> #<SB-C::LVAR 1559 {101BAA1603}> (PROGN (THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE)))
12781: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1558 {101BAA1A03}> #<SB-C::LVAR 1559 {101BAA1603}> (PROGN (THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE)) NIL)
12782: (SB-C::IR1-CONVERT-MULTIPLE-VALUE-PROG1 #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1560 {101BAA15D3}> #<SB-C::LVAR 1559 {101BAA1603}> (MULTIPLE-VALUE-PROG1 (PROGN (THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE)) (VALUES)))
12783: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1560 {101BAA15D3}> #<SB-C::LVAR 1559 {101BAA1603}> (MULTIPLE-VALUE-PROG1 (PROGN (THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) SB-PCL::VALUE)) (VALUES)) NIL)
12784: (SB-C::IR1-CONVERT-PROGN-BODY #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1560 {101BAA15D3}> #<SB-C::LVAR 1559 {101BAA1603}> ((MULTIPLE-VALUE-PROG1 (PROGN (THE (OR # LEGACY-PNR-PAX NULL) SB-PCL::VALUE)) (VALUES))))
12785: (SB-C::IR1-CONVERT-AUX-BINDINGS #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1560 {101BAA15D3}> #<SB-C::LVAR 1559 {101BAA1603}> ((MULTIPLE-VALUE-PROG1 (PROGN (THE (OR # LEGACY-PNR-PAX NULL) SB-PCL::VALUE)) (VALUES))) NIL NIL NIL)
12786: (SB-C::IR1-CONVERT-SPECIAL-BINDINGS #<SB-C::CTRAN 1557 {101BAA18A3}> #<SB-C::CTRAN 1560 {101BAA15D3}> #<SB-C::LVAR 1559 {101BAA1603}> ((MULTIPLE-VALUE-PROG1 (PROGN (THE (OR # LEGACY-PNR-PAX NULL) SB-PCL::VALUE)) (VALUES))) NIL NIL NIL NIL)
12787: (SB-C::IR1-CONVERT-LAMBDA-BODY ((MULTIPLE-VALUE-PROG1 (PROGN (THE (OR # LEGACY-PNR-PAX NULL) SB-PCL::VALUE)) (VALUES))) (#<SB-C::LAMBDA-VAR :%SOURCE-NAME SB-PCL::VALUE {101BAA12D3}>) :AUX-VARS NIL :AUX-VALS NIL :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (SB-PCL::SLOT-TYPECHECK (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) :NOTE-LEXICAL-BINDINGS T :POST-BINDING-LEXENV NIL :SYSTEM-LAMBDA NIL)
12788: (SB-C::IR1-CONVERT-LAMBDA (LAMBDA #1=(SB-PCL::VALUE) (THE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) . #1#)) :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (SB-PCL::SLOT-TYPECHECK (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) :MAYBE-ADD-DEBUG-CATCH T :SYSTEM-LAMBDA NIL)
12789: (SB-C::FUN-NAME-LEAF (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#)))
12790: (SB-C::IR1-CONVERT-FUNCTION #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1562 {101BAA1193}> #<SB-C::LVAR 1563 {101BAA0DD3}> (FUNCTION (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
12791: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1562 {101BAA1193}> #<SB-C::LVAR 1563 {101BAA0DD3}> (FUNCTION (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) NIL)
12792: (SB-C::IR1-CONVERT-GLOBAL-FUNCTOID #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1562 {101BAA1193}> #<SB-C::LVAR 1563 {101BAA0DD3}> (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#)) SB-INT:NAMED-LAMBDA)
12793: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1562 {101BAA1193}> #<SB-C::LVAR 1563 {101BAA0DD3}> (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#)) NIL)
12794: (SB-C::IR1-CONVERT-PROGN-BODY #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1562 {101BAA1193}> #<SB-C::LVAR 1563 {101BAA0DD3}> ((SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
12795: (SB-C::IR1-CONVERT-PROGN #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1562 {101BAA1193}> #<SB-C::LVAR 1563 {101BAA0DD3}> (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
12796: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1562 {101BAA1193}> #<SB-C::LVAR 1563 {101BAA0DD3}> (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) NIL)
12797: (SB-C::IR1-CONVERT-MULTIPLE-VALUE-PROG1 #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1564 {101BAA0DA3}> #<SB-C::LVAR 1563 {101BAA0DD3}> (MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR # LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES)))
12798: (SB-C::IR1-CONVERT #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1564 {101BAA0DA3}> #<SB-C::LVAR 1563 {101BAA0DD3}> (MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR # LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES)) NIL)
12799: (SB-C::IR1-CONVERT-PROGN-BODY #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1564 {101BAA0DA3}> #<SB-C::LVAR 1563 {101BAA0DD3}> ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))))
12800: (SB-C::IR1-CONVERT-AUX-BINDINGS #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1564 {101BAA0DA3}> #<SB-C::LVAR 1563 {101BAA0DD3}> ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))) NIL NIL NIL)
12801: (SB-C::IR1-CONVERT-SPECIAL-BINDINGS #<SB-C::CTRAN 1561 {101BAA1033}> #<SB-C::CTRAN 1564 {101BAA0DA3}> #<SB-C::LVAR 1563 {101BAA0DD3}> ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))) NIL NIL NIL NIL)
12802: (SB-C::IR1-CONVERT-LAMBDA-BODY ((MULTIPLE-VALUE-PROG1 (PROGN (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=#) #2=(SB-PCL::VALUE) (THE #1# . #2#))) (VALUES))) NIL :AUX-VARS NIL :AUX-VALS NIL :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (LAMBDA NIL :IN "/ita/x1/qres/lisp/core/pnr-ticket-linking.lisp") :NOTE-LEXICAL-BINDINGS T :POST-BINDING-LEXENV NIL :SYSTEM-LAMBDA NIL)
12803: (SB-C::IR1-CONVERT-LAMBDA (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (LAMBDA NIL :IN "/ita/x1/qres/lisp/core/pnr-ticket-linking.lisp") :MAYBE-ADD-DEBUG-CATCH T :SYSTEM-LAMBDA NIL)
12804: (SB-C::MAKE-FUNCTIONAL-FROM-TOPLEVEL-LAMBDA (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) :NAME NIL :PATH (SB-C::ORIGINAL-SOURCE-START 0 0))
12805: (SB-C::%COMPILE (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) #<SB-C::CORE-OBJECT > :NAME NIL :PATH (SB-C::ORIGINAL-SOURCE-START 0 0))
12806: ((LAMBDA NIL :IN SB-C::ACTUALLY-COMPILE))
12807: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
12808: (SB-C::ACTUALLY-COMPILE NIL (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) #<NULL-LEXENV> NIL NIL)
12809: (SB-C:COMPILE-IN-LEXENV NIL (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))) #<NULL-LEXENV> NIL NIL)
12810: (COMPILE NIL (LAMBDA NIL (DECLARE (OPTIMIZE (SB-C:STORE-COVERAGE-DATA 0) (SB-C::TYPE-CHECK 3) (SB-C:VERIFY-ARG-COUNT 0))) (SB-INT:NAMED-LAMBDA (SB-PCL::SLOT-TYPECHECK #1=(OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL)) #2=(SB-PCL::VALUE) (THE #1# . #2#))))
12811: ((FLET SB-THREAD::WITH-RECURSIVE-SYSTEM-LOCK-THUNK :IN SB-PCL::GENERATE-SLOTD-TYPECHECK))
12812: ((FLET #:WITHOUT-INTERRUPTS-BODY-89298 :IN SB-THREAD::CALL-WITH-RECURSIVE-SYSTEM-LOCK))
12813: (SB-THREAD::CALL-WITH-RECURSIVE-SYSTEM-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-SYSTEM-LOCK-THUNK :IN SB-PCL::GENERATE-SLOTD-TYPECHECK) {7FFFF6E0BE8B}> #<SB-THREAD:MUTEX "hash-table lock" owner: #<SB-THREAD:THREAD "main thread" RUNNING {1002971623}>>)
12814: (SB-PCL::GENERATE-SLOTD-TYPECHECK #<STANDARD-EFFECTIVE-SLOT-DEFINITION PNR-PAX>)
12815: ((SB-PCL::FAST-METHOD INITIALIZE-INSTANCE :AFTER (EFFECTIVE-SLOT-DEFINITION)) #<unused argument> #<unused argument> #<STANDARD-EFFECTIVE-SLOT-DEFINITION PNR-PAX>)
12816: ((SB-PCL::EMF INITIALIZE-INSTANCE) #<unused argument> #<unused argument> #<STANDARD-EFFECTIVE-SLOT-DEFINITION PNR-PAX> :NAME PNR-PAX :INITFORM :UNKNOWN :INITFUNCTION #<FUNCTION (LAMBDA NIL :IN "/ita/x1/qres/lisp/core/ticketing/ticket-classes.lisp") {101058DCDB}> :INITARGS (:PNR-PAX) :ALLOCATION :INSTANCE :ALLOCATION-CLASS #<STANDARD-CLASS TICKET-SET> :TYPE (OR (EQL :UNKNOWN) LEGACY-PNR-PAX NULL) :CLASS #<STANDARD-CLASS TICKET-SET> :DOCUMENTATION NIL)
12817: ((SB-PCL::FAST-METHOD MAKE-INSTANCE (CLASS)) #<unused argument> #<unused argument> #<STANDARD-CLASS STANDARD-EFFECTIVE-SLOT-DEFINITION> #<unavailable &REST argument>)
12818: ((SB-PCL::FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION (SB-PCL::SLOT-CLASS T T)) #<unavailable argument> #<unavailable argument> #<STANDARD-CLASS TICKET-SET> #<unavailable argument> (#<STANDARD-DIRECT-SLOT-DEFINITION PNR-PAX>))
12819: (SB-PCL::STD-COMPUTE-SLOTS #<STANDARD-CLASS TICKET-SET>)
12820: ((SB-PCL::FAST-METHOD COMPUTE-SLOTS :AROUND (STANDARD-CLASS)) #<unavailable argument> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD COMPUTE-SLOTS #)> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (1)) #<STANDARD-CLASS TICKET-SET>)
12821: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS))
12822: ((FLET #:WITHOUT-INTERRUPTS-BODY-89254 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
12823: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FFFF6E0C4AB}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "main thread" RUNNING {1002971623}>>)
12824: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS TICKET-SET> T)
12825: (SB-PCL::TRY-FINALIZE-INHERITANCE #<STANDARD-CLASS TICKET-SET>)
12826: (SB-PCL::TRY-FINALIZE-INHERITANCE #<STANDARD-CLASS TICKET-SET>)[:EXTERNAL]
12827: (SB-PCL::CAN-OPTIMIZE-ACCESS (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) (TICKET-SET) #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12828: (SB-PCL::OPTIMIZE-SLOT-VALUE (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) ((TICKET-SET)) (TICKET-SET) #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12829: (SB-WALKER::WALK-FORM-INTERNAL (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12830: (SB-WALKER::WALK-TEMPLATE-HANDLE-REPEAT-1 ((SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) ((EVAL)) (EVAL) NIL :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12831: (SB-WALKER::WALK-TEMPLATE (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (SB-WALKER::CALL SB-WALKER::REPEAT (EVAL)) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12832: (SB-WALKER::WALK-FORM-INTERNAL (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12833: (SB-WALKER::WALK-IF (IF (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (PROGN (LET ((TICKET-SETS #)) (COND (# #) (T #)))) NIL) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12834: (SB-WALKER::WALK-FORM-INTERNAL (IF (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (PROGN (LET ((TICKET-SETS #)) (COND (# #) (T #)))) NIL) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12835: (SB-WALKER::WALK-FORM-INTERNAL (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS (DATABASE-SESSION-RECORDS-MATCHING # #))) (COND ((MEMBER TICKET-SET TICKET-SETS) (LET # #)) (T (SETF # NIL))))) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12836: (SB-WALKER::WALK-TEMPLATE-HANDLE-REPEAT-1 ((WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))) ((EVAL)) (EVAL) NIL :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12837: (SB-WALKER::WALK-TEMPLATE (TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))) (NIL SB-WALKER::REPEAT (EVAL)) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12838: (SB-WALKER::WALK-TEMPLATE (BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))) (NIL NIL SB-WALKER::REPEAT (EVAL)) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12839: (SB-WALKER::WALK-FORM-INTERNAL (BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12840: (SB-WALKER::WALK-REPEAT-EVAL ((BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12841: (SB-WALKER::WALK-DECLARATIONS ((DECLARE (SB-PCL::%CLASS TICKET-SET TICKET-SET) (IGNORABLE)) (BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) #<FUNCTION SB-WALKER::WALK-REPEAT-EVAL> #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL) NIL #<unavailable argument> NIL)
12842: (SB-WALKER::WALK-DECLARATIONS ((DECLARE (IGNORABLE TICKET-SET)) (DECLARE (SB-PCL::%CLASS TICKET-SET TICKET-SET) (IGNORABLE)) (BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) #<FUNCTION SB-WALKER::WALK-REPEAT-EVAL> #S(SB-KERNEL:LEXENV :FUNS ((#1=#:G4 SB-SYS:MACRO . #<CLOSURE #2=# {101B582AAB}>) (#1# SB-SYS:MACRO . #<CLOSURE #2# {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL) NIL #<unavailable argument> NIL)
12843: (SB-WALKER::WALK-LAMBDA (LAMBDA (TICKET-SET &OPTIONAL PNR) (DECLARE (IGNORABLE TICKET-SET)) (DECLARE (SB-PCL::%CLASS TICKET-SET TICKET-SET) (IGNORABLE)) (BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#:G4 SB-SYS:MACRO . #<CLOSURE # {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12844: (SB-WALKER::WALK-FORM-INTERNAL (LAMBDA (TICKET-SET &OPTIONAL PNR) (DECLARE (IGNORABLE TICKET-SET)) (DECLARE (SB-PCL::%CLASS TICKET-SET TICKET-SET) (IGNORABLE)) (BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) :EVAL #S(SB-KERNEL:LEXENV :FUNS ((#:G4 SB-SYS:MACRO . #<CLOSURE # {101B58293B}>)) :VARS NIL :BLOCKS NIL :TAGS NIL :TYPE-RESTRICTIONS NIL :LAMBDA NIL :CLEANUP NIL :HANDLED-CONDITIONS ((SB-EXT:COMPILER-NOTE . MUFFLE-WARNING)) :DISABLED-PACKAGE-LOCKS NIL :%POLICY ((COMPILATION-SPEED . 1) (DEBUG . 3) (SB-EXT:INHIBIT-WARNINGS . 0) (SAFETY . 3) (SPACE . 1) (SPEED . 1)) :USER-DATA NIL))
12845: (SB-PCL::WALK-METHOD-LAMBDA (LAMBDA (TICKET-SET &OPTIONAL PNR) (DECLARE (IGNORABLE TICKET-SET)) (DECLARE (SB-PCL::%CLASS TICKET-SET TICKET-SET) (IGNORABLE)) (BLOCK TICKET-SET-PNR-PAX (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) (TICKET-SET) #<NULL-LEXENV> ((TICKET-SET)))
12846: (SB-PCL::MAKE-METHOD-LAMBDA-INTERNAL #<unavailable argument> #<unavailable argument> (LAMBDA (TICKET-SET &OPTIONAL PNR) "If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))) #<NULL-LEXENV>)
12847: (SB-PCL::EXPAND-DEFMETHOD TICKET-SET-PNR-PAX #<STANDARD-GENERIC-FUNCTION TICKET-SET-PNR-PAX (1)> #<STANDARD-METHOD #<STANDARD-METHOD {10007878C3}> {10007878C3}> (:BEFORE) ((TICKET-SET TICKET-SET) &OPTIONAL PNR) ("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))) #<NULL-LEXENV>)
12848: (MACROEXPAND-1 (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX (:BEFORE) ((TICKET-SET TICKET-SET) &OPTIONAL PNR) ("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) #<NULL-LEXENV>)
12849: (SB-C::PREPROCESSOR-MACROEXPAND-1 (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX (:BEFORE) ((TICKET-SET TICKET-SET) &OPTIONAL PNR) ("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))))
12850: ((FLET SB-C::DEFAULT-PROCESSOR :IN SB-C::PROCESS-TOPLEVEL-FORM) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX (:BEFORE) ((TICKET-SET TICKET-SET) &OPTIONAL PNR) ("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))))
12851: (SB-C::PROCESS-TOPLEVEL-FORM (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX (:BEFORE) ((TICKET-SET TICKET-SET) &OPTIONAL PNR) ("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET #) :UNKNOWN) (LET (#) (COND # #))))) (#1=(EVAL-WHEN (:LOAD-TOPLEVEL) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #2=(:BEFORE) #3=((TICKET-SET TICKET-SET) &OPTIONAL PNR) #4=("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN # #)))) (PROGN #1# (EVAL-WHEN (:EXECUTE) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #2# #3# #4#))) SB-C::ORIGINAL-SOURCE-START 0 16) NIL)
12852: (SB-C::PROCESS-TOPLEVEL-PROGN ((SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX (:BEFORE) ((TICKET-SET TICKET-SET) &OPTIONAL PNR) ("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ # :UNKNOWN) (LET # #))))) (#1=(EVAL-WHEN (:LOAD-TOPLEVEL) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #2=(:BEFORE) #3=((TICKET-SET TICKET-SET) &OPTIONAL PNR) #4=("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN # #)))) (PROGN #1# (EVAL-WHEN (:EXECUTE) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #2# #3# #4#))) SB-C::ORIGINAL-SOURCE-START 0 16) NIL)
12853: (SB-C::PROCESS-TOPLEVEL-FORM (EVAL-WHEN (:LOAD-TOPLEVEL) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX (:BEFORE) ((TICKET-SET TICKET-SET) &OPTIONAL PNR) ("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ # :UNKNOWN) (LET # #))))) ((PROGN (EVAL-WHEN (:LOAD-TOPLEVEL) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1=(:BEFORE) #2=(# &OPTIONAL PNR) #3=("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." #))) (EVAL-WHEN (:EXECUTE) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1# #2# #3#))) SB-C::ORIGINAL-SOURCE-START 0 16) NIL)
12854: (SB-C::PROCESS-TOPLEVEL-PROGN ((EVAL-WHEN (:LOAD-TOPLEVEL) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1=(:BEFORE) #2=((TICKET-SET TICKET-SET) &OPTIONAL PNR) #3=("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN # #)))) (EVAL-WHEN (:EXECUTE) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1# #2# #3#))) ((PROGN (EVAL-WHEN (:LOAD-TOPLEVEL) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1=(:BEFORE) #2=(# &OPTIONAL PNR) #3=("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." #))) (EVAL-WHEN (:EXECUTE) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1# #2# #3#))) SB-C::ORIGINAL-SOURCE-START 0 16) NIL)
12855: (SB-C::PROCESS-TOPLEVEL-FORM (PROGN (EVAL-WHEN (:LOAD-TOPLEVEL) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1=(:BEFORE) #2=((TICKET-SET TICKET-SET) &OPTIONAL PNR) #3=("If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN # #)))) (EVAL-WHEN (:EXECUTE) (SB-PCL::%DEFMETHOD-EXPANDER TICKET-SET-PNR-PAX #1# #2# #3#))) (SB-C::ORIGINAL-SOURCE-START 0 16) NIL)
12856: ((FLET SB-C::DEFAULT-PROCESSOR :IN SB-C::PROCESS-TOPLEVEL-FORM) (DEFMETHOD TICKET-SET-PNR-PAX :BEFORE ((TICKET-SET TICKET-SET) &OPTIONAL PNR) "If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))))
12857: (SB-C::PROCESS-TOPLEVEL-FORM (DEFMETHOD TICKET-SET-PNR-PAX :BEFORE ((TICKET-SET TICKET-SET) &OPTIONAL PNR) "If the pnr-pax slot contains :UNKNOWN, call LEGACY-PNR-PAX-FOR to query the database for an
   associated LEGACY-PNR-PAX, and set it to the result. This now happens for all ticket sets
   in the database session's record cache, using one database query. If PNR is supplied it is
   used to avoid pnr-paxes associated with other PNRs in the case of multiple-PNR associations." (WHEN (EQ (SLOT-VALUE TICKET-SET (QUOTE PNR-PAX)) :UNKNOWN) (LET ((TICKET-SETS #)) (COND (# #) (T #))))) (SB-C::ORIGINAL-SOURCE-START 0 16) NIL)
12858: (SB-C::SUB-SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
12859: ((LAMBDA NIL :IN SB-C::SUB-COMPILE-FILE))
12860: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
12861: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
12862: (COMPILE-FILE #P"/ita/x1/qres/lisp/core/pnr-ticket-linking.lisp" :OUTPUT-FILE #P"/ita/x1/qres/lisp/cache/sbcl/core/ASDF-TMP-pnr-ticket-linking.fasl" :VERBOSE NIL :PRINT NIL :EXTERNAL-FORMAT :DEFAULT :TRACE-FILE NIL :BLOCK-COMPILE NIL :EMIT-CFASL NIL)
12863: (ASDF:COMPILE-FILE* #P"/ita/x1/qres/lisp/core/pnr-ticket-linking.lisp" :OUTPUT-FILE #P"/ita/x1/qres/lisp/cache/sbcl/core/pnr-ticket-linking.fasl" :EXTERNAL-FORMAT :DEFAULT)
12864: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE)) #<unavailable argument> #<unavailable argument> #<ASDF:COMPILE-OP NIL {100CD734B3}> #<ASDF:CL-SOURCE-FILE "qres-core" "qres-misc" "qres-misc-part-1" "pnr-ticket-linking">)
12865: ((SB-PCL::EMF ASDF:PERFORM) #<unavailable argument> #<unavailable argument> #<ASDF:COMPILE-OP NIL {100CD734B3}> #<ASDF:CL-SOURCE-FILE "qres-core" "qres-misc" "qres-misc-part-1" "pnr-ticket-linking">)
12866: ((SB-PCL::FAST-METHOD ASDF:PERFORM :AROUND (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE)) #<unavailable argument> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<CLOSURE (SB-PCL::EMF ASDF:PERFORM) {10177B87BB}> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (2)) #<ASDF:COMPILE-OP NIL {100CD734B3}> #<ASDF:CL-SOURCE-FILE "qres-core" "qres-misc" "qres-misc-part-1" "pnr-ticket-linking">)
12867: ((SB-PCL::FAST-METHOD ASDF::PERFORM-WITH-RESTARTS :AROUND (T T)) #<unavailable argument> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD ASDF::PERFORM-WITH-RESTARTS #)> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (2)) #<ASDF:COMPILE-OP NIL {100CD734B3}> #<ASDF:CL-SOURCE-FILE "qres-core" "qres-misc" "qres-misc-part-1" "pnr-ticket-linking">)
12868: ((LAMBDA NIL :IN ASDF::PERFORM-PLAN))
12869: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
12870: ((SB-PCL::FAST-METHOD ASDF::PERFORM-PLAN (LIST)) #<unused argument> #<unused argument> ((#1=#<ASDF:COMPILE-OP NIL {1028872CD3}> . #<ASDF:CL-SOURCE-FILE #2="fare-memoization" "memoization">) (#1# . #<ASDF:SYSTEM #2#>) (#3=#<ASDF:COMPILE-OP NIL {1029DD77E3}> . #4=#<ASDF:CL-SOURCE-FILE #5="trivial-gray-streams" "package">) (#<ASDF:LOAD-OP NIL {1029DD7803}> . #4#) (#3# . #6=#<ASDF:CL-SOURCE-FILE #5# "mixin">) (#3# . #7=#<ASDF:SYSTEM #5#>) (#8=#<ASDF:LOAD-OP NIL {1029DD77C3}> . #6#) (#8# . #7#) (#9=#<ASDF:COMPILE-OP NIL {1029DD7563}> . #10=#<ASDF:CL-SOURCE-FILE #11="flexi-streams" "packages">) (#<ASDF:LOAD-OP NIL {1029DD77A3}> . #10#) (#9# . #12=#<ASDF:CL-SOURCE-FILE #11# "mapping">) (#<ASDF:LOAD-OP NIL {1029DD7783}> . #12#) ...))
12871: ((LAMBDA NIL :IN ASDF:OPERATE))
12872: (ASDF::CALL-WITH-SYSTEM-DEFINITIONS #<CLOSURE (LAMBDA NIL :IN ASDF:OPERATE) {1015A8090B}>)
12873: ((SB-PCL::FAST-METHOD ASDF:OPERATE (T T)) #<unused argument> #<unused argument> ASDF:LOAD-OP :QRES-XML)
12874: ((SB-PCL::EMF ASDF:OPERATE) #<unused argument> #<unused argument> ASDF:LOAD-OP :QRES-XML)
12875: (QRES-BUILD::OPERATE-LATE-SYSTEMS ASDF:LOAD-OP)
12876: ((LAMBDA NIL :IN QRES-BUILD::CALL-WITH-QRES-COMPILATION-UNIT))
12877: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::%WITH-COMPILATION-UNIT))
12878: ((FLET #:WITHOUT-INTERRUPTS-BODY-89254 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
12879: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::%WITH-COMPILATION-UNIT) {7FFFF6E0EAEB}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "main thread" RUNNING {1002971623}>>)
12880: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
12881: (QRES-BUILD::CALL-WITH-QRES-COMPILATION-UNIT #<FUNCTION (LAMBDA NIL :IN QRES-BUILD:COMPILE-QRES) {1011DBE42B}>)
12882: (XCVB-DRIVER::CALL-WITH-CONTROLLED-COMPILER-CONDITIONS #<FUNCTION (LAMBDA NIL :IN QRES-BUILD:COMPILE-QRES) {1011DBE3BB}>)
12883: (COMMON-LISP-USER::CONTINUE-QRES-BUILD)
12884: (SB-INT:SIMPLE-EVAL-IN-LEXENV (COND (T (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* T) (COMMON-LISP-USER::CONTINUE-QRES-BUILD))) #<NULL-LEXENV>)
12885: (SB-INT:SIMPLE-EVAL-IN-LEXENV (COND ((COMMON-LISP-USER::ENV-VAR-IS "BUILD_WITH_SLIME" "no") (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* NIL) (COMMON-LISP-USER::CONTINUE-QRES-BUILD)) (T (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* T) (COMMON-LISP-USER::CONTINUE-QRES-BUILD))) #<NULL-LEXENV>)
12886: (SB-INT:SIMPLE-EVAL-IN-LEXENV (COND ((COMMON-LISP-USER::ENV-VAR-IS "BUILD_WITH_DEBUG_TOOLS" "no") (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* NIL) (COMMON-LISP-USER::CONTINUE-QRES-BUILD)) ((COMMON-LISP-USER::ENV-VAR-IS "BUILD_WITH_SLIME" "no") (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* NIL) (COMMON-LISP-USER::CONTINUE-QRES-BUILD)) (T (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* T) (COMMON-LISP-USER::CONTINUE-QRES-BUILD))) #<NULL-LEXENV>)
12887: (SB-EXT:EVAL-TLF (COND ((COMMON-LISP-USER::ENV-VAR-IS "BUILD_WITH_DEBUG_TOOLS" "no") (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* NIL) (COMMON-LISP-USER::CONTINUE-QRES-BUILD)) ((COMMON-LISP-USER::ENV-VAR-IS "BUILD_WITH_SLIME" "no") (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* NIL) (COMMON-LISP-USER::CONTINUE-QRES-BUILD)) (T (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* T) (COMMON-LISP-USER::CONTINUE-QRES-BUILD))) 8 #<NULL-LEXENV>)
12888: ((FLET SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (COND ((COMMON-LISP-USER::ENV-VAR-IS "BUILD_WITH_DEBUG_TOOLS" "no") (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* NIL) (COMMON-LISP-USER::CONTINUE-QRES-BUILD)) ((COMMON-LISP-USER::ENV-VAR-IS "BUILD_WITH_SLIME" "no") (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* NIL) (COMMON-LISP-USER::CONTINUE-QRES-BUILD)) (T (SETF COMMON-LISP-USER::*BUILD-WITH-SLIME* T) (COMMON-LISP-USER::CONTINUE-QRES-BUILD))) 8)
12889: (SB-INT:LOAD-AS-SOURCE #<SB-SYS:FD-STREAM for "file /ita/x1/qres/lisp/make-qres.lisp" {10029C4C93}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
12890: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-SYS:FD-STREAM for "file /ita/x1/qres/lisp/make-qres.lisp" {10029C4C93}> NIL)
12891: (LOAD "./make-qres.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
12892: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LOAD "./make-qres.lisp" :VERBOSE NIL :PRINT NIL) #<NULL-LEXENV>)
12893: (EVAL (LOAD "./make-qres.lisp" :VERBOSE NIL :PRINT NIL))
12894: (SB-IMPL::%READ-PRESERVING-WHITESPACE #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> T NIL T)
12895: (READ #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> T NIL T)
12896: (SB-IMPL::READ-QUOTE #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> #<unavailable argument>)
12897: (SB-IMPL::READ-MAYBE-NOTHING #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> #\')
12898: (SB-IMPL::READ-LIST #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> #<unavailable argument>)
12899: (SB-IMPL::%READ-PRESERVING-WHITESPACE #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> T NIL T)
12900: (SB-IMPL::%READ-PRESERVING-WHITESPACE #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> T NIL NIL)
12901: (READ #<SB-IMPL::STRING-INPUT-STREAM {1002978393}> T NIL NIL)
12902: (SB-IMPL::%READ-FROM-STRING "(progn
#.(progn (in-package :cl-user) nil)
(in-package :cl-user)

'#.(load \"./make-qres.lisp\" :verbose nil :print nil))" T NIL 0 NIL NIL)
12903: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(progn
#.(progn (in-package :cl-user) nil)
(in-package :cl-user)

'#.(load \"./make-qres.lisp\" :verbose nil :print nil))")))
12904: (SB-IMPL::TOPLEVEL-INIT)
12905: ((FLET #:WITHOUT-INTERRUPTS-BODY-237753 :IN SB-EXT:SAVE-LISP-AND-DIE))
12906: ((LABELS SB-IMPL::RESTART-LISP :IN SB-EXT:SAVE-LISP-AND-DIE))

0] 
WARNING: Starting a poll(2) without a timeout while interrupts are disabled.