From c2c405712ae18e70a96c4a8cf584dde329f3d5f7 Mon Sep 17 00:00:00 2001 From: Nathan Froyd Date: Wed, 5 Apr 2006 12:37:56 +0000 Subject: [PATCH] 0.9.11.15: Restore annotation of calls to assembly routines in disassemblies. --- src/compiler/target-disassem.lisp | 4 ++-- version.lisp-expr | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/compiler/target-disassem.lisp b/src/compiler/target-disassem.lisp index ca73952..1c47cab 100644 --- a/src/compiler/target-disassem.lisp +++ b/src/compiler/target-disassem.lisp @@ -1957,9 +1957,9 @@ (unless (typep address 'address) (return-from maybe-note-assembler-routine nil)) (let ((name (or + (find-assembler-routine address) #!+linkage-table - (sb!sys:sap-foreign-symbol (sb!sys:int-sap address)) - (find-assembler-routine address)))) + (sb!sys:sap-foreign-symbol (sb!sys:int-sap address))))) (unless (null name) (note (lambda (stream) (if note-address-p diff --git a/version.lisp-expr b/version.lisp-expr index fd76ee0..6333f6b 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.9.11.14" +"0.9.11.15" -- 1.7.10.4