[Win32forth-cvs] win32forth/apps/WinEd WinEd.f,1.12,1.13

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

Update of /cvsroot/win32forth/win32forth/apps/WinEd
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv15474/win32forth/apps/WinEd

Modified Files:
	WinEd.f 
Log Message:
gah:Modified WinEd to build in the same folder as Win32Forth

Index: WinEd.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/WinEd/WinEd.f,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -d -r1.12 -r1.13
*** WinEd.f	28 Jul 2006 07:43:03 -0000	1.12
--- WinEd.f	28 Jul 2006 10:05:28 -0000	1.13
***************
*** 136,141 ****
                  .free                   \ how much memory did we really use?
                  -1 ed-forth-count +!    \ remove myself from Forth count
                  0 0 ' wined ' APPLICATION catch WinEd.exe checkstack  \ save WinEd.exe
! 
                  1 ed-forth-count +!
                  swap forth-msg-chain !
--- 136,142 ----
                  .free                   \ how much memory did we really use?
                  -1 ed-forth-count +!    \ remove myself from Forth count
+                 &forthdir count &appdir place
                  0 0 ' wined ' APPLICATION catch WinEd.exe checkstack  \ save WinEd.exe
!                 &appdir off
                  1 ed-forth-count +!
                  swap forth-msg-chain !