X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcas.lisp;h=9c1c611a80324dc7d953151dd3975b15f4d02473;hb=54da325f13fb41669869aea688ae195426c0e231;hp=72e5800803fa983974c9235723a66427c8e0752d;hpb=378a5e39c182b5c3ba14da80c157ad2c0021b25f;p=sbcl.git

diff --git a/src/code/cas.lisp b/src/code/cas.lisp
index 72e5800..9c1c611 100644
--- a/src/code/cas.lisp
+++ b/src/code/cas.lisp
@@ -21,7 +21,7 @@
 (def!macro cas (place old new &environment env)
   "Synonym for COMPARE-AND-SWAP.
 
-Addtionally DEFUN, DEFGENERIC, DEFMETHOD, FLET, and LABELS can be also used to
+Additionally DEFUN, DEFGENERIC, DEFMETHOD, FLET, and LABELS can be also used to
 define CAS-functions analogously to SETF-functions:
 
   (defvar *foo* nil)