X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fdebug-info.lisp;h=02a19c455870fd59f79c3cd9083955197f6c28fc;hb=5edd74f6911093805a009a152b32216b3dba59f7;hp=ecc94cf27aed37ba0b7d353d8e5342366bd84a09;hpb=b4282a9e700b7793a1efd97dfb37fc2fc39d24ad;p=sbcl.git

diff --git a/src/code/debug-info.lisp b/src/code/debug-info.lisp
index ecc94cf..02a19c4 100644
--- a/src/code/debug-info.lisp
+++ b/src/code/debug-info.lisp
@@ -31,7 +31,7 @@
 
 ;;; FIXME: old CMU CL representation follows:
 ;;;    Compiled debug variables are in a packed binary representation in the
-;;; DEBUG-FUN-VARIABLES:
+;;; DEBUG-FUN-VARS:
 ;;;    single byte of boolean flags:
 ;;;	uninterned name
 ;;;	   packaged name
@@ -118,7 +118,7 @@
   ;;   * the variable ID, when it has one
   ;;   * SC-offset of primary location, if it has one
   ;;   * SC-offset of save location, if it has one
-  (variables nil :type (or simple-vector null))
+  (vars nil :type (or simple-vector null))
   ;; a vector of the packed binary representation of the
   ;; COMPILED-DEBUG-BLOCKs in this function, in the order that the
   ;; blocks were emitted. The first block is the start of the
@@ -242,7 +242,7 @@
 
 ;;; ### For functions with XEPs, name could be represented more simply
 ;;; and compactly as some sort of info about with how to find the
-;;; FUNCTION-ENTRY that this is a function for. Actually, you really
+;;; function entry that this is a function for. Actually, you really
 ;;; hardly need any info. You can just chain through the functions in
 ;;; the component until you find the right one. Well, I guess you need
 ;;; to at least know which function is an XEP for the real function