0.6.11.10:

[sbcl.git] / src / code / cross-sap.lisp

diff --git a/src/code/cross-sap.lisp b/src/code/cross-sap.lisp
index cc48ea0..0db3c16 100644 (file)
--- a/src/code/cross-sap.lisp
+++ b/src/code/cross-sap.lisp
@@ -15,7 +15,8 @@
 ;;; SYSTEM-AREA-POINTER is not a primitive type in ANSI Common Lisp,
 ;;; so we need a compound type to represent it in the host Common Lisp
 ;;; at cross-compile time:
-(defstruct (system-area-pointer (:constructor make-sap) (:conc-name "SAP-"))
+(defstruct (system-area-pointer (:constructor make-sap)
+                               (:conc-name "SAP-"))
   ;; the integer representation of the address
   (int (error "missing SAP-INT argument") :type sap-int-type :read-only t))