[Win32forth-cvs] win32forth/src/lib ExtStruct.f,1.6,1.7

[Jos v.d.V. <jo...@us...>]

Update of /cvsroot/win32forth/win32forth/src/lib
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10880/src/lib

Modified Files:
	ExtStruct.f 
Log Message:
Jos: Removed the unneeded allignment.

Index: ExtStruct.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/lib/ExtStruct.f,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** ExtStruct.f	19 Apr 2006 11:11:25 -0000	1.6
--- ExtStruct.f	19 Apr 2006 12:53:18 -0000	1.7
***************
*** 170,176 ****
  
  \ create a struct in the dictionary and fill it with zero's
! \ 19-4-2006 aligned the memory structures.
  : mkstruct:     ( size-struct <-name-> -- )
!        here dup aligned - allot    create here over allot swap erase ;
  
  in-application
--- 170,176 ----
  
  \ create a struct in the dictionary and fill it with zero's
! \ Note create alignes the memory structures.
  : mkstruct:     ( size-struct <-name-> -- )
!      create here over allot swap erase ;
  
  in-application