Index: /trunk/source/lisp-kernel/pmcl-kernel.c
===================================================================
--- /trunk/source/lisp-kernel/pmcl-kernel.c	(revision 15451)
+++ /trunk/source/lisp-kernel/pmcl-kernel.c	(revision 15452)
@@ -327,5 +327,5 @@
 #endif
 #ifdef PROTECT_CSTACK
-  if (a->softlimit != a->harlimit) {
+  if (a->softlimit != a->hardlimit) {
     a->softprot=new_protected_area(a->hardlimit,a->softlimit,kSPsoftguard,CSTACK_SOFTPROT,true);
     a->hardprot=new_protected_area(lowlimit,a->hardlimit,kSPhardguard,CSTACK_HARDPROT,true);