[Win32forth-cvs] win32forth/src/tools dfc.F,1.3,1.4

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

Update of /cvsroot/win32forth/win32forth/src/tools
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv22470

Modified Files:
	dfc.F 
Log Message:
Jos: Restored the context.

Index: dfc.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/tools/dfc.F,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** dfc.F	28 Jun 2008 13:03:46 -0000	1.3
--- dfc.F	28 Jun 2008 14:05:24 -0000	1.4
***************
*** 878,883 ****
  FileOpenDialog NewFileName  "The new file" "Forth Files (*.f)|*.f|All Files (*.*)|*.*|"
  
  : .DfcFiles  ( -- )
! \ *G Asks for 2 files and show their differences in the console.
        conhndl start: OldFileName count dup 0=
                  if ." No OLD file selected" quit
--- 878,885 ----
  FileOpenDialog NewFileName  "The new file" "Forth Files (*.f)|*.f|All Files (*.*)|*.*|"
  
+ external
+ 
  : .DfcFiles  ( -- )
! \ *G Ask for 2 files and show their differences in the console.
        conhndl start: OldFileName count dup 0=
                  if ." No OLD file selected" quit
***************
*** 892,899 ****
  
  \in-system-ok ' .DfcFiles is .Dfc \ link into w32f console menu
-  .DfcFiles
  
! in-system
! external
  
  \s
--- 894,901 ----
  
  \in-system-ok ' .DfcFiles is .Dfc \ link into w32f console menu
  
! .DfcFiles
! 
! previous
  
  \s