[Win32forth-cvs] win32forth-610old/src/kernel fkernel.f, 1.7, 1.8 version.f, 1.6, 1.7

[George H. <geo...@us...>]

Update of /cvsroot/win32forth/win32forth-610old/src/kernel
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv25290/win32forth-610old/src/kernel

Modified Files:
	fkernel.f version.f 
Log Message:
gah:Modified Locals-init to not check stack depth to fix bug reported by Elko Tchernev.

Index: fkernel.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth-610old/src/kernel/fkernel.f,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** fkernel.f	24 Aug 2006 11:44:07 -0000	1.7
--- fkernel.f	30 Oct 2006 12:01:42 -0000	1.8
***************
*** 5065,5069 ****
  
  |: LOCALS-INIT ( -- )                          \ init, check if locals validly used
! 	?csp				       \ make sure not used inside control structures
          ?comp                                  \ must be compiling
          PARMS THROW_LOCALSTWICE ?THROW        \ and not used before in the definition
--- 5065,5069 ----
  
  |: LOCALS-INIT ( -- )                          \ init, check if locals validly used
! \	?csp				       \ make sure not used inside control structures
          ?comp                                  \ must be compiling
          PARMS THROW_LOCALSTWICE ?THROW        \ and not used before in the definition
***************
*** 5880,5882 ****
  \ Prad~
  
-