X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fnumbers.lisp;h=40706afca99c9b2b5ffc9c2fdb89c4eacf0b8edf;hb=54da325f13fb41669869aea688ae195426c0e231;hp=58477076fdee70d38d077da97513ca044c8d113f;hpb=378a5e39c182b5c3ba14da80c157ad2c0021b25f;p=sbcl.git

diff --git a/src/code/numbers.lisp b/src/code/numbers.lisp
index 5847707..40706af 100644
--- a/src/code/numbers.lisp
+++ b/src/code/numbers.lisp
@@ -1322,7 +1322,7 @@ the first."
 (defun gcd (&rest integers)
   #!+sb-doc
   "Return the greatest common divisor of the arguments, which must be
-  integers. Gcd with no arguments is defined to be 0."
+  integers. GCD with no arguments is defined to be 0."
   (case (length integers)
     (0 0)
     (1 (abs (the integer (nth 0 integers))))