X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fgc.lisp;h=af6a759c4c7bcde16551823c455e10f3e960d5e7;hb=7cca1cabd213d38218a40e973b06ca11c8546396;hp=6daa745d7fba525723d1516f8bfc5c6c777a371a;hpb=986a59ccc87c71f1028b5b1419bd7dc799334cc3;p=sbcl.git

diff --git a/src/code/gc.lisp b/src/code/gc.lisp
index 6daa745..af6a759 100644
--- a/src/code/gc.lisp
+++ b/src/code/gc.lisp
@@ -24,7 +24,7 @@
 #!-sb-fluid
 (declaim (inline current-dynamic-space-start))
 #!+gencgc
-(defun current-dynamic-space-spart () sb!vm:dynamic-space-start)
+(defun current-dynamic-space-start () sb!vm:dynamic-space-start)
 #!-gencgc
 (def-c-var-fun current-dynamic-space-start "current_dynamic_space")