===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
sbcl-2.0.11/tagify.sh-3-
sbcl-2.0.11/tagify.sh:4:etags `find $PWD/src -name '*.lisp' -o -name '*.c' -o -name '*.h'`
##############################################
sbcl-2.0.11/sbcl-pwd.sh-8- cygwin)
sbcl-2.0.11/sbcl-pwd.sh:9: SBCL_PWD="`cygpath -m \"$(pwd)\"`" ;;
sbcl-2.0.11/sbcl-pwd.sh-10- msys)
##############################################
sbcl-2.0.11/src/assembly/x86/alloc.lisp-61- (case reg
sbcl-2.0.11/src/assembly/x86/alloc.lisp:62: ;; Now that we're using lisp asm code instead of a .S file
sbcl-2.0.11/src/assembly/x86/alloc.lisp-63- ;; this could be done more intelligently - the macro can decide
##############################################
sbcl-2.0.11/src/assembly/x86/alloc.lisp-101-
sbcl-2.0.11/src/assembly/x86/alloc.lisp:102:;;; #+SB-ASSEMBLING as we don't need VOPS, just the asm routines:
sbcl-2.0.11/src/assembly/x86/alloc.lisp-103-;;; these are out-of-line versions called by VOPs.
##############################################
sbcl-2.0.11/src/assembly/x86-64/arith.lisp-25-
sbcl-2.0.11/src/assembly/x86-64/arith.lisp:26:(defun static-fun-addr (name)
sbcl-2.0.11/src/assembly/x86-64/arith.lisp-27- #+immobile-code (make-fixup name :static-call)
##############################################
sbcl-2.0.11/src/assembly/ppc64/tramps.lisp-130- (inst mtctr r3) ; stash the result in a reg that won't be clobbered
sbcl-2.0.11/src/assembly/ppc64/tramps.lisp:131: ;; Reload a pointer to this asm routine
sbcl-2.0.11/src/assembly/ppc64/tramps.lisp-132- (inst addi lip null-tn (make-fixup 'alloc-tramp :asm-routine-nil-offset))
##############################################
sbcl-2.0.11/src/assembly/assemfile.lisp-58- ;; You might think one Lispword is aligned enough, but it isn't,
sbcl-2.0.11/src/assembly/assemfile.lisp:59: ;; because to created a tagged pointer to an asm routine,
sbcl-2.0.11/src/assembly/assemfile.lisp-60- ;; the base address must have all 0s in the tag bits.
##############################################
sbcl-2.0.11/src/assembly/assemfile.lisp-179- ;; without automatic insertion of the return sequence. This avoids some confusion
sbcl-2.0.11/src/assembly/assemfile.lisp:180: ;; on the part of the human reading the code, especially if the asm routine
sbcl-2.0.11/src/assembly/assemfile.lisp-181- ;; tail calls something else.
##############################################
sbcl-2.0.11/src/compiler/mips/insts.lisp-228- #'(lambda (value stream dstate)
sbcl-2.0.11/src/compiler/mips/insts.lisp:229: (let ((addr (ash value 2)))
sbcl-2.0.11/src/compiler/mips/insts.lisp-230- (cond (stream
##############################################
sbcl-2.0.11/src/compiler/mips/c-call.lisp-235- (:generator 2
sbcl-2.0.11/src/compiler/mips/c-call.lisp:236: (inst li addr (make-fixup foreign-symbol :foreign-dataref))
sbcl-2.0.11/src/compiler/mips/c-call.lisp-237- (loadw res addr)))
##############################################
sbcl-2.0.11/src/compiler/target-disassem.lisp-308- (print-unreadable-object (seg stream :type t)
sbcl-2.0.11/src/compiler/target-disassem.lisp:309: (let ((addr (sap-int (funcall (seg-sap-maker seg)))))
sbcl-2.0.11/src/compiler/target-disassem.lisp-310- (format stream "#X~X..~X[~W]~:[ (#X~X)~;~*~]~@[ in ~S~]"
sbcl-2.0.11/src/compiler/target-disassem.lisp:311: addr (+ addr (seg-length seg)) (seg-length seg)
sbcl-2.0.11/src/compiler/target-disassem.lisp-312- (= (seg-virtual-location seg) addr)
##############################################
sbcl-2.0.11/src/compiler/target-disassem.lisp-2236- (slot-offset (words-to-bytes (car field)))
sbcl-2.0.11/src/compiler/target-disassem.lisp:2237: (maybe-symbol-addr (- address slot-offset))
sbcl-2.0.11/src/compiler/target-disassem.lisp-2238- (maybe-symbol
##############################################
sbcl-2.0.11/src/compiler/target-disassem.lisp-2290- (end (+ start (1- (%code-text-size code)))))
sbcl-2.0.11/src/compiler/target-disassem.lisp:2291: (when (<= start address end) ; it has to be an asm routine
sbcl-2.0.11/src/compiler/target-disassem.lisp-2292- (let* ((offset (- address start))
##############################################
sbcl-2.0.11/src/compiler/target-disassem.lisp-2393- ;; in that the displacement is relative to the base of the code.
sbcl-2.0.11/src/compiler/target-disassem.lisp:2394: (let ((addr (+ location
sbcl-2.0.11/src/compiler/target-disassem.lisp-2395- #-(or x86-64 ppc64) sb-vm:other-pointer-lowtag)))
sbcl-2.0.11/src/compiler/target-disassem.lisp:2396: (values addr (ash addr (- sb-vm:word-shift)))))
sbcl-2.0.11/src/compiler/target-disassem.lisp-2397- (:absolute
##############################################
sbcl-2.0.11/src/compiler/target-disassem.lisp-2414- (when addr ; ADDR must be word-aligned to be sensible
sbcl-2.0.11/src/compiler/target-disassem.lisp:2415: (aver (not (logtest addr (ash sb-vm:lowtag-mask -1)))))
sbcl-2.0.11/src/compiler/target-disassem.lisp-2416- (let ((const (code-header-ref code index)))
##############################################
sbcl-2.0.11/src/compiler/target-disassem.lisp-2485- (type disassem-state dstate))
sbcl-2.0.11/src/compiler/target-disassem.lisp:2486: (binding* ((addr (+ sb-vm:nil-value nil-byte-offset))
sbcl-2.0.11/src/compiler/target-disassem.lisp-2487- ((obj validp) (make-lisp-obj addr nil)))
##############################################
sbcl-2.0.11/src/compiler/target-dstate.lisp-128-;;; Return the absolute address of the current instruction in DSTATE.
sbcl-2.0.11/src/compiler/target-dstate.lisp:129:(defun dstate-cur-addr (dstate)
sbcl-2.0.11/src/compiler/target-dstate.lisp-130- (the address (+ (seg-virtual-location (dstate-segment dstate))
##############################################
sbcl-2.0.11/src/compiler/target-dstate.lisp-133-;;; Return the absolute address of the next instruction in DSTATE.
sbcl-2.0.11/src/compiler/target-dstate.lisp:134:(defun dstate-next-addr (dstate)
sbcl-2.0.11/src/compiler/target-dstate.lisp-135- (the address (+ (seg-virtual-location (dstate-segment dstate))
##############################################
sbcl-2.0.11/src/compiler/riscv/c-call.lisp-178- ;; since compiling to file has to assume worst case.
sbcl-2.0.11/src/compiler/riscv/c-call.lisp:179: (inst li addr (make-fixup foreign-symbol :foreign-dataref))
sbcl-2.0.11/src/compiler/riscv/c-call.lisp-180- (loadw res addr)))
##############################################
sbcl-2.0.11/src/compiler/riscv/macros.lisp-645-
sbcl-2.0.11/src/compiler/riscv/macros.lisp:646:(defun load-alloc-end-addr (reg)
sbcl-2.0.11/src/compiler/riscv/macros.lisp-647- #-sb-thread
##############################################
sbcl-2.0.11/src/compiler/srctran.lisp-4279-
sbcl-2.0.11/src/compiler/srctran.lisp:4280:(define-source-transform caddr (list)
sbcl-2.0.11/src/compiler/srctran.lisp-4281- (or (source-transform-car list 2)
##############################################
sbcl-2.0.11/src/compiler/ppc/call.lisp-768- (insert-step-instrumenting name-pass)
sbcl-2.0.11/src/compiler/ppc/call.lisp:769: ;; The raw-addr (ENTRY-POINT) will be one of:
sbcl-2.0.11/src/compiler/ppc/call.lisp-770- ;; closure-tramp, undefined-tramp, or somewhere
##############################################
sbcl-2.0.11/src/compiler/ppc/c-call.lisp-388- (:generator 2
sbcl-2.0.11/src/compiler/ppc/c-call.lisp:389: (inst lr addr (make-fixup foreign-symbol :foreign-dataref))
sbcl-2.0.11/src/compiler/ppc/c-call.lisp-390- (loadw res addr)))
##############################################
sbcl-2.0.11/src/compiler/ppc/macros.lisp-22-
sbcl-2.0.11/src/compiler/ppc/macros.lisp:23:(defmacro load-asm-rtn-addr (reg name)
sbcl-2.0.11/src/compiler/ppc/macros.lisp:24: ;; Gencgc has asm code in static space and we can reference it relative to NIL.
sbcl-2.0.11/src/compiler/ppc/macros.lisp-25- #+gencgc `(inst addi ,reg null-tn (make-fixup ,name :asm-routine-nil-offset))
sbcl-2.0.11/src/compiler/ppc/macros.lisp:26: ;; Cheneygc has asm code in read-only space which is not within
sbcl-2.0.11/src/compiler/ppc/macros.lisp-27- ;; a sufficiently small displacement.
##############################################
sbcl-2.0.11/src/compiler/sparc/c-call.lisp-201- (:generator 2
sbcl-2.0.11/src/compiler/sparc/c-call.lisp:202: (inst li addr (make-fixup foreign-symbol :foreign-dataref))
sbcl-2.0.11/src/compiler/sparc/c-call.lisp-203- (loadw res addr)))
##############################################
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp-82- ;; final value.
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp:83: (let ((addr (+ immed-val (ash (cdr sethi) 10))))
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp-84- (or (note-code-constant addr dstate :absolute)
##############################################
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp-124- ;; final value.
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp:125: (let ((addr (+ immed-val (ash (cdr sethi) 10))))
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp-126- (maybe-note-assembler-routine addr t dstate)
##############################################
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp-143- (when sethi
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp:144: (let ((addr (+ immed-val (ash (cdr sethi) 10))))
sbcl-2.0.11/src/compiler/sparc/target-insts.lisp-145- (maybe-note-assembler-routine addr nil dstate)
##############################################
sbcl-2.0.11/src/compiler/early-c.lisp-122-;;; :pre-ir2-optimize and :symbolic-asm.
sbcl-2.0.11/src/compiler/early-c.lisp:123:(defvar *compile-trace-targets* '(:ir1 :ir2 :vop :symbolic-asm :disassemble))
sbcl-2.0.11/src/compiler/early-c.lisp-124-(defvar *constraint-universe*)
##############################################
sbcl-2.0.11/src/compiler/x86-64/cell.lisp-394- GOOD
sbcl-2.0.11/src/compiler/x86-64/cell.lisp:395: (inst and res (lognot fixnum-tag-mask)))) ; redundant (but ok) if asm routine used
sbcl-2.0.11/src/compiler/x86-64/cell.lisp-396-
##############################################
sbcl-2.0.11/src/compiler/x86-64/cell.lisp-729- ;; Returning fixnum/any-reg elides some REX prefixes due to the shifts
sbcl-2.0.11/src/compiler/x86-64/cell.lisp:730: ;; being small. Maybe the asm optimizer could figure it out now?
sbcl-2.0.11/src/compiler/x86-64/cell.lisp-731- (inst shr :dword res (- instance-length-shift n-fixnum-tag-bits))
##############################################
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-324- ;; Avoid the MAYBE-NOTE- calls if we can. A negative offset is never an
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp:325: ;; absolute address as would be used for asm routines and static symbols.
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-326- (or (minusp disp)
##############################################
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-341- (when (note-code-constant offs dstate) (return)))
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp:342: (let ((addr (+ disp (dstate-next-addr dstate))))
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-343- ;; The origin is zero when disassembling into a trace-file.
##############################################
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-369- (not base-reg) (not index-reg))
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp:370: (let* ((addr (+ disp (- 4) sb-vm:other-pointer-lowtag))
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-371- (symbol
##############################################
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-377- ((and (not base-reg) (not index-reg) disp)
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp:378: (let ((addr (+ disp ; guess that DISP points to a symbol-value slot
sbcl-2.0.11/src/compiler/x86-64/target-insts.lisp-379- (- (ash sb-vm:symbol-value-slot sb-vm:word-shift))
##############################################
sbcl-2.0.11/src/compiler/x86-64/macros.lisp-364- '((inst push value)
sbcl-2.0.11/src/compiler/x86-64/macros.lisp:365: ;; the asm routine wants a natural machine integer as the index,
sbcl-2.0.11/src/compiler/x86-64/macros.lisp-366- ;; but this macro declares the index arg as 'any-reg', so it has a tag bit,
##############################################
sbcl-2.0.11/src/compiler/disassem.lisp-34-;; and disassembler for other supported backends,
sbcl-2.0.11/src/compiler/disassem.lisp:35:;; if that backend has been converted to use a distinct ASM package.
sbcl-2.0.11/src/compiler/disassem.lisp-36-(eval-when (:compile-toplevel :load-toplevel :execute)
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-24- (recursive))
sbcl-2.0.11/src/compiler/aliencomp.lisp:25:(defknown %slot-addr (alien-value symbol) (alien (* t))
sbcl-2.0.11/src/compiler/aliencomp.lisp-26- (flushable movable recursive))
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-31- ())
sbcl-2.0.11/src/compiler/aliencomp.lisp:32:(defknown %deref-addr (alien-value &rest index) (alien (* t))
sbcl-2.0.11/src/compiler/aliencomp.lisp-33- (flushable movable))
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-38- ())
sbcl-2.0.11/src/compiler/aliencomp.lisp:39:(defknown %heap-alien-addr (heap-alien-info) (alien (* t))
sbcl-2.0.11/src/compiler/aliencomp.lisp-40- (flushable movable))
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-51- ())
sbcl-2.0.11/src/compiler/aliencomp.lisp:52:(defknown %local-alien-addr (local-alien-info t) (alien (* t))
sbcl-2.0.11/src/compiler/aliencomp.lisp-53- (flushable movable))
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-89-
sbcl-2.0.11/src/compiler/aliencomp.lisp:90:(deftransform %slot-addr ((object slot)
sbcl-2.0.11/src/compiler/aliencomp.lisp-91- ((alien (* t)) symbol))
sbcl-2.0.11/src/compiler/aliencomp.lisp:92: '(%slot-addr (deref object) slot))
sbcl-2.0.11/src/compiler/aliencomp.lisp-93-
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-161-
sbcl-2.0.11/src/compiler/aliencomp.lisp:162:(deftransform %slot-addr ((alien slot))
sbcl-2.0.11/src/compiler/aliencomp.lisp-163- (multiple-value-bind (slot-offset slot-type)
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-282-
sbcl-2.0.11/src/compiler/aliencomp.lisp:283:(deftransform %deref-addr ((alien &rest indices))
sbcl-2.0.11/src/compiler/aliencomp.lisp-284- (multiple-value-bind (indices-args offset-expr element-type)
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-335-
sbcl-2.0.11/src/compiler/aliencomp.lisp:336:(deftransform %heap-alien-addr ((info))
sbcl-2.0.11/src/compiler/aliencomp.lisp-337- (multiple-value-bind (sap type) (heap-alien-sap-and-type info)
##############################################
sbcl-2.0.11/src/compiler/aliencomp.lisp-423-
sbcl-2.0.11/src/compiler/aliencomp.lisp:424:(deftransform %local-alien-addr ((info var))
sbcl-2.0.11/src/compiler/aliencomp.lisp-425- (alien-info-constant-or-abort info)
##############################################
sbcl-2.0.11/src/compiler/ppc64/call.lisp-776- (insert-step-instrumenting name-pass)
sbcl-2.0.11/src/compiler/ppc64/call.lisp:777: ;; The raw-addr (ENTRY-POINT) will be one of:
sbcl-2.0.11/src/compiler/ppc64/call.lisp-778- ;; closure-tramp, undefined-tramp, or somewhere
##############################################
sbcl-2.0.11/src/compiler/ppc64/insts.lisp-303- #'(lambda (value stream dstate)
sbcl-2.0.11/src/compiler/ppc64/insts.lisp:304: (let ((addr (ash value 2)))
sbcl-2.0.11/src/compiler/ppc64/insts.lisp-305- (maybe-note-assembler-routine addr t dstate)
##############################################
sbcl-2.0.11/src/compiler/ppc64/c-call.lisp-176- (:generator 2
sbcl-2.0.11/src/compiler/ppc64/c-call.lisp:177: (inst lr addr (make-fixup foreign-symbol :foreign-dataref))
sbcl-2.0.11/src/compiler/ppc64/c-call.lisp-178- (loadw res addr)))
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-480- (let* ((lowtag (descriptor-lowtag des))
sbcl-2.0.11/src/compiler/generic/genesis.lisp:481: (abs-word-addr (ash (- (descriptor-bits des) lowtag)
sbcl-2.0.11/src/compiler/generic/genesis.lisp-482- (- sb-vm:word-shift))))
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-503- (setf (descriptor-word-offset des)
sbcl-2.0.11/src/compiler/generic/genesis.lisp:504: (- abs-word-addr (gspace-word-address gspace)))
sbcl-2.0.11/src/compiler/generic/genesis.lisp-505- (return (setf (descriptor-gspace des) gspace)))))))
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-1891-;;; Writing the address of the undefined trampoline into static fdefns
sbcl-2.0.11/src/compiler/generic/genesis.lisp:1892:;;; has to occur after the asm routines are loaded, which occurs after
sbcl-2.0.11/src/compiler/generic/genesis.lisp-1893-;;; the static fdefns are initialized.
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-1922-
sbcl-2.0.11/src/compiler/generic/genesis.lisp:1923:(defun cold-fun-entry-addr (fun)
sbcl-2.0.11/src/compiler/generic/genesis.lisp-1924- (aver (= (descriptor-lowtag fun) sb-vm:fun-pointer-lowtag))
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2125- (let* ((gspace-data (descriptor-mem code-object))
sbcl-2.0.11/src/compiler/generic/genesis.lisp:2126: (obj-start-addr (logandc2 (descriptor-bits code-object) sb-vm:lowtag-mask))
sbcl-2.0.11/src/compiler/generic/genesis.lisp:2127: (code-end-addr (+ obj-start-addr (code-object-size code-object)))
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2128- (gspace-base (gspace-byte-address (descriptor-gspace code-object)))
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2131- dynamic-core-space-id))
sbcl-2.0.11/src/compiler/generic/genesis.lisp:2132: (addr (+ value
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2133- (sb-vm::sign-extend (bvref-32 gspace-data gspace-byte-offset)
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2171- (:relative ; (used for arguments to X86 relative CALL instruction)
sbcl-2.0.11/src/compiler/generic/genesis.lisp:2172: (let ((diff (- addr (+ gspace-base gspace-byte-offset 4)))) ; 4 = size of rel32off
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2173- (setf (bvref-32 gspace-data gspace-byte-offset)
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2179- ;; Relative fixups are recorded if outside of the object.
sbcl-2.0.11/src/compiler/generic/genesis.lisp:2180: ;; Except that read-only space contains calls to asm routines,
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2181- ;; and we don't record those fixups.
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2192- (cold-fixup code offset
sbcl-2.0.11/src/compiler/generic/genesis.lisp:2193: (cold-fun-entry-addr (cold-symbol-function name))
sbcl-2.0.11/src/compiler/generic/genesis.lisp-2194- kind :static-call))))
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3002- #+sb-safepoint
sbcl-2.0.11/src/compiler/generic/genesis.lisp:3003: (format t "#define GC_SAFEPOINT_PAGE_ADDR ((void*)0x~XUL) /* ~:*~A */~%"
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3004- sb-vm:gc-safepoint-page-addr)
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3005- #+sb-safepoint
sbcl-2.0.11/src/compiler/generic/genesis.lisp:3006: (format t "#define GC_SAFEPOINT_TRAP_ADDR ((void*)0x~XUL) /* ~:*~A */~%"
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3007- (+ sb-vm:gc-safepoint-page-addr
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3148- (write-cast-operator name c-name lowtag)))
sbcl-2.0.11/src/compiler/generic/genesis.lisp:3149: (output-asm ()
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3150- (format t "/* These offsets are SLOT-OFFSET * N-WORD-BYTES - LOWTAG~%")
##############################################
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3367- (descriptor (cold-layout-descriptor proxy))
sbcl-2.0.11/src/compiler/generic/genesis.lisp:3368: (addr (descriptor-bits descriptor)))
sbcl-2.0.11/src/compiler/generic/genesis.lisp-3369- (format t "~10,'0X: ~8d ~2D ~5D ~S [~D]~%"
##############################################
sbcl-2.0.11/src/compiler/generic/utils.lisp-79-;;; Return absolute address of the 'fun' slot in static fdefn NAME.
sbcl-2.0.11/src/compiler/generic/utils.lisp:80:(defun static-fdefn-fun-addr (name)
sbcl-2.0.11/src/compiler/generic/utils.lisp-81- (+ nil-value
##############################################
sbcl-2.0.11/src/compiler/generic/target-core.lisp-42- (t
sbcl-2.0.11/src/compiler/generic/target-core.lisp:43: (let ((addr (get-lisp-obj-address fun)))
sbcl-2.0.11/src/compiler/generic/target-core.lisp-44- (sap-ref-word (int-sap addr)
##############################################
sbcl-2.0.11/src/compiler/assem.lisp-1353-
sbcl-2.0.11/src/compiler/assem.lisp:1354:(defun dump-symbolic-asm (section stream &aux last-vop all-labels (n 0))
sbcl-2.0.11/src/compiler/assem.lisp-1355- (format stream "~2&Assembler input:~%")
##############################################
sbcl-2.0.11/src/compiler/assem.lisp-1429- (when (and sb-c::*compiler-trace-output*
sbcl-2.0.11/src/compiler/assem.lisp:1430: (memq :symbolic-asm sb-c::*compile-trace-targets*))
sbcl-2.0.11/src/compiler/assem.lisp:1431: (dump-symbolic-asm section sb-c::*compiler-trace-output*))
sbcl-2.0.11/src/compiler/assem.lisp-1432- (do ((statement (stmt-next (section-start section)) (stmt-next statement)))
##############################################
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-45-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c:46:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-47-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-74-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c:75:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-76-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-80-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c:81:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-82-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-86-sigset_t *
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c:87:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-88-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-102-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c:103:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-sunos-os.c-104-{
##############################################
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-38-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-darwin-os.c:39:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-40-{
##############################################
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-118-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-darwin-os.c:119:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-120-{
##############################################
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-124-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-darwin-os.c:125:os_context_ctr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-126-{
##############################################
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-130-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-darwin-os.c:131:os_context_cr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-132-{
##############################################
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-136-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-darwin-os.c:137:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-darwin-os.c-138-{
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-26-
sbcl-2.0.11/src/runtime/sparc-arch.c:27:os_vm_address_t arch_get_bad_addr(int sig, siginfo_t *code, os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-arch.c-28-{
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-35-
sbcl-2.0.11/src/runtime/sparc-arch.c:36: pc = (unsigned int *)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/sparc-arch.c-37-
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-68- return (os_vm_address_t)
sbcl-2.0.11/src/runtime/sparc-arch.c:69: (*os_context_register_addr(context, rs1)+simm13);
sbcl-2.0.11/src/runtime/sparc-arch.c-70- }
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-75- return (os_vm_address_t)
sbcl-2.0.11/src/runtime/sparc-arch.c:76: (*os_context_register_addr(context, rs1) +
sbcl-2.0.11/src/runtime/sparc-arch.c:77: *os_context_register_addr(context, rs2));
sbcl-2.0.11/src/runtime/sparc-arch.c-78- }
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-83-{
sbcl-2.0.11/src/runtime/sparc-arch.c:84: *os_context_pc_addr(context) = *os_context_npc_addr(context);
sbcl-2.0.11/src/runtime/sparc-arch.c-85- /* Note that we're doing integer arithmetic here, not pointer. So
sbcl-2.0.11/src/runtime/sparc-arch.c:86: * the value that the return value of os_context_npc_addr() points
sbcl-2.0.11/src/runtime/sparc-arch.c-87- * to will be incremented by 4, not 16.
sbcl-2.0.11/src/runtime/sparc-arch.c-88- */
sbcl-2.0.11/src/runtime/sparc-arch.c:89: *os_context_npc_addr(context) += 4;
sbcl-2.0.11/src/runtime/sparc-arch.c-90-}
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-93-{
sbcl-2.0.11/src/runtime/sparc-arch.c:94: return (unsigned char *)(*os_context_pc_addr(context) + 4);
sbcl-2.0.11/src/runtime/sparc-arch.c-95-}
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-109- return (!foreign_function_call_active)
sbcl-2.0.11/src/runtime/sparc-arch.c:110: && ((*os_context_register_addr(context,reg_ALLOC)) & 4);
sbcl-2.0.11/src/runtime/sparc-arch.c-111-}
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-114-{
sbcl-2.0.11/src/runtime/sparc-arch.c:115: *os_context_register_addr(context,reg_ALLOC) |= 1;
sbcl-2.0.11/src/runtime/sparc-arch.c-116-}
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-119-{
sbcl-2.0.11/src/runtime/sparc-arch.c:120: *os_context_register_addr(context,reg_ALLOC) &= ~1;
sbcl-2.0.11/src/runtime/sparc-arch.c-121-}
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-160-{
sbcl-2.0.11/src/runtime/sparc-arch.c:161: unsigned int *pc = (unsigned int *)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/sparc-arch.c:162: unsigned int *npc = (unsigned int *)(*os_context_npc_addr(context));
sbcl-2.0.11/src/runtime/sparc-arch.c-163-
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-184-
sbcl-2.0.11/src/runtime/sparc-arch.c:185: pc = (unsigned int*) *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/sparc-arch.c-186- badinst = *pc;
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-223-{
sbcl-2.0.11/src/runtime/sparc-arch.c:224: *os_context_pc_addr(context) = (int) handle_fun_end_breakpoint(context);
sbcl-2.0.11/src/runtime/sparc-arch.c:225: *os_context_npc_addr(context) = *os_context_pc_addr(context) + 4;
sbcl-2.0.11/src/runtime/sparc-arch.c-226-}
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-233- skipped_break_addr = NULL;
sbcl-2.0.11/src/runtime/sparc-arch.c:234: *(unsigned long *) os_context_pc_addr(context) = displaced_after_inst;
sbcl-2.0.11/src/runtime/sparc-arch.c-235- /* context->sigmask = orig_sigmask; */
sbcl-2.0.11/src/runtime/sparc-arch.c:236: os_flush_icache((os_vm_address_t) os_context_pc_addr(context), sizeof(unsigned int));
sbcl-2.0.11/src/runtime/sparc-arch.c-237-}
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-241-{
sbcl-2.0.11/src/runtime/sparc-arch.c:242: unsigned int code = *((uint32_t *)(*os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/sparc-arch.c-243- int register_offset = code >> 8 & 0x1f;
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-261-
sbcl-2.0.11/src/runtime/sparc-arch.c:262: pc = (unsigned int*) *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/sparc-arch.c-263- or_inst = pc[-1];
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-283- else
sbcl-2.0.11/src/runtime/sparc-arch.c:284: size = *os_context_register_addr(context, or_inst & 0x1f);
sbcl-2.0.11/src/runtime/sparc-arch.c-285- boxed_region_rollback(size);
##############################################
sbcl-2.0.11/src/runtime/sparc-arch.c-300-
sbcl-2.0.11/src/runtime/sparc-arch.c:301: *os_context_register_addr(context, rs1) = (lispobj)memory;
sbcl-2.0.11/src/runtime/sparc-arch.c-302- arch_skip_instruction(context);
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.h-44-static inline unsigned int *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.h:45:arch_os_context_mxcsr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.h-46-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.h-59-static inline unsigned int *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.h:60:arch_os_context_mxcsr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.h-61-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-44-int *
sbcl-2.0.11/src/runtime/x86-bsd-os.c:45:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-bsd-os.c-46-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-69-int *
sbcl-2.0.11/src/runtime/x86-bsd-os.c:70:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-bsd-os.c-71-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-75-int *
sbcl-2.0.11/src/runtime/x86-bsd-os.c:76:os_context_fp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-bsd-os.c-77-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-84-int *
sbcl-2.0.11/src/runtime/x86-bsd-os.c:85:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-bsd-os.c-86-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-111-int *
sbcl-2.0.11/src/runtime/x86-bsd-os.c:112:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-bsd-os.c-113-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-118-
sbcl-2.0.11/src/runtime/x86-bsd-os.c:119:int *os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-bsd-os.c-120-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-157-
sbcl-2.0.11/src/runtime/x86-bsd-os.c:158:void set_data_desc_addr(struct segment_descriptor* desc, void* addr)
sbcl-2.0.11/src/runtime/x86-bsd-os.c-159-{
##############################################
sbcl-2.0.11/src/runtime/x86-bsd-os.c-187-
sbcl-2.0.11/src/runtime/x86-bsd-os.c:188: set_data_desc_addr(&ldt_entry, thread);
sbcl-2.0.11/src/runtime/x86-bsd-os.c-189- set_data_desc_size(&ldt_entry, dynamic_values_bytes);
##############################################
sbcl-2.0.11/src/runtime/x86-lispregs.h-4- * POSIX signal context structure os_context_t via the
sbcl-2.0.11/src/runtime/x86-lispregs.h:5: * os_context_register_addr(..) OS-dependent function.
sbcl-2.0.11/src/runtime/x86-lispregs.h-6- */
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-48-
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:49: asm volatile ("mov %%gs:8,%0": "=r" (cur_stack_end));
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-50-
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-90-#if defined(LISP_FEATURE_SB_THREAD)
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:91:sigset_t *os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-92-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-97-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:98:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-99-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-123-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:124:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-125-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-129-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:130:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-131-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-135-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:136:os_context_fp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-137-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-150-{
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:151: asm ("fldcw %0" : : "m" (context->win32_context->FloatSave.ControlWord));
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-152-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-154-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-win32-os.c:155:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-win32-os.c-156-{
##############################################
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-48-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-sunos-os.c:49:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-50-{
##############################################
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-67-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-sunos-os.c:68:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-69-{
##############################################
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-73-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-sunos-os.c:74:os_context_npc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-75-{
##############################################
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-79-sigset_t *
sbcl-2.0.11/src/runtime/sparc-sunos-os.c:80:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-sunos-os.c-81-{
##############################################
sbcl-2.0.11/src/runtime/parse.c-174-
sbcl-2.0.11/src/runtime/parse.c:175:int parse_addr(char **ptr, boolean safely, char **output)
sbcl-2.0.11/src/runtime/parse.c-176-{
##############################################
sbcl-2.0.11/src/runtime/parse.c-297-
sbcl-2.0.11/src/runtime/parse.c:298: result = *os_context_register_addr(context, regnum);
sbcl-2.0.11/src/runtime/parse.c-299- } else if (!lookup_variable(token+1, &result)) {
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-209- ("Received signal %d @ %lx in non-lisp"THREAD_ID_LABEL", resignaling to a lisp thread.",
sbcl-2.0.11/src/runtime/interrupt.c:210: signal, *os_context_pc_addr(context), THREAD_ID_VALUE);
sbcl-2.0.11/src/runtime/interrupt.c-211-#else
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-230- // this thread's handler for signals that we don't want it to handle.
sbcl-2.0.11/src/runtime/interrupt.c:231: sigmask_logior(os_context_sigmask_addr(context), &sigset);
sbcl-2.0.11/src/runtime/interrupt.c-232- kill(getpid(), signal);
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-307-{
sbcl-2.0.11/src/runtime/interrupt.c:308: event3("sig%d @%p in %d", sig, (void*)*os_context_pc_addr(context),
sbcl-2.0.11/src/runtime/interrupt.c-309- (int)arch_os_get_current_thread()->os_kernel_tid);
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-604-#if !defined(LISP_FEATURE_WIN32) || defined(LISP_FEATURE_SB_THREAD)
sbcl-2.0.11/src/runtime/interrupt.c:605: sigset_t *sigset = os_context_sigmask_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-606-#ifndef LISP_FEATURE_SB_SAFEPOINT
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-702- int interrupt_pending = (read_TLS(INTERRUPT_PENDING,thread) != NIL);
sbcl-2.0.11/src/runtime/interrupt.c:703: sigset_t *sigset = os_context_sigmask_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-704- /* On PPC pseudo_atomic_interrupted is cleared when coming out of
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-789- (lispobj *)(uword_t)
sbcl-2.0.11/src/runtime/interrupt.c:790: (*os_context_register_addr(context, reg_CSP));
sbcl-2.0.11/src/runtime/interrupt.c-791- if ((lispobj *)(uword_t)
sbcl-2.0.11/src/runtime/interrupt.c:792: (*os_context_register_addr(context, reg_CFP))
sbcl-2.0.11/src/runtime/interrupt.c-793- == access_control_frame_pointer(th)) {
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-795- * frame isn't built yet. */
sbcl-2.0.11/src/runtime/interrupt.c:796: if (functionp(*os_context_register_addr(context, reg_CODE))) {
sbcl-2.0.11/src/runtime/interrupt.c-797- /* We have called, but not built the new frame, so
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-799- access_control_frame_pointer(th)[0] =
sbcl-2.0.11/src/runtime/interrupt.c:800: *os_context_register_addr(context, reg_OCFP);
sbcl-2.0.11/src/runtime/interrupt.c-801- access_control_frame_pointer(th)[1] =
sbcl-2.0.11/src/runtime/interrupt.c:802: *os_context_register_addr(context, reg_LRA);
sbcl-2.0.11/src/runtime/interrupt.c-803- access_control_frame_pointer(th) += 2;
sbcl-2.0.11/src/runtime/interrupt.c-804- /* Build our frame on top of it. */
sbcl-2.0.11/src/runtime/interrupt.c:805: oldcont = (lispobj)(*os_context_register_addr(context, reg_CFP));
sbcl-2.0.11/src/runtime/interrupt.c-806- }
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-809- * partial frame wasn't there. */
sbcl-2.0.11/src/runtime/interrupt.c:810: oldcont = (lispobj)(*os_context_register_addr(context, reg_OCFP));
sbcl-2.0.11/src/runtime/interrupt.c-811- }
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-817- access_control_frame_pointer(th) =
sbcl-2.0.11/src/runtime/interrupt.c:818: (lispobj *)(uword_t) (*os_context_register_addr(context, reg_CSP));
sbcl-2.0.11/src/runtime/interrupt.c-819-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-825- /* normal case */
sbcl-2.0.11/src/runtime/interrupt.c:826: oldcont = (lispobj)(*os_context_register_addr(context, reg_CFP));
sbcl-2.0.11/src/runtime/interrupt.c-827- }
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-833- access_control_frame_pointer(th)[2] =
sbcl-2.0.11/src/runtime/interrupt.c:834: (lispobj)(*os_context_register_addr(context, reg_CODE));
sbcl-2.0.11/src/runtime/interrupt.c-835-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-851-#endif
sbcl-2.0.11/src/runtime/interrupt.c:852: (*os_context_register_addr(context, reg_ALLOC));
sbcl-2.0.11/src/runtime/interrupt.c-853-/* fprintf(stderr,"dynamic_space_free_pointer: %p\n", */
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-862- set_binding_stack_pointer(thread,
sbcl-2.0.11/src/runtime/interrupt.c:863: *os_context_register_addr(context, reg_BSP));
sbcl-2.0.11/src/runtime/interrupt.c-864-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-933- /* Put the dynamic space free pointer back into the context. */
sbcl-2.0.11/src/runtime/interrupt.c:934: *os_context_register_addr(context, reg_ALLOC) =
sbcl-2.0.11/src/runtime/interrupt.c-935- (uword_t) dynamic_space_free_pointer
sbcl-2.0.11/src/runtime/interrupt.c:936: | (*os_context_register_addr(context, reg_ALLOC)
sbcl-2.0.11/src/runtime/interrupt.c-937- & LOWTAG_MASK);
sbcl-2.0.11/src/runtime/interrupt.c-938- /*
sbcl-2.0.11/src/runtime/interrupt.c:939: ((uword_t)(*os_context_register_addr(context, reg_ALLOC))
sbcl-2.0.11/src/runtime/interrupt.c-940- & ~LOWTAG_MASK)
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-947- * pointer for ROOM). */
sbcl-2.0.11/src/runtime/interrupt.c:948: *os_context_register_addr(context, reg_ALLOC) =
sbcl-2.0.11/src/runtime/interrupt.c-949- (uword_t) dynamic_space_free_pointer
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-972-
sbcl-2.0.11/src/runtime/interrupt.c:973: thread_sigmask(SIG_SETMASK, os_context_sigmask_addr(context), 0);
sbcl-2.0.11/src/runtime/interrupt.c-974-
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1061-#ifndef LISP_FEATURE_WIN32
sbcl-2.0.11/src/runtime/interrupt.c:1062: sigcopyset(os_context_sigmask_addr(context), &data->pending_mask);
sbcl-2.0.11/src/runtime/interrupt.c-1063-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1166- /* Restore the sigmask in the context. */
sbcl-2.0.11/src/runtime/interrupt.c:1167: sigcopyset(os_context_sigmask_addr(context), &data->pending_mask);
sbcl-2.0.11/src/runtime/interrupt.c-1168- run_deferred_handler(data, context);
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1287- * the handler returns */
sbcl-2.0.11/src/runtime/interrupt.c:1288: sigcopyset(&data->pending_mask, os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c:1289: sigaddset_deferrable(os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1290-}
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1380- maybe_save_gc_mask_and_block_deferrables
sbcl-2.0.11/src/runtime/interrupt.c:1381: (os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1382- return;
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1412- struct interrupt_data *interrupt_data = &thread_interrupt_data(thread);
sbcl-2.0.11/src/runtime/interrupt.c:1413: sigcopyset(os_context_sigmask_addr(context), &interrupt_data->pending_mask);
sbcl-2.0.11/src/runtime/interrupt.c-1414- interrupt_data->gc_blocked_deferrables = 0;
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1467- corruption_warning_and_maybe_lose("Signal %d received (PC: %p)", signal,
sbcl-2.0.11/src/runtime/interrupt.c:1468: *os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1469-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1479-#if (defined(LISP_FEATURE_X86) || defined(LISP_FEATURE_X86_64))
sbcl-2.0.11/src/runtime/interrupt.c:1480:extern int *context_eflags_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/interrupt.c-1481-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1493- check_gc_signals_unblocked_or_lose
sbcl-2.0.11/src/runtime/interrupt.c:1494: (os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1495-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1542-#ifndef LISP_FEATURE_DARWIN
sbcl-2.0.11/src/runtime/interrupt.c:1543: uint32_t *sp=(uint32_t *)*os_context_register_addr(context,reg_ESP);
sbcl-2.0.11/src/runtime/interrupt.c-1544-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1549- FSHOW_SIGNAL((stderr, "/arrange_return_to_lisp_function: preparing to go to function %x, sp: %x\n", function,
sbcl-2.0.11/src/runtime/interrupt.c:1550: *os_context_register_addr(context,reg_ESP)));
sbcl-2.0.11/src/runtime/interrupt.c-1551- FSHOW_SIGNAL((stderr, "/arrange_return_to_lisp_function: context: %x, &context %x\n", context, &context));
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1561-
sbcl-2.0.11/src/runtime/interrupt.c:1562: *register_save_area = *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-1563- *(register_save_area + 1) = function;
sbcl-2.0.11/src/runtime/interrupt.c:1564: *(register_save_area + 2) = *os_context_register_addr(context,reg_EDI);
sbcl-2.0.11/src/runtime/interrupt.c:1565: *(register_save_area + 3) = *os_context_register_addr(context,reg_ESI);
sbcl-2.0.11/src/runtime/interrupt.c:1566: *(register_save_area + 4) = *os_context_register_addr(context,reg_EDX);
sbcl-2.0.11/src/runtime/interrupt.c:1567: *(register_save_area + 5) = *os_context_register_addr(context,reg_ECX);
sbcl-2.0.11/src/runtime/interrupt.c:1568: *(register_save_area + 6) = *os_context_register_addr(context,reg_EBX);
sbcl-2.0.11/src/runtime/interrupt.c:1569: *(register_save_area + 7) = *os_context_register_addr(context,reg_EAX);
sbcl-2.0.11/src/runtime/interrupt.c:1570: *(register_save_area + 8) = *context_eflags_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-1571-
sbcl-2.0.11/src/runtime/interrupt.c:1572: *os_context_pc_addr(context) =
sbcl-2.0.11/src/runtime/interrupt.c-1573- (os_context_register_t) funptr;
sbcl-2.0.11/src/runtime/interrupt.c:1574: *os_context_register_addr(context,reg_ECX) =
sbcl-2.0.11/src/runtime/interrupt.c-1575- (os_context_register_t) register_save_area;
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1583- /* this order matches that used in POPAD */
sbcl-2.0.11/src/runtime/interrupt.c:1584: *(sp-11)=*os_context_register_addr(context,reg_EDI);
sbcl-2.0.11/src/runtime/interrupt.c:1585: *(sp-10)=*os_context_register_addr(context,reg_ESI);
sbcl-2.0.11/src/runtime/interrupt.c-1586-
sbcl-2.0.11/src/runtime/interrupt.c:1587: *(sp-9)=*os_context_register_addr(context,reg_ESP)-8;
sbcl-2.0.11/src/runtime/interrupt.c-1588- /* POPAD ignores the value of ESP: */
sbcl-2.0.11/src/runtime/interrupt.c-1589- *(sp-8)=0;
sbcl-2.0.11/src/runtime/interrupt.c:1590: *(sp-7)=*os_context_register_addr(context,reg_EBX);
sbcl-2.0.11/src/runtime/interrupt.c-1591-
sbcl-2.0.11/src/runtime/interrupt.c:1592: *(sp-6)=*os_context_register_addr(context,reg_EDX);
sbcl-2.0.11/src/runtime/interrupt.c:1593: *(sp-5)=*os_context_register_addr(context,reg_ECX);
sbcl-2.0.11/src/runtime/interrupt.c:1594: *(sp-4)=*os_context_register_addr(context,reg_EAX);
sbcl-2.0.11/src/runtime/interrupt.c:1595: *(sp-3)=*context_eflags_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c:1596: *(sp-2)=*os_context_register_addr(context,reg_EBP);
sbcl-2.0.11/src/runtime/interrupt.c:1597: *(sp-1)=*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-1598-
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1601-#elif defined(LISP_FEATURE_X86_64)
sbcl-2.0.11/src/runtime/interrupt.c:1602: uword_t *sp=(uword_t *)*os_context_register_addr(context,reg_RSP);
sbcl-2.0.11/src/runtime/interrupt.c-1603-
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1606-
sbcl-2.0.11/src/runtime/interrupt.c:1607: *(sp-17)=*os_context_register_addr(context,reg_R15);
sbcl-2.0.11/src/runtime/interrupt.c:1608: *(sp-16)=*os_context_register_addr(context,reg_R14);
sbcl-2.0.11/src/runtime/interrupt.c:1609: *(sp-15)=*os_context_register_addr(context,reg_R13);
sbcl-2.0.11/src/runtime/interrupt.c:1610: *(sp-14)=*os_context_register_addr(context,reg_R12);
sbcl-2.0.11/src/runtime/interrupt.c:1611: *(sp-13)=*os_context_register_addr(context,reg_R11);
sbcl-2.0.11/src/runtime/interrupt.c:1612: *(sp-12)=*os_context_register_addr(context,reg_R10);
sbcl-2.0.11/src/runtime/interrupt.c:1613: *(sp-11)=*os_context_register_addr(context,reg_R9);
sbcl-2.0.11/src/runtime/interrupt.c:1614: *(sp-10)=*os_context_register_addr(context,reg_R8);
sbcl-2.0.11/src/runtime/interrupt.c:1615: *(sp-9)=*os_context_register_addr(context,reg_RDI);
sbcl-2.0.11/src/runtime/interrupt.c:1616: *(sp-8)=*os_context_register_addr(context,reg_RSI);
sbcl-2.0.11/src/runtime/interrupt.c-1617- /* skip RBP and RSP */
sbcl-2.0.11/src/runtime/interrupt.c:1618: *(sp-7)=*os_context_register_addr(context,reg_RBX);
sbcl-2.0.11/src/runtime/interrupt.c:1619: *(sp-6)=*os_context_register_addr(context,reg_RDX);
sbcl-2.0.11/src/runtime/interrupt.c:1620: *(sp-5)=*os_context_register_addr(context,reg_RCX);
sbcl-2.0.11/src/runtime/interrupt.c:1621: *(sp-4)=*os_context_register_addr(context,reg_RAX);
sbcl-2.0.11/src/runtime/interrupt.c:1622: *(sp-3)=*context_eflags_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c:1623: *(sp-2)=*os_context_register_addr(context,reg_RBP);
sbcl-2.0.11/src/runtime/interrupt.c:1624: *(sp-1)=*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-1625-
sbcl-2.0.11/src/runtime/interrupt.c:1626: *os_context_register_addr(context,reg_RDI) =
sbcl-2.0.11/src/runtime/interrupt.c-1627- (os_context_register_t)function; /* function */
sbcl-2.0.11/src/runtime/interrupt.c:1628: *os_context_register_addr(context,reg_RSI) = 0; /* arg. array */
sbcl-2.0.11/src/runtime/interrupt.c:1629: *os_context_register_addr(context,reg_RDX) = 0; /* no. args */
sbcl-2.0.11/src/runtime/interrupt.c-1630-#else
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1637-#if !defined(LISP_FEATURE_DARWIN)
sbcl-2.0.11/src/runtime/interrupt.c:1638: *os_context_pc_addr(context) = (os_context_register_t)funptr;
sbcl-2.0.11/src/runtime/interrupt.c:1639: *os_context_register_addr(context,reg_ECX) = 0;
sbcl-2.0.11/src/runtime/interrupt.c:1640: *os_context_register_addr(context,reg_EBP) = (os_context_register_t)(sp-2);
sbcl-2.0.11/src/runtime/interrupt.c-1641-#ifdef __NetBSD__
sbcl-2.0.11/src/runtime/interrupt.c:1642: *os_context_register_addr(context,reg_UESP) =
sbcl-2.0.11/src/runtime/interrupt.c-1643- (os_context_register_t)(sp-15);
sbcl-2.0.11/src/runtime/interrupt.c-1644-#else
sbcl-2.0.11/src/runtime/interrupt.c:1645: *os_context_register_addr(context,reg_ESP) = (os_context_register_t)(sp-15);
sbcl-2.0.11/src/runtime/interrupt.c-1646-#endif /* __NETBSD__ */
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1649-#elif defined(LISP_FEATURE_X86_64)
sbcl-2.0.11/src/runtime/interrupt.c:1650: *os_context_pc_addr(context) = (os_context_register_t)funptr;
sbcl-2.0.11/src/runtime/interrupt.c:1651: *os_context_register_addr(context,reg_RCX) = 0;
sbcl-2.0.11/src/runtime/interrupt.c:1652: *os_context_register_addr(context,reg_RBP) = (os_context_register_t)(sp-2);
sbcl-2.0.11/src/runtime/interrupt.c:1653: *os_context_register_addr(context,reg_RSP) = (os_context_register_t)(sp-18);
sbcl-2.0.11/src/runtime/interrupt.c-1654-#else
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1656- non-x86 ports */
sbcl-2.0.11/src/runtime/interrupt.c:1657: *os_context_pc_addr(context) = (os_context_register_t)(unsigned long)code;
sbcl-2.0.11/src/runtime/interrupt.c:1658: *os_context_register_addr(context,reg_NARGS) = 0;
sbcl-2.0.11/src/runtime/interrupt.c-1659-#ifdef reg_LIP
sbcl-2.0.11/src/runtime/interrupt.c:1660: *os_context_register_addr(context,reg_LIP) =
sbcl-2.0.11/src/runtime/interrupt.c-1661- (os_context_register_t)(unsigned long)code;
sbcl-2.0.11/src/runtime/interrupt.c-1662-#endif
sbcl-2.0.11/src/runtime/interrupt.c:1663: *os_context_register_addr(context,reg_CFP) =
sbcl-2.0.11/src/runtime/interrupt.c-1664- (os_context_register_t)(unsigned long)access_control_frame_pointer(th);
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1666-#ifdef ARCH_HAS_NPC_REGISTER
sbcl-2.0.11/src/runtime/interrupt.c:1667: *os_context_npc_addr(context) =
sbcl-2.0.11/src/runtime/interrupt.c:1668: 4 + *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-1669-#endif
sbcl-2.0.11/src/runtime/interrupt.c-1670-#if defined(LISP_FEATURE_SPARC) || defined(LISP_FEATURE_ARM) || defined(LISP_FEATURE_ARM64) || defined(LISP_FEATURE_RISCV)
sbcl-2.0.11/src/runtime/interrupt.c:1671: *os_context_register_addr(context,reg_CODE) =
sbcl-2.0.11/src/runtime/interrupt.c-1672- (os_context_register_t)((char*)fun + FUN_POINTER_LOWTAG);
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1730- lose("Control stack exhausted, fault: %p, PC: %p",
sbcl-2.0.11/src/runtime/interrupt.c:1731: addr, (void*)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1732- }
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1741- lose("Control stack exhausted with gc_active_p, fault: %p, PC: %p",
sbcl-2.0.11/src/runtime/interrupt.c:1742: addr, (void*)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1743- }
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1746- lose("Control stack exhausted while pseudo-atomic, fault: %p, PC: %p",
sbcl-2.0.11/src/runtime/interrupt.c:1747: addr, (void*)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1748- }
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1751- lose("Control stack exhausted, fault: %p, PC: %p",
sbcl-2.0.11/src/runtime/interrupt.c:1752: addr, (void*)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-1753- }
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-1997-#ifdef ARCH_HAS_STACK_POINTER
sbcl-2.0.11/src/runtime/interrupt.c:1998: char* pc = (char*)*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-1999- struct code* code = (struct code*)component_ptr_from_pc(pc);
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-2005- os_context_frame_pointer(context),
sbcl-2.0.11/src/runtime/interrupt.c:2006: *os_context_sp_addr(context), THREAD_ID_VALUE);
sbcl-2.0.11/src/runtime/interrupt.c-2007- else
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-2010- addr, pc, os_context_frame_pointer(context),
sbcl-2.0.11/src/runtime/interrupt.c:2011: *os_context_sp_addr(context), THREAD_ID_VALUE);
sbcl-2.0.11/src/runtime/interrupt.c-2012-#else
sbcl-2.0.11/src/runtime/interrupt.c-2013- corruption_warning_and_maybe_lose("Memory fault at %p (pc=%p)",
sbcl-2.0.11/src/runtime/interrupt.c:2014: addr, *os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/interrupt.c-2015-#endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-2042- undo_fake_foreign_function_call(context);
sbcl-2.0.11/src/runtime/interrupt.c:2043: void **sp = (void **)*os_context_sp_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c:2044: *--sp = (void *)*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-2045- *--sp = addr;
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-2047- /* KLUDGE: x86-linux sp_addr doesn't affect the CPU on return */
sbcl-2.0.11/src/runtime/interrupt.c:2048: *((void **)os_context_register_addr(context, reg_ESP)) = sp;
sbcl-2.0.11/src/runtime/interrupt.c-2049-# else
sbcl-2.0.11/src/runtime/interrupt.c:2050: *((void **)os_context_sp_addr(context)) = sp;
sbcl-2.0.11/src/runtime/interrupt.c-2051-# endif
sbcl-2.0.11/src/runtime/interrupt.c:2052: *os_context_pc_addr(context) =
sbcl-2.0.11/src/runtime/interrupt.c-2053- (os_context_register_t)memory_fault_emulation_trap;
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-2063-{
sbcl-2.0.11/src/runtime/interrupt.c:2064: void **sp = (void **)*os_context_sp_addr(context);
sbcl-2.0.11/src/runtime/interrupt.c-2065- void *addr = *sp++;
sbcl-2.0.11/src/runtime/interrupt.c:2066: *os_context_pc_addr(context) = (os_context_register_t)*sp++;
sbcl-2.0.11/src/runtime/interrupt.c-2067-# ifdef LISP_FEATURE_X86
sbcl-2.0.11/src/runtime/interrupt.c-2068- /* KLUDGE: x86-linux sp_addr doesn't affect the CPU on return */
sbcl-2.0.11/src/runtime/interrupt.c:2069: *((void **)os_context_register_addr(context, reg_ESP)) = sp;
sbcl-2.0.11/src/runtime/interrupt.c-2070-# else
sbcl-2.0.11/src/runtime/interrupt.c:2071: *os_context_sp_addr(context) = (os_context_register_t)sp;
sbcl-2.0.11/src/runtime/interrupt.c-2072-# endif
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-2077-
sbcl-2.0.11/src/runtime/interrupt.c:2078: thread_sigmask(SIG_SETMASK, os_context_sigmask_addr(context), 0);
sbcl-2.0.11/src/runtime/interrupt.c-2079-
##############################################
sbcl-2.0.11/src/runtime/interrupt.c-2093-
sbcl-2.0.11/src/runtime/interrupt.c:2094: thread_sigmask(SIG_SETMASK, os_context_sigmask_addr(context), 0);
sbcl-2.0.11/src/runtime/interrupt.c-2095-
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.h-8-
sbcl-2.0.11/src/runtime/ppc-arch.h:9:os_context_register_t *os_context_ctr_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/ppc-arch.h:10:os_context_register_t *os_context_cr_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/ppc-arch.h-11-
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-65-os_vm_address_t
sbcl-2.0.11/src/runtime/ppc-arch.c:66:arch_get_bad_addr(int sig, siginfo_t *code, os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-arch.c-67-{
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-72-#else
sbcl-2.0.11/src/runtime/ppc-arch.c:73: addr = (os_vm_address_t) (*os_context_register_addr(context,PT_DAR));
sbcl-2.0.11/src/runtime/ppc-arch.c-74-#endif
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-82- char** pcptr;
sbcl-2.0.11/src/runtime/ppc-arch.c:83: pcptr = (char**) os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/ppc-arch.c-84- *pcptr += 4;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-89-{
sbcl-2.0.11/src/runtime/ppc-arch.c:90: return (unsigned char *)(*os_context_pc_addr(context)+4);
sbcl-2.0.11/src/runtime/ppc-arch.c-91-}
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-115-#endif
sbcl-2.0.11/src/runtime/ppc-arch.c:116: ((*os_context_register_addr(context,reg_ALLOC)) & flag_PseudoAtomic);
sbcl-2.0.11/src/runtime/ppc-arch.c-117-}
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-128-#endif
sbcl-2.0.11/src/runtime/ppc-arch.c:129: *os_context_register_addr(context,reg_ALLOC)
sbcl-2.0.11/src/runtime/ppc-arch.c-130- |= flag_PseudoAtomicInterrupted;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-142-#endif
sbcl-2.0.11/src/runtime/ppc-arch.c:143: *os_context_register_addr(context,reg_ALLOC)
sbcl-2.0.11/src/runtime/ppc-arch.c-144- &= ~flag_PseudoAtomicInterrupted;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-188- * know if the branch will be taken if executed in context. */
sbcl-2.0.11/src/runtime/ppc-arch.c:189: int ctr = *os_context_ctr_addr(context);
sbcl-2.0.11/src/runtime/ppc-arch.c:190: int cr = *os_context_cr_addr(context);
sbcl-2.0.11/src/runtime/ppc-arch.c-191- int bo_field = (orig_inst >> 21) & 0x1f;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-210- * after doing this -dan */
sbcl-2.0.11/src/runtime/ppc-arch.c:211: unsigned int *pc = (unsigned int *)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/ppc-arch.c-212- unsigned int *next_pc;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-215-
sbcl-2.0.11/src/runtime/ppc-arch.c:216: orig_sigmask = *os_context_sigmask_addr(context);
sbcl-2.0.11/src/runtime/ppc-arch.c:217: sigaddset_blockable(os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/ppc-arch.c-218-
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-249- next_pc = (unsigned int *)
sbcl-2.0.11/src/runtime/ppc-arch.c:250: ((*os_context_lr_addr(context)) & ~3);
sbcl-2.0.11/src/runtime/ppc-arch.c-251- } else if ((op == 19) && (sub_op == 528)
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-254- next_pc = (unsigned int *)
sbcl-2.0.11/src/runtime/ppc-arch.c:255: ((*os_context_ctr_addr(context)) & ~3);
sbcl-2.0.11/src/runtime/ppc-arch.c-256- }
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-284- */
sbcl-2.0.11/src/runtime/ppc-arch.c:285: unsigned *pc = (unsigned int *) *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/ppc-arch.c-286- unsigned inst = *pc;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-336-
sbcl-2.0.11/src/runtime/ppc-arch.c:337: unsigned int *pc = (unsigned int *) (*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/ppc-arch.c-338-
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-370-#endif
sbcl-2.0.11/src/runtime/ppc-arch.c:371: size = *os_context_register_addr(context, reg);
sbcl-2.0.11/src/runtime/ppc-arch.c-372-
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-423-
sbcl-2.0.11/src/runtime/ppc-arch.c:424: *os_context_register_addr(context, target) = (unsigned long) memory;
sbcl-2.0.11/src/runtime/ppc-arch.c-425-#ifndef LISP_FEATURE_SB_THREAD
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-427- * threaded targets. */
sbcl-2.0.11/src/runtime/ppc-arch.c:428: *os_context_register_addr(context, reg_ALLOC) =
sbcl-2.0.11/src/runtime/ppc-arch.c-429- (unsigned long) dynamic_space_free_pointer
sbcl-2.0.11/src/runtime/ppc-arch.c:430: | (*os_context_register_addr(context, reg_ALLOC)
sbcl-2.0.11/src/runtime/ppc-arch.c-431- & LOWTAG_MASK);
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-436- // Skip 2 instructions: the trap, and the writeback of free pointer
sbcl-2.0.11/src/runtime/ppc-arch.c:437: (*os_context_pc_addr(context)) = (uword_t)(pc + 2);
sbcl-2.0.11/src/runtime/ppc-arch.c-438- return 1; // handled
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-482- struct symbol *specvar =
sbcl-2.0.11/src/runtime/ppc-arch.c:483: SYMBOL(*os_context_register_addr(context, symbol_reg));
sbcl-2.0.11/src/runtime/ppc-arch.c-484- struct symbol *free_tls_index = SYMBOL(FREE_TLS_INDEX);
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-520- int tlsindex_reg = (code >> 16) & 31; // the register we trapped on
sbcl-2.0.11/src/runtime/ppc-arch.c:521: *os_context_register_addr(context, tlsindex_reg) = tls_index;
sbcl-2.0.11/src/runtime/ppc-arch.c-522- clear_pseudo_atomic_atomic(thread);
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-535-{
sbcl-2.0.11/src/runtime/ppc-arch.c:536: *os_context_pc_addr(context) = (uword_t)handle_fun_end_breakpoint(context);
sbcl-2.0.11/src/runtime/ppc-arch.c-537-}
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-545- skipped_break_addr = NULL;
sbcl-2.0.11/src/runtime/ppc-arch.c:546: *(unsigned int *)*os_context_pc_addr(context)
sbcl-2.0.11/src/runtime/ppc-arch.c-547- = displaced_after_inst;
sbcl-2.0.11/src/runtime/ppc-arch.c:548: *os_context_sigmask_addr(context)= orig_sigmask;
sbcl-2.0.11/src/runtime/ppc-arch.c:549: os_flush_icache((os_vm_address_t) *os_context_pc_addr(context),
sbcl-2.0.11/src/runtime/ppc-arch.c-550- sizeof(unsigned int));
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-555-{
sbcl-2.0.11/src/runtime/ppc-arch.c:556: unsigned int code = *((uint32_t *)(*os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/ppc-arch.c-557- int register_offset = code >> 8 & 0x1f;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-567- char buf[100];
sbcl-2.0.11/src/runtime/ppc-arch.c:568: sigset_t *sigset = os_context_sigmask_addr(context); sigset_tostring(sigset, buf, sizeof buf);
sbcl-2.0.11/src/runtime/ppc-arch.c-569- fprintf(stderr, "%s\n", reason);
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-573- fprintf(stderr, " $pc=%16lx $lr=%16lx $ctr=%16lx $cr=%16lx\n",
sbcl-2.0.11/src/runtime/ppc-arch.c:574: *os_context_pc_addr(context),
sbcl-2.0.11/src/runtime/ppc-arch.c:575: *os_context_lr_addr(context),
sbcl-2.0.11/src/runtime/ppc-arch.c:576: *os_context_ctr_addr(context),
sbcl-2.0.11/src/runtime/ppc-arch.c:577: *os_context_cr_addr(context));
sbcl-2.0.11/src/runtime/ppc-arch.c-578- for(i=0; i<4; ++i) {
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-581- r<10 ? " $r" : "$r", r,
sbcl-2.0.11/src/runtime/ppc-arch.c:582: *os_context_register_addr(context, r));
sbcl-2.0.11/src/runtime/ppc-arch.c-583- putchar('\n');
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-590-{
sbcl-2.0.11/src/runtime/ppc-arch.c:591: uword_t pc = *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/ppc-arch.c-592- unsigned int code = *(uint32_t*)pc;
##############################################
sbcl-2.0.11/src/runtime/ppc-arch.c-598- // pretend the trap happened there.
sbcl-2.0.11/src/runtime/ppc-arch.c:599: *os_context_pc_addr(context) = pc + 8;
sbcl-2.0.11/src/runtime/ppc-arch.c-600- if (handle_allocation_trap(context)) return;
##############################################
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c-172- /* Trap to restore the signal context. */
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c:173: asm volatile (".quad 0xffffffffffff0b0f"
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c-174- : : "a" (mcontext));
##############################################
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c-445- unsigned int temp = (context->uc_mcontext->fs.fpu_mxcsr) & ~0x3F;
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c:446: asm ("ldmxcsr %0" : : "m" (temp));
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c-447- /* same for x87 FPU. */
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c:448: asm ("fldcw %0" : : "m" (fpu_control_word));
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c-449-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c-451-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c:452:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-darwin-os.c-453-{
##############################################
sbcl-2.0.11/src/runtime/arm64-arch.c-27-
sbcl-2.0.11/src/runtime/arm64-arch.c:28:os_vm_address_t arch_get_bad_addr(int sig, siginfo_t *code, os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-arch.c-29-{
##############################################
sbcl-2.0.11/src/runtime/arm64-arch.c-34-{
sbcl-2.0.11/src/runtime/arm64-arch.c:35: uint32_t trap_instruction = *((uint32_t *)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/arm64-arch.c-36- unsigned code = trap_instruction >> 5 & 0xFF;
sbcl-2.0.11/src/runtime/arm64-arch.c:37: *os_context_pc_addr(context) += 4;
sbcl-2.0.11/src/runtime/arm64-arch.c-38- switch (code)
##############################################
sbcl-2.0.11/src/runtime/arm64-arch.c-49-{
sbcl-2.0.11/src/runtime/arm64-arch.c:50: return (unsigned char *)*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/arm64-arch.c-51-}
##############################################
sbcl-2.0.11/src/runtime/arm64-arch.c-108-{
sbcl-2.0.11/src/runtime/arm64-arch.c:109: *os_context_pc_addr(context) = (int) handle_fun_end_breakpoint(context);
sbcl-2.0.11/src/runtime/arm64-arch.c-110-}
##############################################
sbcl-2.0.11/src/runtime/arm64-arch.c-121-{
sbcl-2.0.11/src/runtime/arm64-arch.c:122: uint32_t trap_instruction = *((uint32_t *)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/arm64-arch.c-123- unsigned code = trap_instruction >> 5 & 0xFF;
##############################################
sbcl-2.0.11/src/runtime/arm64-arch.c-125- lose("Unrecognized trap instruction %08lx in sigtrap_handler() (PC: %p)",
sbcl-2.0.11/src/runtime/arm64-arch.c:126: trap_instruction, *os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/arm64-arch.c-127- }
##############################################
sbcl-2.0.11/src/runtime/arm64-arch.c-133- fake_foreign_function_call(context);
sbcl-2.0.11/src/runtime/arm64-arch.c:134: lose("Unhandled SIGILL at %p.", *os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/arm64-arch.c-135-}
##############################################
sbcl-2.0.11/src/runtime/backtrace.c-15-
sbcl-2.0.11/src/runtime/backtrace.c:16:/* needed if we want dladdr() and Dl_Info from glibc's dlfcn.h */
sbcl-2.0.11/src/runtime/backtrace.c-17-#define _GNU_SOURCE
##############################################
sbcl-2.0.11/src/runtime/backtrace.c-280-#if !defined(LISP_FEATURE_ARM) && !defined(LISP_FEATURE_ARM64)
sbcl-2.0.11/src/runtime/backtrace.c:281: if (functionp(*os_context_register_addr(context, reg_CODE))) {
sbcl-2.0.11/src/runtime/backtrace.c-282- /* We tried to call a function, but crapped out before $CODE could
##############################################
sbcl-2.0.11/src/runtime/backtrace.c-285- (struct call_frame *)(uword_t)
sbcl-2.0.11/src/runtime/backtrace.c:286: (*os_context_register_addr(context, reg_OCFP));
sbcl-2.0.11/src/runtime/backtrace.c:287: info->lra = (lispobj)(*os_context_register_addr(context, reg_LRA));
sbcl-2.0.11/src/runtime/backtrace.c-288- info->code = code_pointer(info->lra);
##############################################
sbcl-2.0.11/src/runtime/backtrace.c-294- (struct call_frame *)(uword_t)
sbcl-2.0.11/src/runtime/backtrace.c:295: (*os_context_register_addr(context, reg_CFP));
sbcl-2.0.11/src/runtime/backtrace.c-296- info->code =
sbcl-2.0.11/src/runtime/backtrace.c:297: code_pointer(*os_context_register_addr(context, reg_CODE));
sbcl-2.0.11/src/runtime/backtrace.c-298- info->lra = NIL;
sbcl-2.0.11/src/runtime/backtrace.c:299: pc = *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/backtrace.c-300- }
##############################################
sbcl-2.0.11/src/runtime/backtrace.c-334- if ((struct call_frame *)(uword_t)
sbcl-2.0.11/src/runtime/backtrace.c:335: (*os_context_register_addr(context, reg_CFP))
sbcl-2.0.11/src/runtime/backtrace.c-336- == info->frame) {
##############################################
sbcl-2.0.11/src/runtime/backtrace.c-507- Dl_info info;
sbcl-2.0.11/src/runtime/backtrace.c:508: if (dladdr(pc, &info)) {
sbcl-2.0.11/src/runtime/backtrace.c-509- fprintf(f, "Foreign function %s, pc = %p, fp = %p", info.dli_sname, pc, fp);
##############################################
sbcl-2.0.11/src/runtime/backtrace.c-542-#ifdef LISP_FEATURE_X86
sbcl-2.0.11/src/runtime/backtrace.c:543: void *fp = (void *)*os_context_register_addr(context,reg_EBP);
sbcl-2.0.11/src/runtime/backtrace.c-544-#elif defined (LISP_FEATURE_X86_64)
sbcl-2.0.11/src/runtime/backtrace.c:545: void *fp = (void *)*os_context_register_addr(context,reg_RBP);
sbcl-2.0.11/src/runtime/backtrace.c-546-#endif
sbcl-2.0.11/src/runtime/backtrace.c:547: print_backtrace_frame((void *)*os_context_pc_addr(context), fp, 0, stdout);
sbcl-2.0.11/src/runtime/backtrace.c-548- backtrace_from_fp(fp, nframes - 1, 1);
##############################################
sbcl-2.0.11/src/runtime/thread.h-334-#elif defined(LISP_FEATURE_C_STACK_IS_CONTROL_STACK)
sbcl-2.0.11/src/runtime/thread.h:335: char *csp = (char *)*os_context_sp_addr(context);
sbcl-2.0.11/src/runtime/thread.h-336- return (char *)all_threads->control_stack_start < csp &&
##############################################
sbcl-2.0.11/src/runtime/thread.h-373- struct thread* th = arch_os_get_current_thread();
sbcl-2.0.11/src/runtime/thread.h:374: asm volatile ("");
sbcl-2.0.11/src/runtime/thread.h-375- into->csp_around_foreign_call = csp_around_foreign_call(th);
sbcl-2.0.11/src/runtime/thread.h-376- csp_around_foreign_call(th) = 0;
sbcl-2.0.11/src/runtime/thread.h:377: asm volatile ("");
sbcl-2.0.11/src/runtime/thread.h-378-}
##############################################
sbcl-2.0.11/src/runtime/thread.h-383- struct thread* th = arch_os_get_current_thread();
sbcl-2.0.11/src/runtime/thread.h:384: asm volatile ("");
sbcl-2.0.11/src/runtime/thread.h-385- csp_around_foreign_call(th) = from->csp_around_foreign_call;
sbcl-2.0.11/src/runtime/thread.h:386: asm volatile ("");
sbcl-2.0.11/src/runtime/thread.h-387-}
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-27-os_vm_address_t
sbcl-2.0.11/src/runtime/mips-arch.c:28:arch_get_bad_addr(int signam, siginfo_t *siginfo, os_context_t *context)
sbcl-2.0.11/src/runtime/mips-arch.c-29-{
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-38-{
sbcl-2.0.11/src/runtime/mips-arch.c:39: return (unsigned int)(*os_context_register_addr(context, offset));
sbcl-2.0.11/src/runtime/mips-arch.c-40-}
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-44-{
sbcl-2.0.11/src/runtime/mips-arch.c:45: return (unsigned int)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/mips-arch.c-46-}
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-113-static unsigned int
sbcl-2.0.11/src/runtime/mips-arch.c:114:next_insn_addr(os_context_t *context, unsigned int inst)
sbcl-2.0.11/src/runtime/mips-arch.c-115-{
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-131- tgt = os_context_register(context, r1);
sbcl-2.0.11/src/runtime/mips-arch.c:132: *os_context_register_addr(context, r3)
sbcl-2.0.11/src/runtime/mips-arch.c-133- = os_context_pc(context) + INSN_LEN;
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-159- tgt += disp;
sbcl-2.0.11/src/runtime/mips-arch.c:160: *os_context_register_addr(context, 31)
sbcl-2.0.11/src/runtime/mips-arch.c-161- = os_context_pc(context) + INSN_LEN;
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-168- tgt += disp;
sbcl-2.0.11/src/runtime/mips-arch.c:169: *os_context_register_addr(context, 31)
sbcl-2.0.11/src/runtime/mips-arch.c-170- = os_context_pc(context) + INSN_LEN;
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-183- tgt = jtgt;
sbcl-2.0.11/src/runtime/mips-arch.c:184: *os_context_register_addr(context, 31)
sbcl-2.0.11/src/runtime/mips-arch.c-185- = os_context_pc(context) + INSN_LEN;
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-242- slot. */
sbcl-2.0.11/src/runtime/mips-arch.c:243: *os_context_pc_addr(context)
sbcl-2.0.11/src/runtime/mips-arch.c-244- = (os_context_register_t)
sbcl-2.0.11/src/runtime/mips-arch.c:245: next_insn_addr(context,
sbcl-2.0.11/src/runtime/mips-arch.c-246- *(unsigned int *)(os_context_pc(context)));
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-266-{
sbcl-2.0.11/src/runtime/mips-arch.c:267: *os_context_register_addr(context, reg_NL4) |= -1LL<<31;
sbcl-2.0.11/src/runtime/mips-arch.c-268-}
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-272-{
sbcl-2.0.11/src/runtime/mips-arch.c:273: *os_context_register_addr(context, reg_NL4) &= ~(-1LL<<31);
sbcl-2.0.11/src/runtime/mips-arch.c-274-}
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-347-
sbcl-2.0.11/src/runtime/mips-arch.c:348: orig_sigmask = *os_context_sigmask_addr(context);
sbcl-2.0.11/src/runtime/mips-arch.c:349: sigaddset_blockable(os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/mips-arch.c-350-
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-355- /* Figure out where it goes. */
sbcl-2.0.11/src/runtime/mips-arch.c:356: next_pc = (unsigned int *)next_insn_addr(context, *pc);
sbcl-2.0.11/src/runtime/mips-arch.c-357- displaced_after_inst = arch_install_after_breakpoint(next_pc);
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-368-{
sbcl-2.0.11/src/runtime/mips-arch.c:369: *os_context_pc_addr(context)
sbcl-2.0.11/src/runtime/mips-arch.c-370- = (os_context_register_t)(unsigned int)
##############################################
sbcl-2.0.11/src/runtime/mips-arch.c-379- displaced_after_inst);
sbcl-2.0.11/src/runtime/mips-arch.c:380: *os_context_sigmask_addr(context) = orig_sigmask;
sbcl-2.0.11/src/runtime/mips-arch.c-381-}
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-805- // technically this should return the address of the code object
sbcl-2.0.11/src/runtime/gc-common.c:806: // containing asm routines, but it's fine to return 0.
sbcl-2.0.11/src/runtime/gc-common.c-807- return 0;
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-1859-#if !(defined(LISP_FEATURE_WIN32) || defined(LISP_FEATURE_SB_SAFEPOINT))
sbcl-2.0.11/src/runtime/gc-common.c:1860: check_gc_signals_unblocked_or_lose(os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/gc-common.c-1861- unblock_gc_signals();
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-1896-#ifndef LISP_FEATURE_WIN32
sbcl-2.0.11/src/runtime/gc-common.c:1897: sigset_t *context_sigmask = os_context_sigmask_addr(context);
sbcl-2.0.11/src/runtime/gc-common.c-1898- if (can_invoke_post_gc(thread, context_sigmask)) {
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-2091-#define ACCESS_INTERIOR_POINTER_pc \
sbcl-2.0.11/src/runtime/gc-common.c:2092: *os_context_pc_addr(context)
sbcl-2.0.11/src/runtime/gc-common.c-2093-#define ACCESS_INTERIOR_POINTER_lip \
sbcl-2.0.11/src/runtime/gc-common.c:2094: *os_context_register_addr(context, reg_LIP)
sbcl-2.0.11/src/runtime/gc-common.c-2095-#define ACCESS_INTERIOR_POINTER_lr \
sbcl-2.0.11/src/runtime/gc-common.c:2096: *os_context_lr_addr(context)
sbcl-2.0.11/src/runtime/gc-common.c-2097-#define ACCESS_INTERIOR_POINTER_npc \
sbcl-2.0.11/src/runtime/gc-common.c:2098: *os_context_npc_addr(context)
sbcl-2.0.11/src/runtime/gc-common.c-2099-#define ACCESS_INTERIOR_POINTER_ctr \
sbcl-2.0.11/src/runtime/gc-common.c:2100: *os_context_ctr_addr(context)
sbcl-2.0.11/src/runtime/gc-common.c-2101-
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-2115- * Originally, there was some commentary about using an index of -1
sbcl-2.0.11/src/runtime/gc-common.c:2116: * when calling os_context_register_addr() on SPARC referring to the
sbcl-2.0.11/src/runtime/gc-common.c-2117- * program counter, but the real reason is to allow an interior
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-2124- ACCESS_INTERIOR_POINTER_##name = \
sbcl-2.0.11/src/runtime/gc-common.c:2125: (*os_context_register_addr(context, \
sbcl-2.0.11/src/runtime/gc-common.c-2126- name##_register_pair) \
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-2158- int regindex = boxed_registers[i];
sbcl-2.0.11/src/runtime/gc-common.c:2159: uword_t regval = *os_context_register_addr(context, regindex);
sbcl-2.0.11/src/runtime/gc-common.c-2160-
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-2195- lisp_register_names[*register_pair],
sbcl-2.0.11/src/runtime/gc-common.c:2196: (void*)(((uword_t)*os_context_register_addr(context, *register_pair))
sbcl-2.0.11/src/runtime/gc-common.c-2197- & ~LOWTAG_MASK),
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-2247-
sbcl-2.0.11/src/runtime/gc-common.c:2248: /* We can't "just" cast os_context_register_addr() to a
sbcl-2.0.11/src/runtime/gc-common.c-2249- * pointer to lispobj and pass it to scavenge, because some
##############################################
sbcl-2.0.11/src/runtime/gc-common.c-2263-
sbcl-2.0.11/src/runtime/gc-common.c:2264: boxed_reg = os_context_register_addr(context, boxed_registers[i]);
sbcl-2.0.11/src/runtime/gc-common.c-2265- datum = *boxed_reg;
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-31-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:32:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-33-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-72-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:73:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-74-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-78-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:79:os_context_fp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-80-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-84-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:85:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-86-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-91-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:92:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-93-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-132-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:133:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-134-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-138-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:139:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-140-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-177- unsigned int temp = (ex->en_mxcsr) & ~0x3F;
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:178: asm ("ldmxcsr %0" : : "m" (temp));
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-179- /* same for x87 FPU. */
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:180: asm ("fldcw %0" : : "m" (ex->en_cw));
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-181-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-190- unsigned int temp = (ex->en_mxcsr) & ~0x3F;
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:191: asm ("ldmxcsr %0" : : "m" (temp));
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-192- /* same for x87 FPU. */
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:193: asm ("fldcw %0" : : "m" (ex->en_cw));
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-194-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-196-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:197:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-198-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-210- u_int16_t cw = context->sc_fpstate->fx_fcw;
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:211: asm ("ldmxcsr %0" : : "m" (mxcsr));
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:212: asm ("fldcw %0" : : "m" (cw));
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-213- }
##############################################
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-216-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c:217:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-bsd-os.c-218-{
##############################################
sbcl-2.0.11/src/runtime/haiku-os.c-72- context->uc_mcontext.rip, info->si_addr);*/
sbcl-2.0.11/src/runtime/haiku-os.c:73: os_vm_address_t addr = arch_get_bad_addr(signal, info, context);
sbcl-2.0.11/src/runtime/haiku-os.c-74- if (!gencgc_handle_wp_violation(addr))
##############################################
sbcl-2.0.11/src/runtime/x86-64-win32-os.h-20-void os_restore_fp_control(os_context_t *context);
sbcl-2.0.11/src/runtime/x86-64-win32-os.h:21:os_context_register_t * os_context_fp_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/x86-64-win32-os.h-22-
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1425-// physical address to read or write during defragmentation
sbcl-2.0.11/src/runtime/immobile-space.c:1426:static lispobj* tempspace_addr(void* address)
sbcl-2.0.11/src/runtime/immobile-space.c-1427-{
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1496-
sbcl-2.0.11/src/runtime/immobile-space.c:1497:static void adjust_fdefn_raw_addr(struct fdefn* fdefn)
sbcl-2.0.11/src/runtime/immobile-space.c-1498-{
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1536- }
sbcl-2.0.11/src/runtime/immobile-space.c:1537: struct layout* native_layout = (struct layout*)tempspace_addr(LAYOUT(layout));
sbcl-2.0.11/src/runtime/immobile-space.c-1538- gc_assert(header_widetag(native_layout->header) == INSTANCE_WIDETAG);
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1597- adjust_words(where+1, 2);
sbcl-2.0.11/src/runtime/immobile-space.c:1598: adjust_fdefn_raw_addr((struct fdefn*)where);
sbcl-2.0.11/src/runtime/immobile-space.c-1599- break;
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1751- if (space_avail < 0 || space_avail == 2*N_WORD_BYTES) {
sbcl-2.0.11/src/runtime/immobile-space.c:1752: make_filler(tempspace_addr(new), page_end - new);
sbcl-2.0.11/src/runtime/immobile-space.c-1753- new = page_end;
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1761-#endif
sbcl-2.0.11/src/runtime/immobile-space.c:1762: gc_assert(!*tempspace_addr(new)); // better not clobber some other object
sbcl-2.0.11/src/runtime/immobile-space.c:1763: memcpy(tempspace_addr(new), obj, size_in_bytes);
sbcl-2.0.11/src/runtime/immobile-space.c-1764- set_forwarding_pointer(obj, make_lispobj(new, LOWTAG_FOR_WIDETAG(widetag)));
sbcl-2.0.11/src/runtime/immobile-space.c-1765- if (widetag == FUNCALLABLE_INSTANCE_WIDETAG) // fix the self-pointer
sbcl-2.0.11/src/runtime/immobile-space.c:1766: tempspace_addr(new)[1] = (lispobj)(new + 4*N_WORD_BYTES);
sbcl-2.0.11/src/runtime/immobile-space.c-1767- *alloc_ptr = new + size_in_bytes;
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1813- char* new = size_classes[size_class_index].alloc_ptr;
sbcl-2.0.11/src/runtime/immobile-space.c:1814: gc_assert(!*tempspace_addr(new));
sbcl-2.0.11/src/runtime/immobile-space.c:1815: memcpy(tempspace_addr(new), obj, nwords*N_WORD_BYTES);
sbcl-2.0.11/src/runtime/immobile-space.c-1816- set_forwarding_pointer(obj, make_lispobj(new, INSTANCE_POINTER_LOWTAG));
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-1825- if (to>from)
sbcl-2.0.11/src/runtime/immobile-space.c:1826: make_filler(tempspace_addr(from), to-from);
sbcl-2.0.11/src/runtime/immobile-space.c-1827-}
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2014- addr = native_pointer(components[i*2]);
sbcl-2.0.11/src/runtime/immobile-space.c:2015: memcpy(tempspace_addr((void*)new_vaddr), addr,
sbcl-2.0.11/src/runtime/immobile-space.c-2016- sizetab[widetag_of(addr)](addr) << WORD_SHIFT);
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2026- // storing via the current (temporary) address.
sbcl-2.0.11/src/runtime/immobile-space.c:2027: ((struct simple_fun*)tempspace_addr(new_fun))->self =
sbcl-2.0.11/src/runtime/immobile-space.c-2028- fun_self_from_baseptr(new_fun);
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2034- lispobj* jump_table =
sbcl-2.0.11/src/runtime/immobile-space.c:2035: code_jumptable_start((struct code*)tempspace_addr((void*)new_vaddr));
sbcl-2.0.11/src/runtime/immobile-space.c-2036- int count = jumptable_count(jump_table);
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2048- if (aligned_nbytes > n_code_bytes)
sbcl-2.0.11/src/runtime/immobile-space.c:2049: make_filler(tempspace_addr((char*)VARYOBJ_SPACE_START + n_code_bytes),
sbcl-2.0.11/src/runtime/immobile-space.c-2050- aligned_nbytes - n_code_bytes);
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2069- forwarding_pointer_p(obj) ?
sbcl-2.0.11/src/runtime/immobile-space.c:2070: tempspace_addr(native_pointer(forwarding_pointer_value(obj))) : obj;
sbcl-2.0.11/src/runtime/immobile-space.c-2071- int size = sizetab[widetag_of(fwdobj)](fwdobj);
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2143- // Otherwise perform the fixup where the instruction is now.
sbcl-2.0.11/src/runtime/immobile-space.c:2144: // (It only wouldn't move if it's asm code in readonly space)
sbcl-2.0.11/src/runtime/immobile-space.c-2145- char* fixup_loc =
sbcl-2.0.11/src/runtime/immobile-space.c-2146- immobile_space_p((lispobj)inst_addr) ?
sbcl-2.0.11/src/runtime/immobile-space.c:2147: (char*)tempspace_addr(inst_addr - code + load_addr) : inst_addr;
sbcl-2.0.11/src/runtime/immobile-space.c-2148- UNALIGNED_STORE32(fixup_loc,
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2228- if (asm_routines_start <= ptr && ptr < asm_routines_end) {
sbcl-2.0.11/src/runtime/immobile-space.c:2229: // Call to asm routine using "CALL [#xNNNN]" form.
sbcl-2.0.11/src/runtime/immobile-space.c-2230- // This fixup is only for whole-heap relocation on startup.
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2238- fpval = forwarding_pointer_value(header_addr);
sbcl-2.0.11/src/runtime/immobile-space.c:2239: int widetag = widetag_of(tempspace_addr(native_pointer(fpval)));
sbcl-2.0.11/src/runtime/immobile-space.c-2240- // Must be an interior pointer to a symbol value slot
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2256- fpval = forwarding_pointer_value(header_addr);
sbcl-2.0.11/src/runtime/immobile-space.c:2257: if (widetag_of(tempspace_addr(native_pointer(fpval))) == FDEFN_WIDETAG)
sbcl-2.0.11/src/runtime/immobile-space.c-2258- goto fix;
##############################################
sbcl-2.0.11/src/runtime/immobile-space.c-2263- fpval = forwarding_pointer_value(header_addr);
sbcl-2.0.11/src/runtime/immobile-space.c:2264: if (widetag_of(tempspace_addr(native_pointer(fpval))) == SIMPLE_FUN_WIDETAG)
sbcl-2.0.11/src/runtime/immobile-space.c-2265- goto fix;
##############################################
sbcl-2.0.11/src/runtime/x86-64-darwin-os.h-8-static inline unsigned int *
sbcl-2.0.11/src/runtime/x86-64-darwin-os.h:9:arch_os_context_mxcsr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-darwin-os.h-10-{
##############################################
sbcl-2.0.11/src/runtime/arm-bsd-os.c-62-os_context_register_t *
sbcl-2.0.11/src/runtime/arm-bsd-os.c:63:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm-bsd-os.c-64-{
##############################################
sbcl-2.0.11/src/runtime/arm-bsd-os.c-75-os_context_register_t *
sbcl-2.0.11/src/runtime/arm-bsd-os.c:76:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm-bsd-os.c-77-{
##############################################
sbcl-2.0.11/src/runtime/arm-bsd-os.c-101-os_context_register_t *
sbcl-2.0.11/src/runtime/arm-bsd-os.c:102:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm-bsd-os.c-103-{
sbcl-2.0.11/src/runtime/arm-bsd-os.c:104: return os_context_register_addr(context, reg_PC);
sbcl-2.0.11/src/runtime/arm-bsd-os.c-105-}
##############################################
sbcl-2.0.11/src/runtime/arm-bsd-os.c-107-os_context_register_t *
sbcl-2.0.11/src/runtime/arm-bsd-os.c:108:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm-bsd-os.c-109-{
sbcl-2.0.11/src/runtime/arm-bsd-os.c:110: return os_context_register_addr(context, reg_LR);
sbcl-2.0.11/src/runtime/arm-bsd-os.c-111-}
##############################################
sbcl-2.0.11/src/runtime/arm-bsd-os.c-117-{
sbcl-2.0.11/src/runtime/arm-bsd-os.c:118: asm ("fmxr fpscr,%0" : : "r" (context->sc_fpscr));
sbcl-2.0.11/src/runtime/arm-bsd-os.c-119-}
##############################################
sbcl-2.0.11/src/runtime/arm-bsd-os.c-139-{
sbcl-2.0.11/src/runtime/arm-bsd-os.c:140: unsigned int code = *((unsigned char *)(4+*os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/arm-bsd-os.c:141: uint32_t trap_instruction = *((uint32_t *)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/arm-bsd-os.c-142-
##############################################
sbcl-2.0.11/src/runtime/gencgc.c-3284-#if defined LISP_FEATURE_X86
sbcl-2.0.11/src/runtime/gencgc.c:3285: proc(*os_context_register_addr(c,reg_EAX));
sbcl-2.0.11/src/runtime/gencgc.c:3286: proc(*os_context_register_addr(c,reg_ECX));
sbcl-2.0.11/src/runtime/gencgc.c:3287: proc(*os_context_register_addr(c,reg_EDX));
sbcl-2.0.11/src/runtime/gencgc.c:3288: proc(*os_context_register_addr(c,reg_EBX));
sbcl-2.0.11/src/runtime/gencgc.c:3289: proc(*os_context_register_addr(c,reg_ESI));
sbcl-2.0.11/src/runtime/gencgc.c:3290: proc(*os_context_register_addr(c,reg_EDI));
sbcl-2.0.11/src/runtime/gencgc.c:3291: proc(*os_context_pc_addr(c));
sbcl-2.0.11/src/runtime/gencgc.c-3292-#elif defined LISP_FEATURE_X86_64
sbcl-2.0.11/src/runtime/gencgc.c:3293: proc(*os_context_register_addr(c,reg_RAX));
sbcl-2.0.11/src/runtime/gencgc.c:3294: proc(*os_context_register_addr(c,reg_RCX));
sbcl-2.0.11/src/runtime/gencgc.c:3295: proc(*os_context_register_addr(c,reg_RDX));
sbcl-2.0.11/src/runtime/gencgc.c:3296: proc(*os_context_register_addr(c,reg_RBX));
sbcl-2.0.11/src/runtime/gencgc.c:3297: proc(*os_context_register_addr(c,reg_RSI));
sbcl-2.0.11/src/runtime/gencgc.c:3298: proc(*os_context_register_addr(c,reg_RDI));
sbcl-2.0.11/src/runtime/gencgc.c:3299: proc(*os_context_register_addr(c,reg_R8));
sbcl-2.0.11/src/runtime/gencgc.c:3300: proc(*os_context_register_addr(c,reg_R9));
sbcl-2.0.11/src/runtime/gencgc.c:3301: proc(*os_context_register_addr(c,reg_R10));
sbcl-2.0.11/src/runtime/gencgc.c:3302: proc(*os_context_register_addr(c,reg_R11));
sbcl-2.0.11/src/runtime/gencgc.c:3303: proc(*os_context_register_addr(c,reg_R12));
sbcl-2.0.11/src/runtime/gencgc.c:3304: proc(*os_context_register_addr(c,reg_R13));
sbcl-2.0.11/src/runtime/gencgc.c:3305: proc(*os_context_register_addr(c,reg_R14));
sbcl-2.0.11/src/runtime/gencgc.c:3306: proc(*os_context_register_addr(c,reg_R15));
sbcl-2.0.11/src/runtime/gencgc.c:3307: proc(*os_context_pc_addr(c));
sbcl-2.0.11/src/runtime/gencgc.c-3308-#else
##############################################
sbcl-2.0.11/src/runtime/gencgc.c-3523- os_context_t *c = nth_interrupt_context(i, th);
sbcl-2.0.11/src/runtime/gencgc.c:3524: esp1 = (lispobj*) *os_context_register_addr(c,reg_SP);
sbcl-2.0.11/src/runtime/gencgc.c-3525- if (esp1 >= th->control_stack_start && esp1 < th->control_stack_end) {
##############################################
sbcl-2.0.11/src/runtime/gencgc.c-3597- for (j = (int)(sizeof boxed_registers / sizeof boxed_registers[0])-1; j >= 0; --j)
sbcl-2.0.11/src/runtime/gencgc.c:3598: preserve_pointer((void*)*os_context_register_addr(context,
sbcl-2.0.11/src/runtime/gencgc.c-3599- boxed_registers[j]));
sbcl-2.0.11/src/runtime/gencgc.c:3600: preserve_pointer((void*)*os_context_lr_addr(context));
sbcl-2.0.11/src/runtime/gencgc.c:3601: preserve_pointer((void*)*os_context_ctr_addr(context));
sbcl-2.0.11/src/runtime/gencgc.c-3602- }
##############################################
sbcl-2.0.11/src/runtime/gencgc.c-4281- maybe_save_gc_mask_and_block_deferrables
sbcl-2.0.11/src/runtime/gencgc.c:4282: (context ? os_context_sigmask_addr(context) : NULL);
sbcl-2.0.11/src/runtime/gencgc.c-4283- }
##############################################
sbcl-2.0.11/src/runtime/sparc-linux-os.h-8-{
sbcl-2.0.11/src/runtime/sparc-linux-os.h:9: asm volatile ("ta 0x03"); /* ta ST_FLUSH_WINDOWS */
sbcl-2.0.11/src/runtime/sparc-linux-os.h-10- return (os_context_t *) (*void_context);
##############################################
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-8-int *
sbcl-2.0.11/src/runtime/ppc-bsd-os.c:9:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-10-{
##############################################
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-19-int *
sbcl-2.0.11/src/runtime/ppc-bsd-os.c:20:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-21-{
##############################################
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-29-int *
sbcl-2.0.11/src/runtime/ppc-bsd-os.c:30:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-31-{
##############################################
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-39-int *
sbcl-2.0.11/src/runtime/ppc-bsd-os.c:40:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-41-{
##############################################
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-49-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-bsd-os.c:50:os_context_ctr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-51-{
##############################################
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-59-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-bsd-os.c:60:os_context_cr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-bsd-os.c-61-{
##############################################
sbcl-2.0.11/src/runtime/os.h-152-os_context_register_t *
sbcl-2.0.11/src/runtime/os.h:153:os_context_register_addr(os_context_t *context, int offset);
sbcl-2.0.11/src/runtime/os.h-154-
sbcl-2.0.11/src/runtime/os.h-155-os_context_register_t *
sbcl-2.0.11/src/runtime/os.h:156:os_context_float_register_addr(os_context_t *context, int offset);
sbcl-2.0.11/src/runtime/os.h-157-
##############################################
sbcl-2.0.11/src/runtime/os.h-159- * program counter for that context. */
sbcl-2.0.11/src/runtime/os.h:160:os_context_register_t *os_context_pc_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/os.h-161-#ifdef ARCH_HAS_NPC_REGISTER
sbcl-2.0.11/src/runtime/os.h:162:os_context_register_t *os_context_npc_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/os.h-163-#endif
sbcl-2.0.11/src/runtime/os.h-164-#ifdef ARCH_HAS_LINK_REGISTER
sbcl-2.0.11/src/runtime/os.h:165:os_context_register_t *os_context_lr_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/os.h-166-#endif
##############################################
sbcl-2.0.11/src/runtime/os.h-170-#ifdef ARCH_HAS_STACK_POINTER
sbcl-2.0.11/src/runtime/os.h:171:os_context_register_t *os_context_sp_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/os.h-172-#if (defined(LISP_FEATURE_X86)||defined(LISP_FEATURE_X86_64)) && \
sbcl-2.0.11/src/runtime/os.h-173- (defined(LISP_FEATURE_DARWIN)||defined(LISP_FEATURE_LINUX)||defined(LISP_FEATURE_WIN32))
sbcl-2.0.11/src/runtime/os.h:174:os_context_register_t *os_context_fp_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/os.h:175:#define os_context_frame_pointer(context) *os_context_fp_addr(context)
sbcl-2.0.11/src/runtime/os.h-176-#else
##############################################
sbcl-2.0.11/src/runtime/os.h-181- * signal mask for that context. */
sbcl-2.0.11/src/runtime/os.h:182:sigset_t *os_context_sigmask_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/os.h-183-
##############################################
sbcl-2.0.11/src/runtime/win32-os.c-231-#ifdef LISP_FEATURE_X86
sbcl-2.0.11/src/runtime/win32-os.c:232: asm volatile ("mov %%fs:0,%0": "=r" (retval));
sbcl-2.0.11/src/runtime/win32-os.c-233-#else
sbcl-2.0.11/src/runtime/win32-os.c:234: asm volatile ("mov %%gs:0,%0": "=r" (retval));
sbcl-2.0.11/src/runtime/win32-os.c-235-#endif
##############################################
sbcl-2.0.11/src/runtime/win32-os.c-241-#ifdef LISP_FEATURE_X86
sbcl-2.0.11/src/runtime/win32-os.c:242: asm volatile ("mov %0,%%fs:0": : "r" (frame));
sbcl-2.0.11/src/runtime/win32-os.c-243-#else
sbcl-2.0.11/src/runtime/win32-os.c:244: asm volatile ("mov %0,%%gs:0": : "r" (frame));
sbcl-2.0.11/src/runtime/win32-os.c-245-#endif
##############################################
sbcl-2.0.11/src/runtime/win32-os.c-255-
sbcl-2.0.11/src/runtime/win32-os.c:256:/* Permit loads from GC_SAFEPOINT_PAGE_ADDR (NB page state change is
sbcl-2.0.11/src/runtime/win32-os.c-257- * "synchronized" with the memory region content/availability --
##############################################
sbcl-2.0.11/src/runtime/win32-os.c-950-#ifdef LISP_FEATURE_UD2_BREAKPOINTS
sbcl-2.0.11/src/runtime/win32-os.c:951: if (((unsigned short *)*os_context_pc_addr(ctx))[0] != 0x0b0f)
sbcl-2.0.11/src/runtime/win32-os.c-952- return -1;
##############################################
sbcl-2.0.11/src/runtime/win32-os.c-956- * pointing to the breakpoint instruction. */
sbcl-2.0.11/src/runtime/win32-os.c:957: (*os_context_pc_addr(ctx)) += TRAP_CODE_WIDTH;
sbcl-2.0.11/src/runtime/win32-os.c-958-
##############################################
sbcl-2.0.11/src/runtime/win32-os.c-960- * 'kind' value (eg trap_Cerror). */
sbcl-2.0.11/src/runtime/win32-os.c:961: unsigned trap = *(unsigned char *)(*os_context_pc_addr(ctx));
sbcl-2.0.11/src/runtime/win32-os.c-962-
##############################################
sbcl-2.0.11/src/runtime/win32-os.c-979- access_control_stack_pointer(self) =
sbcl-2.0.11/src/runtime/win32-os.c:980: (lispobj *)*os_context_sp_addr(ctx);
sbcl-2.0.11/src/runtime/win32-os.c-981-
##############################################
sbcl-2.0.11/src/runtime/x86-linux-os.c-111-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-linux-os.c:112:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-linux-os.c-113-{
##############################################
sbcl-2.0.11/src/runtime/x86-linux-os.c-128-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-linux-os.c:129:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-linux-os.c-130-{
##############################################
sbcl-2.0.11/src/runtime/x86-linux-os.c-134-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-linux-os.c:135:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-linux-os.c-136-{
##############################################
sbcl-2.0.11/src/runtime/x86-linux-os.c-140-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-linux-os.c:141:os_context_fp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-linux-os.c-142-{
##############################################
sbcl-2.0.11/src/runtime/x86-linux-os.c-153-sigset_t *
sbcl-2.0.11/src/runtime/x86-linux-os.c:154:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-linux-os.c-155-{
##############################################
sbcl-2.0.11/src/runtime/x86-linux-os.c-162- if (context->uc_mcontext.fpregs)
sbcl-2.0.11/src/runtime/x86-linux-os.c:163: asm ("fldcw %0" : : "m" (context->uc_mcontext.fpregs->cw));
sbcl-2.0.11/src/runtime/x86-linux-os.c-164-}
##############################################
sbcl-2.0.11/src/runtime/x86-linux-os.c-166-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-linux-os.c:167:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-linux-os.c-168-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-13-
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c:14:os_context_register_t *os_context_pc_addr(os_context_t *context) {
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-15- return (os_context_register_t *)&context->uc_mcontext.rip;
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-16-}
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c:17:os_context_register_t *os_context_sp_addr(os_context_t *context) {
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-18- return (os_context_register_t *)&context->uc_mcontext.rsp;
##############################################
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-21-os_context_register_t*
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c:22:os_context_register_addr(os_context_t *context, int reg_encoding)
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-23-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-37-sigset_t *
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c:38:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-39-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-49- unsigned int temp = (context->uc_mcontext.fpu.mxcsr) & ~0x3F;
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c:50: asm ("ldmxcsr %0" : : "m" (temp));
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-51- /* same for x87 FPU. */
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c:52: asm ("fldcw %0" : : "m" (context->uc_mcontext.fpu.control));
sbcl-2.0.11/src/runtime/x86-64-haiku-os.c-53-}
##############################################
sbcl-2.0.11/src/runtime/x86-darwin-os.c-38-
sbcl-2.0.11/src/runtime/x86-darwin-os.c:39:void set_data_desc_addr(data_desc_t* desc, void* addr)
sbcl-2.0.11/src/runtime/x86-darwin-os.c-40-{
##############################################
sbcl-2.0.11/src/runtime/x86-darwin-os.c-68-
sbcl-2.0.11/src/runtime/x86-darwin-os.c:69: set_data_desc_addr(&ldt_entry, thread);
sbcl-2.0.11/src/runtime/x86-darwin-os.c-70- set_data_desc_size(&ldt_entry, dynamic_values_bytes);
##############################################
sbcl-2.0.11/src/runtime/x86-darwin-os.c-258- /* Trap to restore the signal context. */
sbcl-2.0.11/src/runtime/x86-darwin-os.c:259: asm volatile (".long 0xffff0b0f"
sbcl-2.0.11/src/runtime/x86-darwin-os.c-260- : : "a" (thread_state), "c" (float_state));
##############################################
sbcl-2.0.11/src/runtime/x86-darwin-os.c-528- /* reset exception flags and restore control flags on x87 FPU */
sbcl-2.0.11/src/runtime/x86-darwin-os.c:529: asm ("fldcw %0" : : "m" (fpu_control_word));
sbcl-2.0.11/src/runtime/x86-darwin-os.c-530-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-lispregs.h-4- * POSIX signal context structure os_context_t via the
sbcl-2.0.11/src/runtime/x86-64-lispregs.h:5: * os_context_register_addr(..) OS-dependent function.
sbcl-2.0.11/src/runtime/x86-64-lispregs.h-6- */
##############################################
sbcl-2.0.11/src/runtime/ppc-linux-os.c-63-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-linux-os.c:64:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/ppc-linux-os.c-65-{
##############################################
sbcl-2.0.11/src/runtime/ppc-linux-os.c-73-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-linux-os.c:74:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-linux-os.c-75-{
##############################################
sbcl-2.0.11/src/runtime/ppc-linux-os.c-83-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-linux-os.c:84:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-linux-os.c-85-{
##############################################
sbcl-2.0.11/src/runtime/ppc-linux-os.c-93-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-linux-os.c:94:os_context_ctr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-linux-os.c-95-{
sbcl-2.0.11/src/runtime/ppc-linux-os.c:96: /* Like os_context_fp_control() and os_context_lr_addr(), this
sbcl-2.0.11/src/runtime/ppc-linux-os.c-97- * uses an index beyond the declared end of the array in order to
##############################################
sbcl-2.0.11/src/runtime/ppc-linux-os.c-107-os_context_register_t *
sbcl-2.0.11/src/runtime/ppc-linux-os.c:108:os_context_cr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-linux-os.c-109-{
sbcl-2.0.11/src/runtime/ppc-linux-os.c:110: /* Like os_context_fp_control() and os_context_lr_addr(), this
sbcl-2.0.11/src/runtime/ppc-linux-os.c-111- * uses an index beyond the declared end of the array in order to
##############################################
sbcl-2.0.11/src/runtime/ppc-linux-os.c-121-sigset_t *
sbcl-2.0.11/src/runtime/ppc-linux-os.c:122:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/ppc-linux-os.c-123-{
##############################################
sbcl-2.0.11/src/runtime/ppc-linux-os.c-162- d = *((double *) &control);
sbcl-2.0.11/src/runtime/ppc-linux-os.c:163: asm volatile ("mtfsf 0xff,%0" : : "f" (d));
sbcl-2.0.11/src/runtime/ppc-linux-os.c-164-}
##############################################
sbcl-2.0.11/src/runtime/arch.h-31-extern void arch_clear_pseudo_atomic_interrupted(os_context_t*);
sbcl-2.0.11/src/runtime/arch.h:32:extern os_vm_address_t arch_get_bad_addr(int, siginfo_t*, os_context_t*);
sbcl-2.0.11/src/runtime/arch.h-33-extern unsigned char *arch_internal_error_arguments(os_context_t*);
##############################################
sbcl-2.0.11/src/runtime/breakpoint.c-65-#ifdef reg_CODE
sbcl-2.0.11/src/runtime/breakpoint.c:66: lispobj code = *os_context_register_addr(context, reg_CODE);
sbcl-2.0.11/src/runtime/breakpoint.c-67- lispobj header;
##############################################
sbcl-2.0.11/src/runtime/breakpoint.c-84- lispobj codeptr =
sbcl-2.0.11/src/runtime/breakpoint.c:85: (lispobj)component_ptr_from_pc((char *)(*os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/breakpoint.c-86-
##############################################
sbcl-2.0.11/src/runtime/breakpoint.c-96- if (code != NIL) {
sbcl-2.0.11/src/runtime/breakpoint.c:97: uword_t pc = *os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/breakpoint.c-98- struct code *codeptr = (struct code *)native_pointer(code);
##############################################
sbcl-2.0.11/src/runtime/breakpoint.c-122- * use debugger breakpoints anywhere in here. */
sbcl-2.0.11/src/runtime/breakpoint.c:123: thread_sigmask(SIG_SETMASK, os_context_sigmask_addr(context), 0);
sbcl-2.0.11/src/runtime/breakpoint.c-124-#endif
##############################################
sbcl-2.0.11/src/runtime/breakpoint.c-151- * use debugger breakpoints anywhere in here. */
sbcl-2.0.11/src/runtime/breakpoint.c:152: thread_sigmask(SIG_SETMASK, os_context_sigmask_addr(context), 0);
sbcl-2.0.11/src/runtime/breakpoint.c-153-#endif
##############################################
sbcl-2.0.11/src/runtime/breakpoint.c-164- * platforms should as well, but haven't been fixed yet. */
sbcl-2.0.11/src/runtime/breakpoint.c:165: *os_context_register_addr(context, reg_LRA) = lra;
sbcl-2.0.11/src/runtime/breakpoint.c-166-#else
sbcl-2.0.11/src/runtime/breakpoint.c-167-#ifdef reg_CODE
sbcl-2.0.11/src/runtime/breakpoint.c:168: *os_context_register_addr(context, reg_CODE) = lra;
sbcl-2.0.11/src/runtime/breakpoint.c-169-#endif
##############################################
sbcl-2.0.11/src/runtime/breakpoint.c-186-#ifndef LISP_FEATURE_WIN32
sbcl-2.0.11/src/runtime/breakpoint.c:187: thread_sigmask(SIG_SETMASK, os_context_sigmask_addr(context), 0);
sbcl-2.0.11/src/runtime/breakpoint.c-188-#endif
##############################################
sbcl-2.0.11/src/runtime/riscv-arch.c-27-os_vm_address_t
sbcl-2.0.11/src/runtime/riscv-arch.c:28:arch_get_bad_addr(int signam, siginfo_t *siginfo, os_context_t *context)
sbcl-2.0.11/src/runtime/riscv-arch.c-29-{
##############################################
sbcl-2.0.11/src/runtime/riscv-arch.c-38- /* Note that we're doing integer arithmetic here, not pointer. So
sbcl-2.0.11/src/runtime/riscv-arch.c:39: * the value that the return value of os_context_pc_addr() points
sbcl-2.0.11/src/runtime/riscv-arch.c-40- * to will be incremented by 4, not 16.
sbcl-2.0.11/src/runtime/riscv-arch.c-41- */
sbcl-2.0.11/src/runtime/riscv-arch.c:42: *os_context_pc_addr(context) += 4;
sbcl-2.0.11/src/runtime/riscv-arch.c-43-}
##############################################
sbcl-2.0.11/src/runtime/riscv-arch.c-46-{
sbcl-2.0.11/src/runtime/riscv-arch.c:47: return (unsigned char*)(*os_context_pc_addr(context) + 5);
sbcl-2.0.11/src/runtime/riscv-arch.c-48-}
##############################################
sbcl-2.0.11/src/runtime/riscv-arch.c-104-{
sbcl-2.0.11/src/runtime/riscv-arch.c:105: *os_context_pc_addr(context) = (long) handle_fun_end_breakpoint(context);
sbcl-2.0.11/src/runtime/riscv-arch.c-106-}
##############################################
sbcl-2.0.11/src/runtime/riscv-arch.c-111- unsigned char register_offset =
sbcl-2.0.11/src/runtime/riscv-arch.c:112: *((unsigned char *)(*os_context_pc_addr(context)) + 5);
sbcl-2.0.11/src/runtime/riscv-arch.c-113- handle_single_step_trap(context, trap, register_offset);
##############################################
sbcl-2.0.11/src/runtime/riscv-arch.c-123-{
sbcl-2.0.11/src/runtime/riscv-arch.c:124: uint32_t trap_instruction = *((uint32_t *)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/riscv-arch.c-125-
##############################################
sbcl-2.0.11/src/runtime/riscv-arch.c-130-
sbcl-2.0.11/src/runtime/riscv-arch.c:131: uint32_t code = *((uint32_t *)(4 + *os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/riscv-arch.c-132-
##############################################
sbcl-2.0.11/src/runtime/sparc-bsd-os.h-6-static inline os_context_t *arch_os_get_context(void **void_context) {
sbcl-2.0.11/src/runtime/sparc-bsd-os.h:7: asm volatile ("ta 0x03"); /* ta ST_FLUSH_WINDOWS */
sbcl-2.0.11/src/runtime/sparc-bsd-os.h-8- return (os_context_t *) (*void_context);
##############################################
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-138-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:139:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-140-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-146-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:147:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-148-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-152-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:153:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-154-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-158-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:159:os_context_fp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-160-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-171-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:172:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-173-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-177-sigset_t *
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:178:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-179-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-188- unsigned int temp = (context->uc_mcontext.fpregs->mxcsr) & ~0x3F;
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:189: asm ("ldmxcsr %0" : : "m" (temp));
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-190- /* same for x87 FPU. */
sbcl-2.0.11/src/runtime/x86-64-linux-os.c:191: asm ("fldcw %0" : : "m" (context->uc_mcontext.fpregs->cwd));
sbcl-2.0.11/src/runtime/x86-64-linux-os.c-192- }
##############################################
sbcl-2.0.11/src/runtime/interr.c-211-void skip_internal_error (os_context_t *context) {
sbcl-2.0.11/src/runtime/interr.c:212: unsigned char *ptr = (unsigned char *)*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interr.c-213-#ifdef LISP_FEATURE_ARM64
##############################################
sbcl-2.0.11/src/runtime/interr.c-236- if (code > sizeof(internal_error_nargs)) {
sbcl-2.0.11/src/runtime/interr.c:237: printf("Unknown error code %d at %p\n", code, (void*)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/interr.c-238- }
##############################################
sbcl-2.0.11/src/runtime/interr.c-242- ptr += nbytes;
sbcl-2.0.11/src/runtime/interr.c:243: *((unsigned char **)os_context_pc_addr(context)) = ptr;
sbcl-2.0.11/src/runtime/interr.c-244-}
##############################################
sbcl-2.0.11/src/runtime/interr.c-256- int position, sc_and_offset, sc_number, offset, ch;
sbcl-2.0.11/src/runtime/interr.c:257: void * pc = (void*)*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/interr.c-258- unsigned char code;
##############################################
sbcl-2.0.11/src/runtime/interr.c-290- putchar('\t');
sbcl-2.0.11/src/runtime/interr.c:291: brief_print(*os_context_register_addr(context, offset));
sbcl-2.0.11/src/runtime/interr.c-292- break;
##############################################
sbcl-2.0.11/src/runtime/interr.c-294- case sc_CharacterReg:
sbcl-2.0.11/src/runtime/interr.c:295: ch = *os_context_register_addr(context, offset);
sbcl-2.0.11/src/runtime/interr.c-296-#ifdef LISP_FEATURE_X86
##############################################
sbcl-2.0.11/src/runtime/interr.c-317-#endif
sbcl-2.0.11/src/runtime/interr.c:318: printf("\t0x%08lx\n", (unsigned long) *os_context_register_addr(context, offset));
sbcl-2.0.11/src/runtime/interr.c-319- break;
sbcl-2.0.11/src/runtime/interr.c-320- case sc_SignedReg:
sbcl-2.0.11/src/runtime/interr.c:321: printf("\t%ld\n", (long) *os_context_register_addr(context, offset));
sbcl-2.0.11/src/runtime/interr.c-322- break;
sbcl-2.0.11/src/runtime/interr.c-323- case sc_UnsignedReg:
sbcl-2.0.11/src/runtime/interr.c:324: printf("\t%lu\n", (unsigned long) *os_context_register_addr(context, offset));
sbcl-2.0.11/src/runtime/interr.c-325- break;
##############################################
sbcl-2.0.11/src/runtime/traceroot.c-214- os_context_t *c = nth_interrupt_context(i-1, th);
sbcl-2.0.11/src/runtime/traceroot.c:215: fp = (uword_t*)*os_context_register_addr(c,reg_FP);
sbcl-2.0.11/src/runtime/traceroot.c-216- }
##############################################
sbcl-2.0.11/src/runtime/traceroot.c-252- os_context_t *c = nth_interrupt_context(i, th);
sbcl-2.0.11/src/runtime/traceroot.c:253: esp1 = (void **) *os_context_register_addr(c,reg_SP);
sbcl-2.0.11/src/runtime/traceroot.c-254- if (esp1>=(void **)th->control_stack_start && esp1<(void **)th->control_stack_end) {
##############################################
sbcl-2.0.11/src/runtime/x86-sunos-os.c-137-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-sunos-os.c:138:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-sunos-os.c-139-{
##############################################
sbcl-2.0.11/src/runtime/x86-sunos-os.c-155-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-sunos-os.c:156:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-sunos-os.c-157-{
##############################################
sbcl-2.0.11/src/runtime/x86-sunos-os.c-161-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-sunos-os.c:162:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-sunos-os.c-163-{
##############################################
sbcl-2.0.11/src/runtime/x86-sunos-os.c-167-sigset_t *
sbcl-2.0.11/src/runtime/x86-sunos-os.c:168:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-sunos-os.c-169-{
##############################################
sbcl-2.0.11/src/runtime/arm64-linux-os.c-56-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-linux-os.c:57:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm64-linux-os.c-58-{
##############################################
sbcl-2.0.11/src/runtime/arm64-linux-os.c-62-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-linux-os.c:63:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-linux-os.c-64-{
##############################################
sbcl-2.0.11/src/runtime/arm64-linux-os.c-68-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-linux-os.c:69:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-linux-os.c-70-{
sbcl-2.0.11/src/runtime/arm64-linux-os.c:71: return os_context_register_addr(context, reg_LR);
sbcl-2.0.11/src/runtime/arm64-linux-os.c-72-}
##############################################
sbcl-2.0.11/src/runtime/arm64-linux-os.c-74-sigset_t *
sbcl-2.0.11/src/runtime/arm64-linux-os.c:75:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-linux-os.c-76-{
##############################################
sbcl-2.0.11/src/runtime/arm64-linux-os.c-86-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-linux-os.c:87:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm64-linux-os.c-88-{
##############################################
sbcl-2.0.11/src/runtime/sparc-linux-os.c-48-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-linux-os.c:49:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/sparc-linux-os.c-50-{
##############################################
sbcl-2.0.11/src/runtime/sparc-linux-os.c-64-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-linux-os.c:65:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-linux-os.c-66-{
##############################################
sbcl-2.0.11/src/runtime/sparc-linux-os.c-70-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-linux-os.c:71:os_context_npc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-linux-os.c-72-{
##############################################
sbcl-2.0.11/src/runtime/sparc-linux-os.c-76-sigset_t *
sbcl-2.0.11/src/runtime/sparc-linux-os.c:77:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-linux-os.c-78-{
##############################################
sbcl-2.0.11/src/runtime/sparc-linux-os.c-89-
sbcl-2.0.11/src/runtime/sparc-linux-os.c:90: asm ("msfsf $255, %0" : : "m"
sbcl-2.0.11/src/runtime/sparc-linux-os.c-91- (os_context_fp_control(context) &
##############################################
sbcl-2.0.11/src/runtime/bsd-os.c-108-sigset_t *
sbcl-2.0.11/src/runtime/bsd-os.c:109:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/bsd-os.c-110-{
##############################################
sbcl-2.0.11/src/runtime/bsd-os.c-254-{
sbcl-2.0.11/src/runtime/bsd-os.c:255: void *fault_addr = arch_get_bad_addr(signal, siginfo, context);
sbcl-2.0.11/src/runtime/bsd-os.c-256-
##############################################
sbcl-2.0.11/src/runtime/bsd-os.c-262-
sbcl-2.0.11/src/runtime/bsd-os.c:263: FSHOW((stderr, "Memory fault at: %p, PC: %p\n", fault_addr, *os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/bsd-os.c-264-
##############################################
sbcl-2.0.11/src/runtime/bsd-os.c-317-
sbcl-2.0.11/src/runtime/bsd-os.c:318: addr = arch_get_bad_addr(signal, info, context);
sbcl-2.0.11/src/runtime/bsd-os.c-319- if (!cheneygc_handle_wp_violation(context, addr))
##############################################
sbcl-2.0.11/src/runtime/safepoint.c-251-#ifdef LISP_FEATURE_C_STACK_IS_CONTROL_STACK
sbcl-2.0.11/src/runtime/safepoint.c:252: void **sp = (void **) *os_context_register_addr(ctx, reg_SP);
sbcl-2.0.11/src/runtime/safepoint.c-253- /* On POSIX platforms, it is sufficient to investigate only the part
##############################################
sbcl-2.0.11/src/runtime/safepoint.c-523- /* ctx is NULL if the caller wants to ignore the sigmask. */
sbcl-2.0.11/src/runtime/safepoint.c:524: if (ctx && deferrables_blocked_p(os_context_sigmask_addr(ctx)))
sbcl-2.0.11/src/runtime/safepoint.c-525- return 0;
##############################################
sbcl-2.0.11/src/runtime/ppc64-arch.h-8-
sbcl-2.0.11/src/runtime/ppc64-arch.h:9:os_context_register_t *os_context_ctr_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/ppc64-arch.h:10:os_context_register_t *os_context_cr_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/ppc64-arch.h-11-
##############################################
sbcl-2.0.11/src/runtime/riscv-linux-os.c-51-os_context_register_t *
sbcl-2.0.11/src/runtime/riscv-linux-os.c:52:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/riscv-linux-os.c-53-{
##############################################
sbcl-2.0.11/src/runtime/riscv-linux-os.c-57-os_context_register_t *
sbcl-2.0.11/src/runtime/riscv-linux-os.c:58:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/riscv-linux-os.c-59-{
sbcl-2.0.11/src/runtime/riscv-linux-os.c:60: return os_context_register_addr(context, 0);
sbcl-2.0.11/src/runtime/riscv-linux-os.c-61-}
##############################################
sbcl-2.0.11/src/runtime/riscv-linux-os.c-63-os_context_register_t *
sbcl-2.0.11/src/runtime/riscv-linux-os.c:64:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/riscv-linux-os.c-65-{
sbcl-2.0.11/src/runtime/riscv-linux-os.c:66: return os_context_register_addr(context, reg_LIP);
sbcl-2.0.11/src/runtime/riscv-linux-os.c-67-}
##############################################
sbcl-2.0.11/src/runtime/riscv-linux-os.c-69-sigset_t *
sbcl-2.0.11/src/runtime/riscv-linux-os.c:70:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/riscv-linux-os.c-71-{
##############################################
sbcl-2.0.11/src/runtime/riscv-linux-os.c-81-os_context_register_t *
sbcl-2.0.11/src/runtime/riscv-linux-os.c:82:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/riscv-linux-os.c-83-{
##############################################
sbcl-2.0.11/src/runtime/allocptr-lisp-symbol.inc-36- #ifndef DO_PENDING_INTERRUPT
sbcl-2.0.11/src/runtime/allocptr-lisp-symbol.inc:37: // RISCV defines do_pending_interrupt as a lisp asm routine the address of which
sbcl-2.0.11/src/runtime/allocptr-lisp-symbol.inc-38- // is stored in a static lisp symbol and which in C is obtained via #define.
##############################################
sbcl-2.0.11/src/runtime/parse.h-14-extern int parse_lispobj(char **ptr, lispobj *output);
sbcl-2.0.11/src/runtime/parse.h:15:extern int parse_addr(char **ptr, boolean safely, char **output);
sbcl-2.0.11/src/runtime/parse.h-16-extern int parse_number(char **ptr, int *output);
##############################################
sbcl-2.0.11/src/runtime/arm-arch.c-26-
sbcl-2.0.11/src/runtime/arm-arch.c:27:os_vm_address_t arch_get_bad_addr(int sig, siginfo_t *code, os_context_t *context)
sbcl-2.0.11/src/runtime/arm-arch.c-28-{
##############################################
sbcl-2.0.11/src/runtime/arm-arch.c-37- /* Note that we're doing integer arithmetic here, not pointer. So
sbcl-2.0.11/src/runtime/arm-arch.c:38: * the value that the return value of os_context_pc_addr() points
sbcl-2.0.11/src/runtime/arm-arch.c-39- * to will be incremented by 4, not 16.
sbcl-2.0.11/src/runtime/arm-arch.c-40- */
sbcl-2.0.11/src/runtime/arm-arch.c:41: *os_context_pc_addr(context) += 4;
sbcl-2.0.11/src/runtime/arm-arch.c-42-}
##############################################
sbcl-2.0.11/src/runtime/arm-arch.c-45-{
sbcl-2.0.11/src/runtime/arm-arch.c:46: return (unsigned char *)(*os_context_pc_addr(context) + 5);
sbcl-2.0.11/src/runtime/arm-arch.c-47-}
##############################################
sbcl-2.0.11/src/runtime/arm-arch.c-105-{
sbcl-2.0.11/src/runtime/arm-arch.c:106: *os_context_pc_addr(context) = (int) handle_fun_end_breakpoint(context);
sbcl-2.0.11/src/runtime/arm-arch.c-107-}
##############################################
sbcl-2.0.11/src/runtime/arm-arch.c-112- unsigned char register_offset =
sbcl-2.0.11/src/runtime/arm-arch.c:113: *((unsigned char *)(*os_context_pc_addr(context))+5);
sbcl-2.0.11/src/runtime/arm-arch.c-114- handle_single_step_trap(context, trap, register_offset);
##############################################
sbcl-2.0.11/src/runtime/linux-os.c-369- // This calls corruption_warning_and_maybe_lose.
sbcl-2.0.11/src/runtime/linux-os.c:370: lisp_memory_fault_error(context, arch_get_bad_addr(signal, info, context));
sbcl-2.0.11/src/runtime/linux-os.c-371-}
##############################################
sbcl-2.0.11/src/runtime/linux-os.c-378-{
sbcl-2.0.11/src/runtime/linux-os.c:379: os_vm_address_t addr = arch_get_bad_addr(signal, info, context);
sbcl-2.0.11/src/runtime/linux-os.c-380-
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-50-
sbcl-2.0.11/src/runtime/x86-win32-os.c:51: asm volatile ("movl %%fs:0,%0": "=r" (top_exception_frame));
sbcl-2.0.11/src/runtime/x86-win32-os.c:52: asm volatile ("movl %%fs:4,%0": "=r" (cur_stack_end));
sbcl-2.0.11/src/runtime/x86-win32-os.c-53-
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-101-#if defined(LISP_FEATURE_SB_THREAD)
sbcl-2.0.11/src/runtime/x86-win32-os.c:102:sigset_t *os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-win32-os.c-103-{
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-108-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-win32-os.c:109:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-win32-os.c-110-{
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-126-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-win32-os.c:127:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-win32-os.c-128-{
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-132-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-win32-os.c:133:os_context_sp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-win32-os.c-134-{
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-138-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-win32-os.c:139:os_context_fp_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-win32-os.c-140-{
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-153-{
sbcl-2.0.11/src/runtime/x86-win32-os.c:154: asm ("fldcw %0" : : "m" (context->win32_context->FloatSave.ControlWord));
sbcl-2.0.11/src/runtime/x86-win32-os.c-155-}
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.c-157-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-win32-os.c:158:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/x86-win32-os.c-159-{
##############################################
sbcl-2.0.11/src/runtime/x86-win32-os.h-23-
sbcl-2.0.11/src/runtime/x86-win32-os.h:24:os_context_register_t * os_context_fp_addr(os_context_t *context);
sbcl-2.0.11/src/runtime/x86-win32-os.h-25-
##############################################
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-48-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-bsd-os.c:49:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-50-{
##############################################
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-67-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-bsd-os.c:68:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-69-{
##############################################
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-73-os_context_register_t *
sbcl-2.0.11/src/runtime/sparc-bsd-os.c:74:os_context_npc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-75-{
##############################################
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-80-sigset_t *
sbcl-2.0.11/src/runtime/sparc-bsd-os.c:81:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/sparc-bsd-os.c-82-{
##############################################
sbcl-2.0.11/src/runtime/cheneygc.c-452- maybe_save_gc_mask_and_block_deferrables
sbcl-2.0.11/src/runtime/cheneygc.c:453: (os_context_sigmask_addr(context));
sbcl-2.0.11/src/runtime/cheneygc.c-454- } else {
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-40-os_vm_address_t
sbcl-2.0.11/src/runtime/x86-arch.c:41:arch_get_bad_addr(int sig, siginfo_t *code, os_context_t *context)
sbcl-2.0.11/src/runtime/x86-arch.c-42-{
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-55-int *
sbcl-2.0.11/src/runtime/x86-arch.c:56:context_eflags_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-arch.c-57-{
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-91- /* Get and skip the Lisp interrupt code. */
sbcl-2.0.11/src/runtime/x86-arch.c:92: code = *(char*)(*os_context_pc_addr(context))++;
sbcl-2.0.11/src/runtime/x86-arch.c-93- switch (code)
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-121- "/[arch_skip_inst resuming at %x]\n",
sbcl-2.0.11/src/runtime/x86-arch.c:122: *os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/x86-arch.c-123-}
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-127-{
sbcl-2.0.11/src/runtime/x86-arch.c:128: return 1 + (unsigned char *)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/x86-arch.c-129-}
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-182-{
sbcl-2.0.11/src/runtime/x86-arch.c:183: unsigned int *pc = (unsigned int*)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/x86-arch.c-184-
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-197-#else
sbcl-2.0.11/src/runtime/x86-arch.c:198: *context_eflags_addr(context) |= 0x100;
sbcl-2.0.11/src/runtime/x86-arch.c-199-#endif
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-203-#ifdef CANNOT_GET_TO_SINGLE_STEP_FLAG
sbcl-2.0.11/src/runtime/x86-arch.c:204: *os_context_pc_addr(context) = (os_context_register_t)((char *)pc - 9);
sbcl-2.0.11/src/runtime/x86-arch.c-205-#endif
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-217-#else
sbcl-2.0.11/src/runtime/x86-arch.c:218: *context_eflags_addr(context) &= ~0x100;
sbcl-2.0.11/src/runtime/x86-arch.c-219-#endif
sbcl-2.0.11/src/runtime/x86-arch.c-220- /* Re-install the breakpoint if possible. */
sbcl-2.0.11/src/runtime/x86-arch.c:221: if (((char *)*os_context_pc_addr(context) >
sbcl-2.0.11/src/runtime/x86-arch.c-222- (char *)single_stepping) &&
sbcl-2.0.11/src/runtime/x86-arch.c:223: ((char *)*os_context_pc_addr(context) <=
sbcl-2.0.11/src/runtime/x86-arch.c-224- (char *)single_stepping + BREAKPOINT_WIDTH)) {
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-236-{
sbcl-2.0.11/src/runtime/x86-arch.c:237: *os_context_pc_addr(context) -= BREAKPOINT_WIDTH;
sbcl-2.0.11/src/runtime/x86-arch.c-238- handle_breakpoint(context);
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-243-{
sbcl-2.0.11/src/runtime/x86-arch.c:244: *os_context_pc_addr(context) -= BREAKPOINT_WIDTH;
sbcl-2.0.11/src/runtime/x86-arch.c:245: *os_context_pc_addr(context) =
sbcl-2.0.11/src/runtime/x86-arch.c-246- (int)handle_fun_end_breakpoint(context);
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-271- access_control_stack_pointer(arch_os_get_current_thread()) =
sbcl-2.0.11/src/runtime/x86-arch.c:272: (lispobj *)*os_context_sp_addr(context);
sbcl-2.0.11/src/runtime/x86-arch.c-273-
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-288- * arguments to follow. */
sbcl-2.0.11/src/runtime/x86-arch.c:289: trap = *(unsigned char *)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/x86-arch.c-290- handle_trap(context, trap);
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-295-#ifndef LISP_FEATURE_MACH_EXCEPTION_HANDLER
sbcl-2.0.11/src/runtime/x86-arch.c:296: if (*((unsigned short *)*os_context_pc_addr(context)) == UD2_INST) {
sbcl-2.0.11/src/runtime/x86-arch.c:297: *os_context_pc_addr(context) += 2;
sbcl-2.0.11/src/runtime/x86-arch.c-298- return sigtrap_handler(signal, siginfo, context);
##############################################
sbcl-2.0.11/src/runtime/x86-arch.c-301- fake_foreign_function_call(context);
sbcl-2.0.11/src/runtime/x86-arch.c:302: lose("Unhandled SIGILL at %p.", (void*)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/x86-arch.c-303-}
##############################################
sbcl-2.0.11/src/runtime/sparc-sunos-os.h-8-{
sbcl-2.0.11/src/runtime/sparc-sunos-os.h:9: asm volatile ("ta 0x03"); /* ta ST_FLUSH_WINDOWS */
sbcl-2.0.11/src/runtime/sparc-sunos-os.h-10- return (os_context_t *) (*void_context);
##############################################
sbcl-2.0.11/src/runtime/arm-linux-os.c-60-os_context_register_t *
sbcl-2.0.11/src/runtime/arm-linux-os.c:61:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm-linux-os.c-62-{
##############################################
sbcl-2.0.11/src/runtime/arm-linux-os.c-71-os_context_register_t *
sbcl-2.0.11/src/runtime/arm-linux-os.c:72:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm-linux-os.c-73-{
sbcl-2.0.11/src/runtime/arm-linux-os.c:74: return os_context_register_addr(context, reg_PC);
sbcl-2.0.11/src/runtime/arm-linux-os.c-75-}
##############################################
sbcl-2.0.11/src/runtime/arm-linux-os.c-77-os_context_register_t *
sbcl-2.0.11/src/runtime/arm-linux-os.c:78:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm-linux-os.c-79-{
sbcl-2.0.11/src/runtime/arm-linux-os.c:80: return os_context_register_addr(context, reg_LR);
sbcl-2.0.11/src/runtime/arm-linux-os.c-81-}
##############################################
sbcl-2.0.11/src/runtime/arm-linux-os.c-83-sigset_t *
sbcl-2.0.11/src/runtime/arm-linux-os.c:84:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm-linux-os.c-85-{
##############################################
sbcl-2.0.11/src/runtime/arm-linux-os.c-105-{
sbcl-2.0.11/src/runtime/arm-linux-os.c:106: unsigned int code = *((unsigned char *)(4+*os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/arm-linux-os.c:107: uint32_t trap_instruction = *((uint32_t *)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/arm-linux-os.c-108-
##############################################
sbcl-2.0.11/src/runtime/mips-linux-os.c-47-os_context_register_t *
sbcl-2.0.11/src/runtime/mips-linux-os.c:48:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/mips-linux-os.c-49-{
##############################################
sbcl-2.0.11/src/runtime/mips-linux-os.c-55-os_context_register_t *
sbcl-2.0.11/src/runtime/mips-linux-os.c:56:os_context_fpregister_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/mips-linux-os.c-57-{
##############################################
sbcl-2.0.11/src/runtime/mips-linux-os.c-63-os_context_register_t *
sbcl-2.0.11/src/runtime/mips-linux-os.c:64:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/mips-linux-os.c-65-{
##############################################
sbcl-2.0.11/src/runtime/mips-linux-os.c-72-sigset_t *
sbcl-2.0.11/src/runtime/mips-linux-os.c:73:os_context_sigmask_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/mips-linux-os.c-74-{
##############################################
sbcl-2.0.11/src/runtime/mips-linux-os.c-115- os_vm_address_t addr
sbcl-2.0.11/src/runtime/mips-linux-os.c:116: = (os_vm_address_t)(unsigned int)*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/mips-linux-os.c-117- unsigned int insn = *(unsigned int *)addr;
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-61-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:62:os_context_register_addr(os_context_t *context, int regno)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-63-{
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-71-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:72:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-73-{
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-77-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:78:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-79-{
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-88-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:89:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-90-{
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:91: return os_context_register_addr(context, reg_LR);
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-92-}
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-129-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:130:os_context_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-131-{
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-135-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:136:os_context_pc_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-137-{
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:138: return os_context_register_addr(context, 32);
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-139-}
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-141-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:142:os_context_lr_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-143-{
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:144: return os_context_register_addr(context, reg_LR);
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-145-}
##############################################
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-153-os_context_register_t *
sbcl-2.0.11/src/runtime/arm64-bsd-os.c:154:os_context_float_register_addr(os_context_t *context, int offset)
sbcl-2.0.11/src/runtime/arm64-bsd-os.c-155-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-126-os_vm_address_t
sbcl-2.0.11/src/runtime/x86-64-arch.c:127:arch_get_bad_addr(int __attribute__((unused)) sig,
sbcl-2.0.11/src/runtime/x86-64-arch.c-128- siginfo_t *code,
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-143-os_context_register_t *
sbcl-2.0.11/src/runtime/x86-64-arch.c:144:context_eflags_addr(os_context_t *context)
sbcl-2.0.11/src/runtime/x86-64-arch.c-145-{
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-181- /* Get and skip the Lisp interrupt code. */
sbcl-2.0.11/src/runtime/x86-64-arch.c:182: code = *(char*)(*os_context_pc_addr(context))++;
sbcl-2.0.11/src/runtime/x86-64-arch.c-183- switch (code)
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-191- // because it is not an SC+OFFSET that follows the trap code.
sbcl-2.0.11/src/runtime/x86-64-arch.c:192: *os_context_pc_addr(context) += 1;
sbcl-2.0.11/src/runtime/x86-64-arch.c-193- break;
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-216- "/[arch_skip_inst resuming at %x]\n",
sbcl-2.0.11/src/runtime/x86-64-arch.c:217: *os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/x86-64-arch.c-218-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-222-{
sbcl-2.0.11/src/runtime/x86-64-arch.c:223: return 1 + (unsigned char *)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/x86-64-arch.c-224-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-281-{
sbcl-2.0.11/src/runtime/x86-64-arch.c:282: unsigned int *pc = (unsigned int*)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/x86-64-arch.c-283-
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-296-#else
sbcl-2.0.11/src/runtime/x86-64-arch.c:297: *context_eflags_addr(context) |= 0x100;
sbcl-2.0.11/src/runtime/x86-64-arch.c-298-#endif
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-302-#ifdef CANNOT_GET_TO_SINGLE_STEP_FLAG
sbcl-2.0.11/src/runtime/x86-64-arch.c:303: *os_context_pc_addr(context) = (os_context_register_t)((char *)pc - 9);
sbcl-2.0.11/src/runtime/x86-64-arch.c-304-#endif
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-309-{
sbcl-2.0.11/src/runtime/x86-64-arch.c:310: *os_context_pc_addr(context) -= BREAKPOINT_WIDTH;
sbcl-2.0.11/src/runtime/x86-64-arch.c-311- handle_breakpoint(context);
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-316-{
sbcl-2.0.11/src/runtime/x86-64-arch.c:317: *os_context_pc_addr(context) -= BREAKPOINT_WIDTH;
sbcl-2.0.11/src/runtime/x86-64-arch.c:318: *os_context_pc_addr(context) =
sbcl-2.0.11/src/runtime/x86-64-arch.c-319- (uword_t)handle_fun_end_breakpoint(context);
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-340-#else
sbcl-2.0.11/src/runtime/x86-64-arch.c:341: *context_eflags_addr(context) &= ~0x100;
sbcl-2.0.11/src/runtime/x86-64-arch.c-342-#endif
sbcl-2.0.11/src/runtime/x86-64-arch.c-343- /* Re-install the breakpoint if possible. */
sbcl-2.0.11/src/runtime/x86-64-arch.c:344: if (((char *)*os_context_pc_addr(context) >
sbcl-2.0.11/src/runtime/x86-64-arch.c-345- (char *)single_stepping) &&
sbcl-2.0.11/src/runtime/x86-64-arch.c:346: ((char *)*os_context_pc_addr(context) <=
sbcl-2.0.11/src/runtime/x86-64-arch.c-347- (char *)single_stepping + BREAKPOINT_WIDTH)) {
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-371- access_control_stack_pointer(arch_os_get_current_thread()) =
sbcl-2.0.11/src/runtime/x86-64-arch.c:372: (lispobj *)*os_context_sp_addr(context);
sbcl-2.0.11/src/runtime/x86-64-arch.c-373-
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-377- * arguments to follow. */
sbcl-2.0.11/src/runtime/x86-64-arch.c:378: trap = *(unsigned char *)(*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/x86-64-arch.c-379-#ifdef LISP_FEATURE_IMMOBILE_SPACE
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-383- // (FIXME: an interior pointer to an fdefn _should_ pin it, but doesn't)
sbcl-2.0.11/src/runtime/x86-64-arch.c:384: lispobj* fdefn = (lispobj*)(*os_context_pc_addr(context) & ~LOWTAG_MASK);
sbcl-2.0.11/src/runtime/x86-64-arch.c-385- if (fdefn && widetag_of(fdefn) == FDEFN_WIDETAG) {
sbcl-2.0.11/src/runtime/x86-64-arch.c-386- // Return to undefined-tramp
sbcl-2.0.11/src/runtime/x86-64-arch.c:387: *os_context_pc_addr(context) = (uword_t)((struct fdefn*)fdefn)->raw_addr;
sbcl-2.0.11/src/runtime/x86-64-arch.c-388- // with RAX containing the FDEFN
sbcl-2.0.11/src/runtime/x86-64-arch.c:389: *os_context_register_addr(context,reg_RAX) =
sbcl-2.0.11/src/runtime/x86-64-arch.c-390- make_lispobj(fdefn, OTHER_POINTER_LOWTAG);
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-401- os_context_t *context) {
sbcl-2.0.11/src/runtime/x86-64-arch.c:402: unsigned char* pc = (void*)*os_context_pc_addr(context);
sbcl-2.0.11/src/runtime/x86-64-arch.c-403-#ifndef LISP_FEATURE_MACH_EXCEPTION_HANDLER
sbcl-2.0.11/src/runtime/x86-64-arch.c-404- if (*(unsigned short *)pc == UD2_INST) {
sbcl-2.0.11/src/runtime/x86-64-arch.c:405: *os_context_pc_addr(context) += 2;
sbcl-2.0.11/src/runtime/x86-64-arch.c-406- return sigtrap_handler(signal, siginfo, context);
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-409- if (*(unsigned char *)pc == INTO_INST) {
sbcl-2.0.11/src/runtime/x86-64-arch.c:410: *os_context_pc_addr(context) += 1;
sbcl-2.0.11/src/runtime/x86-64-arch.c-411- return sigtrap_handler(signal, siginfo, context);
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-458-{
sbcl-2.0.11/src/runtime/x86-64-arch.c:459: unsigned int *mxcsr = arch_os_context_mxcsr_addr(context);
sbcl-2.0.11/src/runtime/x86-64-arch.c-460-
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-528- * control+status flags */
sbcl-2.0.11/src/runtime/x86-64-arch.c:529: asm ("fnstsw %0" : "=m" (temp));
sbcl-2.0.11/src/runtime/x86-64-arch.c-530- result = temp;
sbcl-2.0.11/src/runtime/x86-64-arch.c-531- result &= 0x3F;
sbcl-2.0.11/src/runtime/x86-64-arch.c:532: asm ("stmxcsr %0" : "=m" (temp));
sbcl-2.0.11/src/runtime/x86-64-arch.c-533- result |= temp;
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-556- /* set x87 modes */
sbcl-2.0.11/src/runtime/x86-64-arch.c:557: asm ("fnstenv %0" : "=m" (f_env));
sbcl-2.0.11/src/runtime/x86-64-arch.c-558- /* set control word: always long double precision
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-564-
sbcl-2.0.11/src/runtime/x86-64-arch.c:565: asm ("fldenv %0" : : "m" (f_env));
sbcl-2.0.11/src/runtime/x86-64-arch.c-566-
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-568- temp = mxcsr;
sbcl-2.0.11/src/runtime/x86-64-arch.c:569: asm ("ldmxcsr %0" : : "m" (temp));
sbcl-2.0.11/src/runtime/x86-64-arch.c-570-}
##############################################
sbcl-2.0.11/src/runtime/x86-64-arch.c-583- // technically this should return the address of the code object
sbcl-2.0.11/src/runtime/x86-64-arch.c:584: // containing asm routines, but it's fine to return 0.
sbcl-2.0.11/src/runtime/x86-64-arch.c-585- return 0;
##############################################
sbcl-2.0.11/src/runtime/coreparse.c-637- }
sbcl-2.0.11/src/runtime/coreparse.c:638: if (!asm_routines_start) lose("Can't find asm routines");
sbcl-2.0.11/src/runtime/coreparse.c-639- }
##############################################
sbcl-2.0.11/src/runtime/coreparse.c-736- // MOV RAX, some_c_symbol(%rip)
sbcl-2.0.11/src/runtime/coreparse.c:737: // but that's more of a change to the asm instructions than I'm comfortable making;
sbcl-2.0.11/src/runtime/coreparse.c-738- // whereas "CALL linkage_entry_for_f" -> "CALL f" is quite straightforward.
##############################################
sbcl-2.0.11/src/runtime/sunos-os.c-99-{
sbcl-2.0.11/src/runtime/sunos-os.c:100: os_vm_address_t addr = arch_get_bad_addr(signal, info, context);
sbcl-2.0.11/src/runtime/sunos-os.c-101-
##############################################
sbcl-2.0.11/src/runtime/x86-darwin-os.h-13-void set_data_desc_size(data_desc_t* desc, unsigned long size);
sbcl-2.0.11/src/runtime/x86-darwin-os.h:14:void set_data_desc_addr(data_desc_t* desc, void* addr);
sbcl-2.0.11/src/runtime/x86-darwin-os.h-15-
##############################################
sbcl-2.0.11/src/runtime/monitor.c-126- }
sbcl-2.0.11/src/runtime/monitor.c:127: if (!parse_addr(ptr, !force, &addr)) return 0;
sbcl-2.0.11/src/runtime/monitor.c-128-
##############################################
sbcl-2.0.11/src/runtime/monitor.c-402- printf("%s:\t", lisp_register_names[i]);
sbcl-2.0.11/src/runtime/monitor.c:403: brief_print((lispobj)(*os_context_register_addr(context,i)));
sbcl-2.0.11/src/runtime/monitor.c-404-
##############################################
sbcl-2.0.11/src/runtime/monitor.c-406-#if defined(LISP_FEATURE_DARWIN) && defined(LISP_FEATURE_PPC)
sbcl-2.0.11/src/runtime/monitor.c:407: printf("DAR:\t\t 0x%08lx\n", (unsigned long)(*os_context_register_addr(context, 41)));
sbcl-2.0.11/src/runtime/monitor.c:408: printf("DSISR:\t\t 0x%08lx\n", (unsigned long)(*os_context_register_addr(context, 42)));
sbcl-2.0.11/src/runtime/monitor.c-409-#endif
##############################################
sbcl-2.0.11/src/runtime/monitor.c-411- printf("PC:\t\t 0x%08lx\n",
sbcl-2.0.11/src/runtime/monitor.c:412: (unsigned long)(*os_context_pc_addr(context)));
sbcl-2.0.11/src/runtime/monitor.c-413-#endif
##############################################
sbcl-2.0.11/src/runtime/monitor.c-467- char *addr;
sbcl-2.0.11/src/runtime/monitor.c:468: if (!parse_addr(ptr, 1, &addr)) return 0;
sbcl-2.0.11/src/runtime/monitor.c-469- lispobj *obj = search_all_gc_spaces((void*)addr);
##############################################
sbcl-2.0.11/src/runtime/monitor.c-511- extern void ldb_monitor();
sbcl-2.0.11/src/runtime/monitor.c:512: fprintf(stderr, "\nSIGINT hit at %p\n", (void*)*os_context_pc_addr(context));
sbcl-2.0.11/src/runtime/monitor.c-513- ldb_monitor();
##############################################
sbcl-2.0.11/src/code/target-sxhash.lisp-101- (let* ((header-word (instance-header-word instance))
sbcl-2.0.11/src/code/target-sxhash.lisp:102: (addr (with-pinned-objects (instance)
sbcl-2.0.11/src/code/target-sxhash.lisp-103- ;; First we have to indicate that a hash was taken from the address
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-414-;;; Compute the address of the specified slot and return a pointer to it.
sbcl-2.0.11/src/code/target-alieneval.lisp:415:(defun %slot-addr (alien slot)
sbcl-2.0.11/src/code/target-alieneval.lisp-416- (declare (type alien-value alien)
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-420- (alien-pointer-type
sbcl-2.0.11/src/code/target-alieneval.lisp:421: (%slot-addr (deref alien) slot))
sbcl-2.0.11/src/code/target-alieneval.lisp-422- (alien-record-type
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-491-
sbcl-2.0.11/src/code/target-alieneval.lisp:492:(defun %deref-addr (alien &rest indices)
sbcl-2.0.11/src/code/target-alieneval.lisp-493- (declare (type alien-value alien)
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-513-
sbcl-2.0.11/src/code/target-alieneval.lisp:514:(defun %heap-alien-addr (info)
sbcl-2.0.11/src/code/target-alieneval.lisp-515- (declare (type heap-alien-info info))
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-567-
sbcl-2.0.11/src/code/target-alieneval.lisp:568:(defun %local-alien-addr (info alien)
sbcl-2.0.11/src/code/target-alieneval.lisp-569- (declare (type local-alien-info info))
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-576-
sbcl-2.0.11/src/code/target-alieneval.lisp:577:(defmacro addr (expr &environment env)
sbcl-2.0.11/src/code/target-alieneval.lisp-578- "Return an Alien pointer to the data addressed by Expr, which must be a call
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-584- (slot
sbcl-2.0.11/src/code/target-alieneval.lisp:585: (cons '%slot-addr (cdr form)))
sbcl-2.0.11/src/code/target-alieneval.lisp-586- (deref
sbcl-2.0.11/src/code/target-alieneval.lisp:587: (cons '%deref-addr (cdr form)))
sbcl-2.0.11/src/code/target-alieneval.lisp-588- (%heap-alien
sbcl-2.0.11/src/code/target-alieneval.lisp:589: (cons '%heap-alien-addr (cdr form)))
sbcl-2.0.11/src/code/target-alieneval.lisp-590- (local-alien
##############################################
sbcl-2.0.11/src/code/target-alieneval.lisp-598- (setf (local-alien-info-force-to-memory-p info) t))
sbcl-2.0.11/src/code/target-alieneval.lisp:599: (cons '%local-alien-addr (cdr form)))))
sbcl-2.0.11/src/code/target-alieneval.lisp-600- (symbol
##############################################
sbcl-2.0.11/src/code/target-hash-table.lisp-1209- ;; In the case of EQL, we get most bang-for-buck (performance per
sbcl-2.0.11/src/code/target-hash-table.lisp:1210: ;; line of asm code) by inlining EQL, not by loop unrolling,
sbcl-2.0.11/src/code/target-hash-table.lisp-1211- ;; but we might as well unroll a little bit to lessen the impact
##############################################
sbcl-2.0.11/src/code/linkage-table.lisp-35- ;; which when accessed will result in an UNDEFINED-ALIEN-ERROR.
sbcl-2.0.11/src/code/linkage-table.lisp:36: `(let ((addr (find-dynamic-foreign-symbol-address name)))
sbcl-2.0.11/src/code/linkage-table.lisp-37- (cond (addr
##############################################
sbcl-2.0.11/src/code/cold-init.lisp-371- (/noshow0 "entering HEXSTR")
sbcl-2.0.11/src/code/cold-init.lisp:372: (let* ((addr (get-lisp-obj-address thing))
sbcl-2.0.11/src/code/cold-init.lisp-373- (nchars (* sb-vm:n-word-bytes 2))
##############################################
sbcl-2.0.11/src/code/cold-init.lisp-386- (setf (char str (- (1+ nchars) i)) chr
sbcl-2.0.11/src/code/cold-init.lisp:387: addr (ash addr -4))))
sbcl-2.0.11/src/code/cold-init.lisp-388- str))
##############################################
sbcl-2.0.11/src/code/unix.lisp-338- (with-alien ((ptr (* char) sap))
sbcl-2.0.11/src/code/unix.lisp:339: (addr (deref ptr offset)))
sbcl-2.0.11/src/code/unix.lisp-340- len)))
##############################################
sbcl-2.0.11/src/code/mips-vm.lisp-55- (declare (type (alien (* os-context-t)) context))
sbcl-2.0.11/src/code/mips-vm.lisp:56: (let ((addr (context-float-register-addr context index)))
sbcl-2.0.11/src/code/mips-vm.lisp-57- (declare (type (alien (* os-context-register-t)) addr))
##############################################
sbcl-2.0.11/src/code/mips-vm.lisp-61- (declare (type (alien (* os-context-t)) context))
sbcl-2.0.11/src/code/mips-vm.lisp:62: (let ((addr (context-float-register-addr context index)))
sbcl-2.0.11/src/code/mips-vm.lisp-63- (declare (type (alien (* os-context-register-t)) addr))
##############################################
sbcl-2.0.11/src/code/alloc.lisp-312- ;; 3. Extend the frontier.
sbcl-2.0.11/src/code/alloc.lisp:313: (let* ((addr (sap-int *varyobj-space-free-pointer*))
sbcl-2.0.11/src/code/alloc.lisp-314- (free-ptr (+ addr n-bytes))
##############################################
sbcl-2.0.11/src/code/alloc.lisp-326- ;; Compute the start and end of the first page consumed.
sbcl-2.0.11/src/code/alloc.lisp:327: (let* ((page-start (logandc2 addr (1- immobile-card-bytes)))
sbcl-2.0.11/src/code/alloc.lisp-328- (page-end (+ page-start immobile-card-bytes))
##############################################
sbcl-2.0.11/src/code/alloc.lisp-337- ;; on the page or in the preceding 256MiB (approximately).
sbcl-2.0.11/src/code/alloc.lisp:338: (when (< addr (varyobj-page-scan-start index))
sbcl-2.0.11/src/code/alloc.lisp-339- (setf (varyobj-page-scan-start-offset index) (- page-end addr)))
##############################################
sbcl-2.0.11/src/code/alloc.lisp-421- (or (let ((start fixedobj-space-start))
sbcl-2.0.11/src/code/alloc.lisp:422: (<= start addr (truly-the word (+ start (1- fixedobj-space-size)))))
sbcl-2.0.11/src/code/alloc.lisp-423- (let ((start varyobj-space-start))
sbcl-2.0.11/src/code/alloc.lisp:424: (<= start addr (truly-the word (+ start (1- varyobj-space-size)))))))
sbcl-2.0.11/src/code/alloc.lisp-425-
##############################################
sbcl-2.0.11/src/code/x86-64-vm.lisp-263- (with-pinned-objects (gf)
sbcl-2.0.11/src/code/x86-64-vm.lisp:264: (let* ((addr (logandc2 (get-lisp-obj-address gf) lowtag-mask))
sbcl-2.0.11/src/code/x86-64-vm.lisp-265- (sap (int-sap addr))
##############################################
sbcl-2.0.11/src/code/x86-64-vm.lisp-340-#+immobile-code
sbcl-2.0.11/src/code/x86-64-vm.lisp:341:(defun fdefn-raw-addr (fdefn)
sbcl-2.0.11/src/code/x86-64-vm.lisp-342- (sap-ref-word (int-sap (get-lisp-obj-address fdefn))
##############################################
sbcl-2.0.11/src/code/x86-64-vm.lisp-350- (rbp (context-register context rbp-offset))
sbcl-2.0.11/src/code/x86-64-vm.lisp:351: (fun-addr (get-lisp-obj-address function)))
sbcl-2.0.11/src/code/x86-64-vm.lisp-352- (setf (sap-ref-word (int-sap rsp) 0)
##############################################
sbcl-2.0.11/src/code/gc.lisp-531-(defun heap-allocated-p (x)
sbcl-2.0.11/src/code/gc.lisp:532: (let ((addr (get-lisp-obj-address x)))
sbcl-2.0.11/src/code/gc.lisp-533- (and (sb-vm:is-lisp-pointer addr)
##############################################
sbcl-2.0.11/src/code/gc.lisp-537-;;; somewhere else which I could not find.
sbcl-2.0.11/src/code/gc.lisp:538:(defun lisp-space-p (sap &aux (addr (sap-int sap))) (cases))
sbcl-2.0.11/src/code/gc.lisp-539-) ; end MACROLET
##############################################
sbcl-2.0.11/src/code/condition.lisp-226- (stackp (x)
sbcl-2.0.11/src/code/condition.lisp:227: (let ((addr (get-lisp-obj-address x)))
sbcl-2.0.11/src/code/condition.lisp-228- (and (sb-vm:is-lisp-pointer addr)
sbcl-2.0.11/src/code/condition.lisp-229- (<= (get-lisp-obj-address sb-vm:*control-stack-start*) addr)
sbcl-2.0.11/src/code/condition.lisp:230: (< addr (get-lisp-obj-address sb-vm:*control-stack-end*))))))
sbcl-2.0.11/src/code/condition.lisp-231- (let* ((any-dx
##############################################
sbcl-2.0.11/src/code/condition.lisp-1169- ;; Extract the bound from (INTEGER 0 (BOUND))
sbcl-2.0.11/src/code/condition.lisp:1170: (caaddr (type-error-expected-type condition)))))))
sbcl-2.0.11/src/code/condition.lisp-1171-
##############################################
sbcl-2.0.11/src/code/arm64-vm.lisp-94- (with-pinned-context-code-object (context)
sbcl-2.0.11/src/code/arm64-vm.lisp:95: (let* ((fun-addr (get-lisp-obj-address function))
sbcl-2.0.11/src/code/arm64-vm.lisp-96- (entry (+ (sap-ref-word (int-sap fun-addr)
##############################################
sbcl-2.0.11/src/code/share-vm.lisp-71- (declare (type (alien (* os-context-t)) context))
sbcl-2.0.11/src/code/share-vm.lisp:72: (let ((addr (context-pc-addr context)))
sbcl-2.0.11/src/code/share-vm.lisp-73- (declare (type (alien (* unsigned)) addr))
##############################################
sbcl-2.0.11/src/code/share-vm.lisp-79- (with-pinned-context-code-object (context)
sbcl-2.0.11/src/code/share-vm.lisp:80: (let ((addr (context-pc-addr context)))
sbcl-2.0.11/src/code/share-vm.lisp-81- (declare (type (alien (* unsigned)) addr))
##############################################
sbcl-2.0.11/src/code/share-vm.lisp-88- (with-pinned-context-code-object (context)
sbcl-2.0.11/src/code/share-vm.lisp:89: (let ((addr (context-pc-addr context)))
sbcl-2.0.11/src/code/share-vm.lisp-90- (declare (type (alien (* unsigned)) addr))
##############################################
sbcl-2.0.11/src/code/share-vm.lisp-101- (declare (type (alien (* os-context-t)) context))
sbcl-2.0.11/src/code/share-vm.lisp:102: (let ((addr (context-register-addr context index)))
sbcl-2.0.11/src/code/share-vm.lisp-103- (declare (type (alien (* unsigned)) addr))
##############################################
sbcl-2.0.11/src/code/share-vm.lisp-108- (declare (type (alien (* os-context-t)) context))
sbcl-2.0.11/src/code/share-vm.lisp:109: (let ((addr (context-register-addr context index)))
sbcl-2.0.11/src/code/share-vm.lisp-110- (declare (type (alien (* unsigned)) addr))
##############################################
sbcl-2.0.11/src/code/share-vm.lisp-115- (declare (type (alien (* os-context-t)) context))
sbcl-2.0.11/src/code/share-vm.lisp:116: (let ((addr (context-register-addr context index)))
sbcl-2.0.11/src/code/share-vm.lisp-117- (declare (type (alien (* unsigned)) addr))
##############################################
sbcl-2.0.11/src/code/share-vm.lisp-125- (declare (type (alien (* os-context-t)) context))
sbcl-2.0.11/src/code/share-vm.lisp:126: (let ((addr (context-register-addr context index)))
sbcl-2.0.11/src/code/share-vm.lisp-127- (declare (type (alien (* unsigned)) addr))
##############################################
sbcl-2.0.11/src/code/save.lisp-231- #+immobile-code (sb-vm::choose-code-component-order root-structures)
sbcl-2.0.11/src/code/save.lisp:232: ;; Must clear this cache if asm routines are movable.
sbcl-2.0.11/src/code/save.lisp-233- (setq sb-disassem::*assembler-routines-by-addr* nil
##############################################
sbcl-2.0.11/src/code/list.lisp-39- (cddr list))
sbcl-2.0.11/src/code/list.lisp:40:(defun caddr (list)
sbcl-2.0.11/src/code/list.lisp-41- "Return the 1st object in the cddr of a list."
##############################################
sbcl-2.0.11/src/code/list.lisp-69- (caaadr list))
sbcl-2.0.11/src/code/list.lisp:70:(defun caaddr (list)
sbcl-2.0.11/src/code/list.lisp-71- "Return the car of the caddr of a list."
##############################################
sbcl-2.0.11/src/code/list.lisp-105- (cdadar list))
sbcl-2.0.11/src/code/list.lisp:106:(defun cdaddr (list)
sbcl-2.0.11/src/code/list.lisp-107- "Return the cdr of the caddr of a list."
##############################################
sbcl-2.0.11/src/code/list.lisp-228- "Return the 7th object in a list or NIL if there is no 7th object."
sbcl-2.0.11/src/code/list.lisp:229: (caddr (cddddr list)))
sbcl-2.0.11/src/code/list.lisp-230-(defun eighth (list)
##############################################
sbcl-2.0.11/src/code/foreign.lisp-65- (declare (ignorable sap))
sbcl-2.0.11/src/code/foreign.lisp:66: (let ((addr (sap-int sap)))
sbcl-2.0.11/src/code/foreign.lisp-67- (declare (ignorable addr))
##############################################
sbcl-2.0.11/src/code/foreign.lisp-80- (symbol-address unsigned)))
sbcl-2.0.11/src/code/foreign.lisp:81: (dladdr (function unsigned unsigned (* (struct dl-info)))
sbcl-2.0.11/src/code/foreign.lisp-82- :extern "dladdr"))
##############################################
sbcl-2.0.11/src/code/foreign.lisp-88- ;; a lock, and therefore every one should inhibit GC. But they don't.
sbcl-2.0.11/src/code/foreign.lisp:89: (let ((err (alien-funcall dladdr addr (addr info))))
sbcl-2.0.11/src/code/foreign.lisp-90- (if (zerop err)
##############################################
sbcl-2.0.11/src/code/debug-int.lisp-3487- (declare (type #-(or x86 x86-64) lra #+(or x86 x86-64) system-area-pointer real-lra))
sbcl-2.0.11/src/code/debug-int.lisp:3488: (macrolet ((symbol-addr (name)
sbcl-2.0.11/src/code/debug-int.lisp-3489- `(find-dynamic-foreign-symbol-address ,name))
##############################################
sbcl-2.0.11/src/code/debug-int.lisp-3529- ;; from arch-assem.S which is horrible. Either that assembly code
sbcl-2.0.11/src/code/debug-int.lisp:3530: ;; should be emitted as Lisp asm routine so that it has access to
sbcl-2.0.11/src/code/debug-int.lisp-3531- ;; SB-VM:CODE-CONSTANTS-OFFSET, or we should emit the header.
##############################################
sbcl-2.0.11/src/code/room.lisp-869- (lambda (obj obj-type size)
sbcl-2.0.11/src/code/room.lisp:870: (let ((addr (get-lisp-obj-address obj)))
sbcl-2.0.11/src/code/room.lisp-871- (when (>= addr start)
##############################################
sbcl-2.0.11/src/code/room.lisp-1341-(defun generation-of (object)
sbcl-2.0.11/src/code/room.lisp:1342: (let* ((addr (get-lisp-obj-address object))
sbcl-2.0.11/src/code/room.lisp-1343- (page (find-page-index addr)))
##############################################
sbcl-2.0.11/src/code/room.lisp-1348- (when (simple-fun-p object)
sbcl-2.0.11/src/code/room.lisp:1349: (setq addr (get-lisp-obj-address (fun-code-header object))))
sbcl-2.0.11/src/code/room.lisp-1350- (let ((sap (int-sap (logandc2 addr lowtag-mask))))
##############################################
sbcl-2.0.11/src/code/room.lisp-1377- ;; M-A-O disables GC, therefore GET-LISP-OBJ-ADDRESS is safe
sbcl-2.0.11/src/code/room.lisp:1378: (let ((obj-addr (get-lisp-obj-address obj))
sbcl-2.0.11/src/code/room.lisp-1379- (array (cond ((= type code-header-widetag)
##############################################
sbcl-2.0.11/src/code/room.lisp-1437- (format t "~x: ~v,'0x~:[~; = ~S~]~%"
sbcl-2.0.11/src/code/room.lisp:1438: (+ addr (ash i word-shift))
sbcl-2.0.11/src/code/room.lisp-1439- (* 2 n-word-bytes)
##############################################
sbcl-2.0.11/src/code/x86-vm.lisp-25- (declare (ignorable flavor))
sbcl-2.0.11/src/code/x86-vm.lisp:26: (let* ((obj-start-addr (logandc2 (get-lisp-obj-address code) sb-vm:lowtag-mask))
sbcl-2.0.11/src/code/x86-vm.lisp-27- (sap (code-instructions code))
sbcl-2.0.11/src/code/x86-vm.lisp:28: (code-end-addr (+ (sap-int sap) (%code-code-size code))))
sbcl-2.0.11/src/code/x86-vm.lisp-29- (ecase kind
##############################################
sbcl-2.0.11/src/pcl/vector.lisp-161- (when (and (symbolp var) (not (var-special-p var env)))
sbcl-2.0.11/src/pcl/vector.lisp:162: (let* ((rebound? (caddr (var-declaration '%variable-rebinding var env)))
sbcl-2.0.11/src/pcl/vector.lisp-163- (parameter-or-nil (car (memq (or rebound? var)
##############################################
sbcl-2.0.11/src/pcl/vector.lisp-165- (when parameter-or-nil
sbcl-2.0.11/src/pcl/vector.lisp:166: (let* ((class-name (caddr (var-declaration '%class
sbcl-2.0.11/src/pcl/vector.lisp-167- parameter-or-nil
##############################################
sbcl-2.0.11/src/pcl/walk.lisp-280-(defun env-declarations (env)
sbcl-2.0.11/src/pcl/walk.lisp:281: (caddr (env-lock env)))
sbcl-2.0.11/src/pcl/walk.lisp-282-
##############################################
sbcl-2.0.11/src/pcl/walk.lisp-291-(defun note-declaration (declaration env)
sbcl-2.0.11/src/pcl/walk.lisp:292: (push declaration (caddr (env-lock env))))
sbcl-2.0.11/src/pcl/walk.lisp-293-
##############################################
sbcl-2.0.11/install.sh-21- # values.
sbcl-2.0.11/install.sh:22: optarg=`expr "X$option" : '[^=]*=\(.*\)'` || optarg_ok=false
sbcl-2.0.11/install.sh:23: option=`expr "X$option" : 'X\([^=]*=\).*'`
sbcl-2.0.11/install.sh-24- ;;
##############################################
sbcl-2.0.11/install.sh-165- test -e $info && $CP $info "$BUILD_ROOT$INFO_DIR"/ \
sbcl-2.0.11/install.sh:166: && BN=`basename $info` \
sbcl-2.0.11/install.sh-167- && DIRFAIL=`install-info --info-dir="$BUILD_ROOT$INFO_DIR" \
##############################################
sbcl-2.0.11/install.sh-169- || echo "(could not add to system catalog)"` \
sbcl-2.0.11/install.sh:170: && echo " info $BUILD_ROOT$INFO_DIR/`basename $info` [$BUILD_ROOT$INFO_DIR/dir] $DIRFAIL"
sbcl-2.0.11/install.sh-171-done
##############################################
sbcl-2.0.11/install.sh-175- test -e $info && $CP $info "$BUILD_ROOT$INFO_DIR"/ \
sbcl-2.0.11/install.sh:176: && echo " info $BUILD_ROOT$INFO_DIR/`basename $info`"
sbcl-2.0.11/install.sh-177-done
##############################################
sbcl-2.0.11/install.sh-182- test -e $pdf && $CP $pdf "$BUILD_ROOT$DOC_DIR"/ \
sbcl-2.0.11/install.sh:183: && echo " pdf $BUILD_ROOT$DOC_DIR/`basename $pdf`"
sbcl-2.0.11/install.sh-184-done
##############################################
sbcl-2.0.11/install.sh-189- test -d $html && $CP -R -L $html "$BUILD_ROOT$DOC_DIR"/html \
sbcl-2.0.11/install.sh:190: && echo " html $BUILD_ROOT$DOC_DIR/html/`basename $html`/index.html"
sbcl-2.0.11/install.sh-191-done
##############################################
sbcl-2.0.11/install.sh-195- test -e $html && $CP $html "$BUILD_ROOT$DOC_DIR"/ \
sbcl-2.0.11/install.sh:196: && echo " html $BUILD_ROOT$DOC_DIR/`basename $html`"
sbcl-2.0.11/install.sh-197-done
##############################################
sbcl-2.0.11/make-config.sh-51- # values.
sbcl-2.0.11/make-config.sh:52: optarg=`expr "X$option" : '[^=]*=\(.*\)'` || optarg_ok=false
sbcl-2.0.11/make-config.sh:53: option=`expr "X$option" : 'X\([^=]*=\).*'`
sbcl-2.0.11/make-config.sh-54- ;;
sbcl-2.0.11/make-config.sh-55- --with*)
sbcl-2.0.11/make-config.sh:56: optarg=`expr "X$option" : 'X--[^-]*-\(.*\)'` \
sbcl-2.0.11/make-config.sh-57- || bad_option "Malformed feature toggle: $option"
sbcl-2.0.11/make-config.sh:58: option=`expr "X$option" : 'X\(--[^-]*\).*'`
sbcl-2.0.11/make-config.sh-59- ;;
##############################################
sbcl-2.0.11/make-config.sh-402- # Normalize it.
sbcl-2.0.11/make-config.sh:403: SBCL_ARCH=`echo $SBCL_ARCH | tr '[A-Z]' '[a-z]' | tr _ -`
sbcl-2.0.11/make-config.sh-404- case $SBCL_ARCH in
##############################################
sbcl-2.0.11/make-config.sh-708-echo //finishing $ltf
sbcl-2.0.11/make-config.sh:709:printf " %s" "`cat crossbuild-runner/backends/${sbcl_arch}/features`" >> $ltf
sbcl-2.0.11/make-config.sh-710-echo ")) (list$WITHOUT_FEATURES)))" >> $ltf
##############################################
sbcl-2.0.11/tools-for-build/os-provides-dladdr-test.c-14- Dl_info * info = (Dl_info*) malloc(sizeof(Dl_info));
sbcl-2.0.11/tools-for-build/os-provides-dladdr-test.c:15: if (dladdr(addr, info) == 0) {
sbcl-2.0.11/tools-for-build/os-provides-dladdr-test.c-16- return 1;
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-62- (align-up (space-size space) +backend-page-bytes+))
sbcl-2.0.11/tools-for-build/editcore.lisp:63:(defun space-physaddr (space spaces)
sbcl-2.0.11/tools-for-build/editcore.lisp-64- (sap+ (car spaces) (* (space-data-page space) +backend-page-bytes+)))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-69-(defun translate-ptr (addr spaces)
sbcl-2.0.11/tools-for-build/editcore.lisp:70: (let ((space (find addr (cdr spaces) :key #'space-addr :test #'>=)))
sbcl-2.0.11/tools-for-build/editcore.lisp-71- ;; FIXME: duplicates SPACE-PHYSADDR to avoid consing a SAP.
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-73- (+ (sap-int (car spaces)) (* (space-data-page space) +backend-page-bytes+)
sbcl-2.0.11/tools-for-build/editcore.lisp:74: (- addr (space-addr space)))))
sbcl-2.0.11/tools-for-build/editcore.lisp-75-
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-198-(defun in-bounds-p (addr bounds)
sbcl-2.0.11/tools-for-build/editcore.lisp:199: (and (>= addr (bounds-low bounds)) (< addr (bounds-high bounds))))
sbcl-2.0.11/tools-for-build/editcore.lisp-200-
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-405- (when (>= physaddr end) (return))
sbcl-2.0.11/tools-for-build/editcore.lisp:406: (let* ((obj (reconstitute-object (ash physaddr (- n-fixnum-tag-bits))))
sbcl-2.0.11/tools-for-build/editcore.lisp-407- (size (sb-vm::primitive-object-size obj)))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-567- (cond
sbcl-2.0.11/tools-for-build/editcore.lisp:568: ((< next-fixup-addr (dstate-next-addr dstate))
sbcl-2.0.11/tools-for-build/editcore.lisp-569- (let ((operand (sap-ref-32 sap (- next-fixup-addr load-addr)))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-596- (#x24 "jmp *"))))
sbcl-2.0.11/tools-for-build/editcore.lisp:597: ;; This instruction form is employed for asm routines when
sbcl-2.0.11/tools-for-build/editcore.lisp-598- ;; compile-to-memory-space is :AUTO. If the code were to be loaded
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-605- (pop (core-fixup-addrs core))
sbcl-2.0.11/tools-for-build/editcore.lisp:606: (setq next-fixup-addr (or (car (core-fixup-addrs core)) most-positive-word)))
sbcl-2.0.11/tools-for-build/editcore.lisp-607- ((or (eq inst inst-jmp) (eq inst inst-call))
sbcl-2.0.11/tools-for-build/editcore.lisp:608: (let ((target-addr (+ (near-jump-displacement dchunk dstate)
sbcl-2.0.11/tools-for-build/editcore.lisp-609- (dstate-next-addr dstate))))
sbcl-2.0.11/tools-for-build/editcore.lisp:610: (when (or (in-bounds-p target-addr (core-fixedobj-bounds core))
sbcl-2.0.11/tools-for-build/editcore.lisp:611: (in-bounds-p target-addr (core-linkage-bounds core)))
sbcl-2.0.11/tools-for-build/editcore.lisp-612- (push (list* (dstate-cur-offs dstate)
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-617- ((eq inst inst-jmpz)
sbcl-2.0.11/tools-for-build/editcore.lisp:618: (let ((target-addr (+ (near-cond-jump-displacement dchunk dstate)
sbcl-2.0.11/tools-for-build/editcore.lisp-619- (dstate-next-addr dstate))))
sbcl-2.0.11/tools-for-build/editcore.lisp:620: (when (in-bounds-p target-addr (core-linkage-bounds core))
sbcl-2.0.11/tools-for-build/editcore.lisp-621- (push (list* (dstate-cur-offs dstate) 6 "je" target-addr)
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-630-;;; Using assembler directives and/or real mnemonics, dump COUNT bytes
sbcl-2.0.11/tools-for-build/editcore.lisp:631:;;; of memory at PADDR (physical addr) to STREAM.
sbcl-2.0.11/tools-for-build/editcore.lisp-632-;;; The function's address as per the core file is VADDR.
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-830- ;; Like CODE-INSTRUCTIONS, but where the text virtually was
sbcl-2.0.11/tools-for-build/editcore.lisp:831: (text-vaddr (+ vaddr (* (code-header-words code) n-word-bytes)))
sbcl-2.0.11/tools-for-build/editcore.lisp-832- (additional-relative-fixups)
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-900- (- (1+ x)
sbcl-2.0.11/tools-for-build/editcore.lisp:901: (+ vaddr (ash (code-header-words code)
sbcl-2.0.11/tools-for-build/editcore.lisp-902- sb-vm:word-shift))))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-948- (core (make-core spaces code-bounds fixedobj-bounds enable-pie))
sbcl-2.0.11/tools-for-build/editcore.lisp:949: (code-addr (bounds-low code-bounds))
sbcl-2.0.11/tools-for-build/editcore.lisp-950- (total-code-size 0)
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-968- #+nil
sbcl-2.0.11/tools-for-build/editcore.lisp:969: (format t "~&~(~x: ~x~)~%" (+ logical-addr (* i n-word-bytes))
sbcl-2.0.11/tools-for-build/editcore.lisp-970- word)
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1047- (setf total-code-size obj-size))))
sbcl-2.0.11/tools-for-build/editcore.lisp:1048: (format output "~%# end of lisp asm routines~2%")
sbcl-2.0.11/tools-for-build/editcore.lisp-1049-
sbcl-2.0.11/tools-for-build/editcore.lisp-1050- (loop
sbcl-2.0.11/tools-for-build/editcore.lisp:1051: (when (>= code-addr (bounds-high code-bounds))
sbcl-2.0.11/tools-for-build/editcore.lisp-1052- (setq end-loc code-addr)
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1083- (mapcar (lambda (x)
sbcl-2.0.11/tools-for-build/editcore.lisp:1084: (+ code-addr (ash (code-header-words code) word-shift) x))
sbcl-2.0.11/tools-for-build/editcore.lisp-1085- (code-fixup-locs code spaces)))
sbcl-2.0.11/tools-for-build/editcore.lisp:1086: (let ((code-physaddr (logandc2 (get-lisp-obj-address code) lowtag-mask)))
sbcl-2.0.11/tools-for-build/editcore.lisp-1087- (format output "#x~x:~%" code-addr)
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1146- (relativize fdefn-raw-addr-slot)))
sbcl-2.0.11/tools-for-build/editcore.lisp:1147: (incf code-addr (* 4 n-word-bytes))))
sbcl-2.0.11/tools-for-build/editcore.lisp-1148- (#.funcallable-instance-widetag
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1172- collect (sap-ref-word sap i))))
sbcl-2.0.11/tools-for-build/editcore.lisp:1173: (incf code-addr (* 6 n-word-bytes))))))
sbcl-2.0.11/tools-for-build/editcore.lisp-1174-
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1232- (flags (unsigned 64))
sbcl-2.0.11/tools-for-build/editcore.lisp:1233: (addr (unsigned 64))
sbcl-2.0.11/tools-for-build/editcore.lisp-1234- (off (unsigned 64))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1507- (scanptrs (vaddr obj wordindex-min wordindex-max &optional force &aux (n-fixups 0))
sbcl-2.0.11/tools-for-build/editcore.lisp:1508: (do* ((base-addr (logandc2 (get-lisp-obj-address obj) lowtag-mask))
sbcl-2.0.11/tools-for-build/editcore.lisp-1509- (sap (int-sap base-addr))
sbcl-2.0.11/tools-for-build/editcore.lisp-1510- ;; core-offs is the offset in the lisp.core ELF section.
sbcl-2.0.11/tools-for-build/editcore.lisp:1511: (core-offs (- base-addr (sap-int (car spaces))))
sbcl-2.0.11/tools-for-build/editcore.lisp-1512- (i wordindex-min (1+ i)))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1595- (unless (= (space-id space) immobile-varyobj-core-space-id)
sbcl-2.0.11/tools-for-build/editcore.lisp:1596: (let* ((logical-addr (space-addr space))
sbcl-2.0.11/tools-for-build/editcore.lisp-1597- (size (space-size space))
sbcl-2.0.11/tools-for-build/editcore.lisp:1598: (physical-addr (space-physaddr space spaces))
sbcl-2.0.11/tools-for-build/editcore.lisp-1599- (physical-end (sap+ physical-addr size))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1657- (data-page (%vector-raw-bits ,buffer (+ index 2)))
sbcl-2.0.11/tools-for-build/editcore.lisp:1658: (addr (%vector-raw-bits ,buffer (+ index 3)))
sbcl-2.0.11/tools-for-build/editcore.lisp-1659- (npages (%vector-raw-bits ,buffer (+ index 4))))
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1688-;;; The ".core" file is a native core file used for starting a binary that
sbcl-2.0.11/tools-for-build/editcore.lisp:1689:;;; contains the asm code using the "--core" argument. The "-core.o" file
sbcl-2.0.11/tools-for-build/editcore.lisp-1690-;;; is for linking in to a binary that needs no "--core" argument.
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1745- (when (= id immobile-fixedobj-core-space-id)
sbcl-2.0.11/tools-for-build/editcore.lisp:1746: (setq fixedobj-range (cons addr (ash nwords word-shift))))
sbcl-2.0.11/tools-for-build/editcore.lisp-1747- (when (plusp npages) ; enqueue
##############################################
sbcl-2.0.11/tools-for-build/editcore.lisp-1966- (destructuring-bind (input asm) args
sbcl-2.0.11/tools-for-build/editcore.lisp:1967: (split-core input asm :enable-pie pie))))
sbcl-2.0.11/tools-for-build/editcore.lisp-1968- ((string= (car args) "copy")
##############################################
sbcl-2.0.11/tests/heap-reloc/build-test-sbcl-3-lisp="../../run-sbcl.sh $SBCL_ARGS"
sbcl-2.0.11/tests/heap-reloc/build-test-sbcl:4:m_arg=`$lisp --eval '(progn #+x86 (princ " -m32"))' --quit`
sbcl-2.0.11/tests/heap-reloc/build-test-sbcl:5:libs=`$lisp --eval '(progn #+sb-core-compression (princ " -lz"))' --quit`
sbcl-2.0.11/tests/heap-reloc/build-test-sbcl-6-
##############################################
sbcl-2.0.11/tests/stream.test.sh-42-check_status_maybe_lose bivalent-standard-output $?
sbcl-2.0.11/tests/stream.test.sh:43:test_output=`cat $tmpfilename.out`
sbcl-2.0.11/tests/stream.test.sh-44-rm -f $tmpfilename.out
##############################################
sbcl-2.0.11/tests/stream.test.sh-58-check_status_maybe_lose bivalent-error-output $?
sbcl-2.0.11/tests/stream.test.sh:59:test_output=`cat $tmpfilename.out`
sbcl-2.0.11/tests/stream.test.sh-60-rm -f $tmpfilename.out
##############################################
sbcl-2.0.11/tests/compiler.pure.lisp-4652- do (assert (sb-kernel:type= (sb-kernel:specifier-type
sbcl-2.0.11/tests/compiler.pure.lisp:4653: (car (cdaddr (sb-kernel:%simple-fun-type
sbcl-2.0.11/tests/compiler.pure.lisp-4654- (checked-compile function)))))
##############################################
sbcl-2.0.11/tests/script.test.sh-73-check_status_maybe_lose "--script exit status when stdin closed" $? 0 "(as given)"
sbcl-2.0.11/tests/script.test.sh:74:if [ -s $tmperr ] || [ "ONE" != `cat $tmpout` ]
sbcl-2.0.11/tests/script.test.sh-75-then
##############################################
sbcl-2.0.11/tests/script.test.sh-84-check_status_maybe_lose "--script exit status when stdout closed" $? 0 "(as given)"
sbcl-2.0.11/tests/script.test.sh:85:if [ -s $tmperr ] || [ "foo" != `cat $tmpout` ]
sbcl-2.0.11/tests/script.test.sh-86-then
##############################################
sbcl-2.0.11/tests/script.test.sh-91-check_status_maybe_lose "--script exit status from stdin" $? 0 "(ok)"
sbcl-2.0.11/tests/script.test.sh:92:if [ -s $tmperr ] || [ "Ok!" != `cat $tmpout` ]
sbcl-2.0.11/tests/script.test.sh-93-then
##############################################
sbcl-2.0.11/tests/script.test.sh-103- < /dev/null > $tmpout
sbcl-2.0.11/tests/script.test.sh:104:if [ "`grep -c :SCRIPT-OK $tmpout`" != 1 ] ; then
sbcl-2.0.11/tests/script.test.sh-105- echo "failed --script test using PRINT"
##############################################
sbcl-2.0.11/tests/script.test.sh-116-chmod +x $tmpfasl
sbcl-2.0.11/tests/script.test.sh:117:SBCL_HOME=`dirname $SBCL_CORE` ./$tmpfasl >$tmpout 2>$tmperr
sbcl-2.0.11/tests/script.test.sh-118-check_status_maybe_lose "--script exit status from fasl" $? 0 "(ok)"
sbcl-2.0.11/tests/script.test.sh:119:if [ -s $tmperr ] || [ "Hello, Fasl" != "`cat $tmpout`" ]
sbcl-2.0.11/tests/script.test.sh-120-then
##############################################
sbcl-2.0.11/tests/arith.pure.lisp-846- (declare (fixnum x))
sbcl-2.0.11/tests/arith.pure.lisp:847: ;; The asm code went wrong only if the result was not in the same
sbcl-2.0.11/tests/arith.pure.lisp-848- ;; register as the source, so make sure that X is live throughout
##############################################
sbcl-2.0.11/tests/bit-vector.impure.lisp-117- (second (sb-sys:sap+ first sb-c:+backend-page-bytes+))
sbcl-2.0.11/tests/bit-vector.impure.lisp:118: (addr (sb-sys:sap+ second (- n-bytes)))
sbcl-2.0.11/tests/bit-vector.impure.lisp-119- (n-bits (* 2 sb-vm:n-word-bits)))
##############################################
sbcl-2.0.11/tests/bit-vector.impure.lisp-150- (second (sb-sys:sap+ first sb-c:+backend-page-bytes+))
sbcl-2.0.11/tests/bit-vector.impure.lisp:151: (addr (sb-sys:sap+ second (- n-bytes))))
sbcl-2.0.11/tests/bit-vector.impure.lisp-152- (assert (sb-sys:sap=
##############################################
sbcl-2.0.11/tests/toplevel.test.sh-25- < /dev/null > $TEST_FILESTEM
sbcl-2.0.11/tests/toplevel.test.sh:26:if [ "`grep -c FOO::BAR $TEST_FILESTEM`" != 1 ] ; then
sbcl-2.0.11/tests/toplevel.test.sh-27- echo failed DEFPACKAGE-then-PRINT from --eval form
##############################################
sbcl-2.0.11/tests/toplevel.test.sh-33- > $TEST_FILESTEM
sbcl-2.0.11/tests/toplevel.test.sh:34:if [ "`grep -c FOO::BAR $TEST_FILESTEM`" != 1 ] ; then
sbcl-2.0.11/tests/toplevel.test.sh-35- echo failed DEFPACKAGE-then-PRINT with --quit
##############################################
sbcl-2.0.11/tests/toplevel.test.sh-40- > $TEST_FILESTEM
sbcl-2.0.11/tests/toplevel.test.sh:41:if [ "`grep -c FOO::BAR $TEST_FILESTEM`" != 1 ] ; then
sbcl-2.0.11/tests/toplevel.test.sh-42- echo failed DEFPACKAGE-then-PRINT with delayed --quit
##############################################
sbcl-2.0.11/tests/toplevel.test.sh-50- > $TEST_FILESTEM
sbcl-2.0.11/tests/toplevel.test.sh:51:if [ "`grep -c FOO::BAR $TEST_FILESTEM`" != 1 ] ; then
sbcl-2.0.11/tests/toplevel.test.sh-52- echo failed DEFPACKAGE-then-PRINT with --non-interactive
##############################################
sbcl-2.0.11/tests/toplevel.test.sh-67- >$TEST_FILESTEM 2>&1
sbcl-2.0.11/tests/toplevel.test.sh:68:if [ "`grep -c FOO::BAR $TEST_FILESTEM`" != 1 ] ; then
sbcl-2.0.11/tests/toplevel.test.sh-69- echo failed DEFPACKAGE-then-PRINT with --non-interactive and error
##############################################
sbcl-2.0.11/tests/toplevel.test.sh-71-fi
sbcl-2.0.11/tests/toplevel.test.sh:72:if [ "`grep -c -i SIMPLE-ERROR $TEST_FILESTEM`" -lt 1 ] ; then
sbcl-2.0.11/tests/toplevel.test.sh-73- echo no error seen in --non-interactive test
##############################################
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-52-
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:53:(defun disasm (safety expr &optional (remove-epilogue t))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-54- ;; This lambda has a name because if it doesn't, then the name
##############################################
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-81- ;; It should take 1 instruction to read a known thread-local var
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:82: (assert (= (length (disasm 1 'sb-thread:*current-thread*)) 1))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:83: (assert (= (length (disasm 1 'sb-sys:*interrupt-pending*)) 1))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:84: (assert (= (length (disasm 1 'sb-kernel:*gc-inhibit*)) 1))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:85: (assert (= (length (disasm 1 'sb-kernel:*restart-clusters*)) 1))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:86: (assert (= (length (disasm 1 'sb-kernel:*handler-clusters*)) 1)))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-87-
##############################################
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-102- ;; (TODO: could use "CMOVEQ RDX, [RIP-n]" in immobile code)
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:103: (let ((text (disasm 0 '*print-base*)))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-104- (assert (= (length text) 3)) ; number of lines
##############################################
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-112- ;; 480F4450F9 CMOVEQ RDX, [RAX-7]
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:113: (let ((text (disasm 0 'foo)))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-114- (assert (= (length text) 4))
##############################################
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-131- ;; (TODO: could use "CMOVEQ RDX, [RIP-n]" in immobile code)
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:132: (let ((text (disasm 0 '*blub*)))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-133- (assert (= (length text) 4))
##############################################
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-142- ;; 480F4450F9 CMOVEQ RDX, [RAX-7]
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp:143: (assert (= (length (disasm 0 'blub)) 5)))
sbcl-2.0.11/tests/x86-64-codegen.impure.lisp-144-
##############################################
sbcl-2.0.11/tests/gc.impure-cload.lisp-55- (symbol-macrolet ((free-ptr (aref a 0))
sbcl-2.0.11/tests/gc.impure-cload.lisp:56: (end-addr (aref a 1))
sbcl-2.0.11/tests/gc.impure-cload.lisp-57- (last-page (aref a 2))
sbcl-2.0.11/tests/gc.impure-cload.lisp:58: (start-addr (aref a 3)))
sbcl-2.0.11/tests/gc.impure-cload.lisp-59- (gc) ; This will leave the code region in a closed state
##############################################
sbcl-2.0.11/tests/gc.impure-cload.lisp-183- (wp (logbitp page-write-protect-bit flags))
sbcl-2.0.11/tests/gc.impure-cload.lisp:184: (page-addr (+ sb-vm:dynamic-space-start
sbcl-2.0.11/tests/gc.impure-cload.lisp-185- (* sb-vm:gencgc-card-bytes page)))
##############################################
sbcl-2.0.11/tests/gc.impure.lisp-277- ;; M-A-O disables GC, therefore GET-LISP-OBJ-ADDRESS is safe
sbcl-2.0.11/tests/gc.impure.lisp:278: (let ((obj-addr (sb-kernel:get-lisp-obj-address obj))
sbcl-2.0.11/tests/gc.impure.lisp-279- (array (cond ((= type sb-vm:code-header-widetag)
##############################################
sbcl-2.0.11/tests/gc.impure.lisp-342- (when (>= (sb-vm::primitive-object-size obj) (* 4 sb-vm:gencgc-card-bytes))
sbcl-2.0.11/tests/gc.impure.lisp:343: (let* ((addr (sb-kernel:get-lisp-obj-address obj))
sbcl-2.0.11/tests/gc.impure.lisp-344- (pte (deref sb-vm:page-table (sb-vm:find-page-index addr))))
##############################################
sbcl-2.0.11/tests/subr.sh-34-# Scripts that use these variables should quote them.
sbcl-2.0.11/tests/subr.sh:35:TEST_BASENAME=`basename $0`
sbcl-2.0.11/tests/subr.sh:36:TEST_FILESTEM=`basename "${TEST_BASENAME}" | sed -e 's/\.sh$//' -e 's/\./-/g'`
sbcl-2.0.11/tests/subr.sh-37-: ${TEST_BASEDIR:="$SBCL_PWD"}
##############################################
sbcl-2.0.11/tests/futex-wait.test.sh-26-
sbcl-2.0.11/tests/futex-wait.test.sh:27:tracelog=`mktemp ${TMPDIR:-/tmp}/$TEST_FILESTEM.XXXXXX`
sbcl-2.0.11/tests/futex-wait.test.sh-28-
##############################################
sbcl-2.0.11/tests/futex-wait.test.sh-97-
sbcl-2.0.11/tests/futex-wait.test.sh:98:n=`awk 'END{print NR}' < $tracelog`
sbcl-2.0.11/tests/futex-wait.test.sh-99-rm $tracelog
##############################################
sbcl-2.0.11/tests/undefined-classoid-bug.test.sh-11-for f in $FILES; do
sbcl-2.0.11/tests/undefined-classoid-bug.test.sh:12: (cd "$SBCL_PWD"; cp `eval "echo $f"` "$TEST_DIRECTORY");
sbcl-2.0.11/tests/undefined-classoid-bug.test.sh-13-done
##############################################
sbcl-2.0.11/tests/hash.impure.lisp-44- (destructuring-bind (old-addr old-hash object) thing
sbcl-2.0.11/tests/hash.impure.lisp:45: (let* ((new-addr (sb-kernel:get-lisp-obj-address object))
sbcl-2.0.11/tests/hash.impure.lisp-46- (new-hash (sxhash object)))
##############################################
sbcl-2.0.11/tests/win32-stack-unwind.c-62- void* retval;
sbcl-2.0.11/tests/win32-stack-unwind.c:63: asm volatile ("movl %%fs:0,%0": "=r" (retval));
sbcl-2.0.11/tests/win32-stack-unwind.c-64- return retval;
##############################################
sbcl-2.0.11/tests/win32-stack-unwind.c-68-{
sbcl-2.0.11/tests/win32-stack-unwind.c:69: asm volatile ("movl %0,%%fs:0": : "r" (frame));
sbcl-2.0.11/tests/win32-stack-unwind.c-70-}
##############################################
sbcl-2.0.11/tests/elfcore.test.sh-117- echo Trial $i
sbcl-2.0.11/tests/elfcore.test.sh:118: i=`expr $i + 1`
sbcl-2.0.11/tests/elfcore.test.sh-119- $TEST_DIRECTORY/relocating-elfcore-test $SBCL_ARGS --eval '(assert (zerop (f 1 2 3)))' --quit
##############################################
sbcl-2.0.11/tests/relocation.test.sh-30- echo Trial $i
sbcl-2.0.11/tests/relocation.test.sh:31: i=`expr $i + 1`
sbcl-2.0.11/tests/relocation.test.sh-32- $test_sbcl --lose-on-corruption --disable-ldb --noinform --core ../output/sbcl.core \
##############################################
sbcl-2.0.11/run-sbcl.sh-20- # [ -h should guarantee that readlink output will be non-null
sbcl-2.0.11/run-sbcl.sh:21: link=`readlink -n "$this"`
sbcl-2.0.11/run-sbcl.sh-22- # if absolute path
##############################################
sbcl-2.0.11/run-sbcl.sh-25- else
sbcl-2.0.11/run-sbcl.sh:26: this=`dirname "$this"`/"$link"
sbcl-2.0.11/run-sbcl.sh-27- fi
sbcl-2.0.11/run-sbcl.sh-28-done
sbcl-2.0.11/run-sbcl.sh:29:BASE=`dirname "$this"`
sbcl-2.0.11/run-sbcl.sh-30-
##############################################
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety-18-
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety:19:Scenario 1: store fdefn-fun then fdefn-raw-addr (status quo)
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety-20-===========
##############################################
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety-49- ...
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety:50: [second store]: thread A stores FUN2 into raw addr (trips write barrier)
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety-51- --> Heap corruption of FDEFN is now permanent.
##############################################
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety-73- ...
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety:74: [second store]: thread A stores FUN1 into raw addr (trips write barrier)
sbcl-2.0.11/doc/internals-notes/fdefn-gc-safety-75- WP invariant is restored.
##############################################
sbcl-2.0.11/doc/manual/ffi.texinfo-768- ;; Get a pointer to the array so that we don't have to keep extracting it:
sbcl-2.0.11/doc/manual/ffi.texinfo:769: (with-alien ((a (* (array (* (struct foo)) 100)) (addr (slot f 'b))))
sbcl-2.0.11/doc/manual/ffi.texinfo-770- ;; Loop over the first N elements and stash them in the result vector.
##############################################
sbcl-2.0.11/doc/manual/ffi.texinfo-999-@c LaTeX ;;
sbcl-2.0.11/doc/manual/ffi.texinfo:1000:@c LaTeX (let ((addr (+ 8 (logandc1 7 (kernel:get-lisp-obj-address data))))
sbcl-2.0.11/doc/manual/ffi.texinfo-1001-@c LaTeX (type-size (let ((type (array-element-type data)))
##############################################
sbcl-2.0.11/doc/manual/ffi.texinfo-1019-@c LaTeX (system:int-sap (the (unsigned-byte 32)
sbcl-2.0.11/doc/manual/ffi.texinfo:1020:@c LaTeX (+ addr (* type-size start)))))))
sbcl-2.0.11/doc/manual/ffi.texinfo-1021-@c LaTeX \end{example}
##############################################
sbcl-2.0.11/doc/manual/ffi.texinfo-1047-@c LaTeX ;; Initialize X and Y somehow
sbcl-2.0.11/doc/manual/ffi.texinfo:1048:@c LaTeX (let ((x-addr (system:int-sap (array-data-address x)))
sbcl-2.0.11/doc/manual/ffi.texinfo:1049:@c LaTeX (y-addr (system:int-sap (array-data-address y))))
sbcl-2.0.11/doc/manual/ffi.texinfo-1050-@c LaTeX (dotprod x-addr y-addr 1000000)))
##############################################
sbcl-2.0.11/make-target-contrib.sh-43-if [ "$OSTYPE" = "cygwin" ] ; then
sbcl-2.0.11/make-target-contrib.sh:44: SBCL_PWD=`echo $SBCL_PWD | sed s/\ /\\\\\\\\\ /g`
sbcl-2.0.11/make-target-contrib.sh-45-fi
##############################################
sbcl-2.0.11/NEWS-2365- systems. (regression since 1.0.53)
sbcl-2.0.11/NEWS:2366: * bug fix: GC deadlocks from dladdr() on certain platforms.
sbcl-2.0.11/NEWS-2367- * bug fix: broken standard streams no longer automatically cause recursive
##############################################
sbcl-2.0.11/contrib/asdf/README.md-83-a suitable Common Lisp implementation, you may run all the tests
sbcl-2.0.11/contrib/asdf/README.md:84:on a given Common Lisp implementation `$L`, with your favorite installed system `$S`, using:
sbcl-2.0.11/contrib/asdf/README.md-85-
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-20- (let ((filename (first address))
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp:21: (sockaddr (or sockaddr (sockint::allocate-sockaddr-un))))
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-22- (setf (sockint::sockaddr-un-family sockaddr) sockint::af-local)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-29-
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp:30:(defmethod size-of-sockaddr ((socket local-socket))
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-31- sockint::size-of-sockaddr-un)
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-32-
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp:33:(defmethod bits-of-sockaddr ((socket local-socket) sockaddr &optional size)
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-34- "Return the file name of the local socket address SOCKADDR."
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-65-
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp:66: (let ((sockaddr (or sockaddr (sockint::allocate-sockaddr-un-abstract))))
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-67- (setf (sockint::sockaddr-un-abstract-family sockaddr) sockint::af-local)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-77- octet))
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp:78: (values sockaddr (+ 2 1 (length path/octets))))
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-79- (t
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-84-
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp:85:(defmethod size-of-sockaddr ((socket local-abstract-socket))
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-86- sockint::size-of-sockaddr-un-abstract)
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-87-
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp:88:(defmethod bits-of-sockaddr ((socket local-abstract-socket) sockaddr
sbcl-2.0.11/contrib/sb-bsd-sockets/local.lisp-89- &optional
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-67-
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:68:(defun call-with-socket-addr (socket sockaddr-args thunk)
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-69- (multiple-value-bind (sockaddr size)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-75-
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:76:(defmacro with-socket-addr ((sockaddr-var size-of-sockaddr-var
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-77- &optional sockaddr-args)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-82-
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:83:(defmacro with-socket-fd-and-addr ((fd-var sockaddr-var size-of-sockaddr-var
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-84- &optional sockaddr-args)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-87- `(let ((,fd-var (socket-file-descriptor ,socket)))
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:88: (with-socket-addr (,sockaddr-var ,size-of-sockaddr-var ,sockaddr-args)
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-89- ,socket
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-96-(defmethod socket-bind ((socket socket) &rest address)
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:97: (with-socket-fd-and-addr (fd sockaddr size address) socket
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-98- (socket-error-case ("bind" (sockint::bind fd sockaddr size)))))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-102-(defmethod socket-accept ((socket socket))
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:103: (with-socket-fd-and-addr (fd sockaddr size) socket
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-104- (socket-error-case ("accept" (sockint::accept fd sockaddr size) new-fd)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-115-(defmethod socket-connect ((socket socket) &rest peer)
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:116: (with-socket-fd-and-addr (fd sockaddr size peer) socket
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-117- (socket-error-case ("connect" (sockint::connect fd sockaddr size))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-120-(defmethod socket-peername ((socket socket))
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:121: (with-socket-fd-and-addr (fd sockaddr size) socket
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-122- (socket-error-case ("getpeername"
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-127-(defmethod socket-name ((socket socket))
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:128: (with-socket-fd-and-addr (fd sockaddr size) socket
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-129- (socket-error-case ("getsockname"
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-143- (element-type 'character))
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:144: (with-socket-fd-and-addr (fd sockaddr size) socket
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-145- (let ((flags
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-170- (sockint::recvfrom fd copy-buffer length
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:171: flags sockaddr (sb-alien:addr sa-len))
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-172- len)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-219- (if address
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp:220: (with-socket-fd-and-addr (fd sockaddr size address) socket
sbcl-2.0.11/contrib/sb-bsd-sockets/sockets.lisp-221- (sb-alien:with-alien ((sa-len sockint::socklen-t size))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp-75- (port (second address))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp:76: (sockaddr (or sockaddr (sockint::allocate-sockaddr-in6))))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp-77- (when (and host port)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp-104-
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp:105:(defmethod size-of-sockaddr ((socket inet6-socket))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp-106- sockint::size-of-sockaddr-in6)
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp-107-
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp:108:(defmethod bits-of-sockaddr ((socket inet6-socket) sockaddr &optional size)
sbcl-2.0.11/contrib/sb-bsd-sockets/inet6.lisp-109- "Returns address and port of SOCKADDR as multiple values"
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants-gethostbyname.lisp-5-((:function gethostbyname ("gethostbyname" (* hostent) (name c-string)))
sbcl-2.0.11/contrib/sb-bsd-sockets/constants-gethostbyname.lisp:6: (:function gethostbyaddr ("gethostbyaddr" (* hostent)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants-gethostbyname.lisp:7: (addr (* t))
sbcl-2.0.11/contrib/sb-bsd-sockets/constants-gethostbyname.lisp-8- (len int)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/sb-bsd-sockets.texinfo-176-@code{getaddrinfo(3)} and @code{gethostinfo(3)}, or to
sbcl-2.0.11/contrib/sb-bsd-sockets/sb-bsd-sockets.texinfo:177:@code{gethostbyname(3)} @code{gethostbyaddr(3)} on platforms where
sbcl-2.0.11/contrib/sb-bsd-sockets/sb-bsd-sockets.texinfo-178-the preferred functions are not available. The exact details of
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-19-(defun naturalize-unsigned-byte-8-array (array length)
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp:20: (let ((addr (make-array length :element-type '(unsigned-byte 8))))
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-21- (dotimes (i length)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-75- "Returns a HOST-ENT instance for ADDRESS, which should be a vector of
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp:76: (integer 0 255), or signals a NAME-SERVICE-ERROR. See gethostbyaddr(3)
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-77- for details."
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-78- (sb-int:with-system-mutex (**gethostby-lock** :allow-with-interrupts t)
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp:79: (sockint::with-in-addr packed-addr ()
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-80- (let ((addr-vector (coerce address 'vector)))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-148-elements in case of an IPv6 address, or signals a NAME-SERVICE-ERROR.
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp:149:See gethostbyaddr(3) for details."
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-150- (declare (optimize speed))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-153- ((vector (unsigned-byte 8) 4)
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp:154: (let ((sockaddr (sb-alien:make-alien sockint::sockaddr-in)))
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-155- #+darwin (setf (sockint::sockaddr-in-len sockaddr) 16)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-164- ((vector (unsigned-byte 8) 16)
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp:165: (let ((sockaddr (sb-alien:make-alien sockint::sockaddr-in6)))
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-166- (setf (sockint::sockaddr-in6-family sockaddr) sockint::af-inet6)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-176- (sockint::getnameinfo
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp:177: (sb-alien:cast sockaddr (* t)) sockaddr-size
sbcl-2.0.11/contrib/sb-bsd-sockets/name-service.lisp-178- (sb-alien:cast host-buf (* char)) ni-max-host
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-113- (:integer inaddr-any "INADDR_ANY")
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:114: (:structure in-addr ("struct in_addr"
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-115- ((array (unsigned 8)) addr "u_int32_t" "s_addr")))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-124- ((array (unsigned 8)) addr "struct in_addr" "sin_addr")))
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:125: (:structure in6-addr ("struct in6_addr"
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-126- ((array (unsigned 8)) addr "unsigned char" "s6_addr[16]")))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-174- (sockfd int)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:175: (my-addr (* t)) ; KLUDGE: sockaddr-in or sockaddr-un?
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-176- (addrlen socklen-t)))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-181- (socket int)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:182: (my-addr (* t)) ; KLUDGE: sockaddr-in or sockaddr-un?
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-183- (addrlen socklen-t :in-out)))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-185- (socket int)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:186: (her-addr (* t)) ; KLUDGE: sockaddr-in or sockaddr-un?
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-187- (addrlen socklen-t :in-out)))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-189- (socket int)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:190: (my-addr (* t)) ; KLUDGE: sockaddr-in or sockaddr-un?
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-191- (addrlen socklen-t :in-out)))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-193- (socket int)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:194: (his-addr (* t)) ; KLUDGE: sockaddr-in or sockaddr-un?
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-195- (addrlen socklen-t)))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-204- (flags int)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:205: (sockaddr (* t)) ; KLUDGE: sockaddr-in or sockaddr-un?
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-206- (socklen (* socklen-t))))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-217- (flags int)
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp:218: (sockaddr (* t)) ; KLUDGE: sockaddr-in or sockaddr-un?
sbcl-2.0.11/contrib/sb-bsd-sockets/constants.lisp-219- (socklen socklen-t)))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-69- (port (second address))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp:70: (sockaddr (or sockaddr (sockint::allocate-sockaddr-in))))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-71- (when (and host port)
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-73- (let ((in-port (sockint::sockaddr-in-port sockaddr))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp:74: (in-addr (sockint::sockaddr-in-addr sockaddr)))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-75- (declare (fixnum port))
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-96-
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp:97:(defmethod size-of-sockaddr ((socket inet-socket))
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-98- sockint::size-of-sockaddr-in)
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-99-
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp:100:(defmethod bits-of-sockaddr ((socket inet-socket) sockaddr &optional size)
sbcl-2.0.11/contrib/sb-bsd-sockets/inet4.lisp-101- "Returns address and port of SOCKADDR as multiple values"
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/protocol.lisp-14-
sbcl-2.0.11/contrib/sb-bsd-sockets/protocol.lisp:15:(defgeneric bits-of-sockaddr (socket sockaddr &optional size)
sbcl-2.0.11/contrib/sb-bsd-sockets/protocol.lisp-16- (:documentation
##############################################
sbcl-2.0.11/contrib/sb-bsd-sockets/protocol.lisp-19-
sbcl-2.0.11/contrib/sb-bsd-sockets/protocol.lisp:20:(defgeneric size-of-sockaddr (socket)
sbcl-2.0.11/contrib/sb-bsd-sockets/protocol.lisp-21- (:documentation
##############################################
sbcl-2.0.11/contrib/sb-capstone/capstone.lisp-250-(defconstant cs-opt-syntax-noregname 3)
sbcl-2.0.11/contrib/sb-capstone/capstone.lisp:251:(defconstant cs-opt-syntax-masm 4)
sbcl-2.0.11/contrib/sb-capstone/capstone.lisp-252-
##############################################
sbcl-2.0.11/contrib/sb-capstone/capstone.lisp-308-(defconstant cs-err-x86-intel 13)
sbcl-2.0.11/contrib/sb-capstone/capstone.lisp:309:(defconstant cs-err-x86-masm 14)
sbcl-2.0.11/contrib/sb-capstone/capstone.lisp-310-
##############################################
sbcl-2.0.11/contrib/sb-grovel/example-constants.lisp-22- (socket int)
sbcl-2.0.11/contrib/sb-grovel/example-constants.lisp:23: (my-addr (* t))
sbcl-2.0.11/contrib/sb-grovel/example-constants.lisp-24- (addrlen int :in-out)))
##############################################
sbcl-2.0.11/contrib/sb-grovel/example-constants.lisp-26- (sockfd int)
sbcl-2.0.11/contrib/sb-grovel/example-constants.lisp:27: (my-addr (* t))
sbcl-2.0.11/contrib/sb-grovel/example-constants.lisp-28- (addrlen int)))
##############################################
sbcl-2.0.11/contrib/sb-sprof/record.lisp-249- ;; Give up if we land in the 2 or 3 instructions of a
sbcl-2.0.11/contrib/sb-sprof/record.lisp:250: ;; code component sans simple-fun that is not an asm routine.
sbcl-2.0.11/contrib/sb-sprof/record.lisp-251- ;; While it's conceivable that this could be improved,
##############################################
sbcl-2.0.11/html-distribution.sh-9-tar cf $b-documentation-html.tar \
sbcl-2.0.11/html-distribution.sh:10: `find $b -name '*.htm*'` \
sbcl-2.0.11/html-distribution.sh-11- $b/COPYING $b/CREDITS $b/README \
##############################################
sbcl-2.0.11/binary-distribution.sh-16- $b/src/runtime/sbcl.mk \
sbcl-2.0.11/binary-distribution.sh:17: `grep '^LIBSBCL=' $b/src/runtime/sbcl.mk | cut -d= -f2- | while read lib; do echo $b/src/runtime/$lib; done` \
sbcl-2.0.11/binary-distribution.sh-18- $b/BUGS $b/COPYING $b/CREDITS $b/INSTALL $b/NEWS $b/README \
##############################################
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh-48-fi
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh:49:version_base=`git rev-parse "$version_root"`
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh:50:version_tag=`git describe --tags --match="sbcl*" --abbrev=0 $version_base`
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh:51:version_release=`echo $version_tag | sed -e 's/sbcl[_-]//' | sed -e 's/_/\./g'`
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh-52-# Using wc -l instead of --count argument to rev-list because
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh-53-# pre-1.7.2 Gits are still common out in the wilderness.
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh:54:version_n_root=`git rev-list $version_base --not $version_tag | wc -l | sed -e 's/[ \t]//g'`
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh:55:version_n_branch=`git rev-list HEAD --not $version_base | wc -l | sed -e 's/[ \t]//g'`
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh-56-if [ -z "$NO_GIT_HASH_IN_VERSION" ]
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh-57-then
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh:58: version_hash="-`git rev-parse --short $version_head`"
sbcl-2.0.11/.pc/disable-version-build.patch/generate-version.sh-59-else
##############################################
sbcl-2.0.11/.pc/skip-some-autopkgtests.patch/tests/elfcore.test.sh-117- echo Trial $i
sbcl-2.0.11/.pc/skip-some-autopkgtests.patch/tests/elfcore.test.sh:118: i=`expr $i + 1`
sbcl-2.0.11/.pc/skip-some-autopkgtests.patch/tests/elfcore.test.sh-119- $TEST_DIRECTORY/relocating-elfcore-test $SBCL_ARGS --eval '(assert (zerop (f 1 2 3)))' --quit
##############################################
sbcl-2.0.11/.pc/skip-some-autopkgtests.patch/tests/relocation.test.sh-30- echo Trial $i
sbcl-2.0.11/.pc/skip-some-autopkgtests.patch/tests/relocation.test.sh:31: i=`expr $i + 1`
sbcl-2.0.11/.pc/skip-some-autopkgtests.patch/tests/relocation.test.sh-32- $test_sbcl --lose-on-corruption --disable-ldb --noinform --core ../output/sbcl.core \
##############################################
sbcl-2.0.11/generate-version.sh-48-fi
sbcl-2.0.11/generate-version.sh:49:version_base=`git rev-parse "$version_root"`
sbcl-2.0.11/generate-version.sh:50:version_tag=`git describe --tags --match="sbcl*" --abbrev=0 $version_base`
sbcl-2.0.11/generate-version.sh:51:version_release=`echo $version_tag | sed -e 's/sbcl[_-]//' | sed -e 's/_/\./g'`
sbcl-2.0.11/generate-version.sh-52-# Using wc -l instead of --count argument to rev-list because
sbcl-2.0.11/generate-version.sh-53-# pre-1.7.2 Gits are still common out in the wilderness.
sbcl-2.0.11/generate-version.sh:54:version_n_root=`git rev-list $version_base --not $version_tag | wc -l | sed -e 's/[ \t]//g'`
sbcl-2.0.11/generate-version.sh:55:version_n_branch=`git rev-list HEAD --not $version_base | wc -l | sed -e 's/[ \t]//g'`
sbcl-2.0.11/generate-version.sh-56-if [ -z "$NO_GIT_HASH_IN_VERSION" ]
sbcl-2.0.11/generate-version.sh-57-then
sbcl-2.0.11/generate-version.sh:58: version_hash="-`git rev-parse --short $version_head`"
sbcl-2.0.11/generate-version.sh-59-else