X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fsparc%2Ffloat.lisp;h=5996928fa98329e47aa947e434ba53bf1f9f65a7;hb=b63c4fb9b98fa8188e17ba926e150ba417a74635;hp=b96cecc09eaf765fa222a60d2c7d172269925284;hpb=20b2378572cf7378f3f267e2234c4234dacfbdc9;p=sbcl.git

diff --git a/src/compiler/sparc/float.lisp b/src/compiler/sparc/float.lisp
index b96cecc..5996928 100644
--- a/src/compiler/sparc/float.lisp
+++ b/src/compiler/sparc/float.lisp
@@ -1314,7 +1314,7 @@
 	;; high 32 bits of the FSR, which contain the additional
 	;; %fcc's on the sparc V9.  If not, we don't need this, but we
 	;; do need to make sure that the unused bits are written as
-	;; zeroes, according the the V9 architecture manual.
+	;; zeroes, according the V9 architecture manual.
 	(inst sra new 0)
 	(inst srlx my-fsr 32)
 	(inst sllx my-fsr 32)