Update of /cvsroot/win32forth/win32forth-stc/src/lib
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv29788
Modified Files:
Tracer.f
Log Message:
Jos: Added also an output example for the STC version of Win32Forth.
Index: Tracer.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth-stc/src/lib/Tracer.f,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Tracer.f 17 May 2007 13:25:27 -0000 1.1
--- Tracer.f 19 May 2007 11:18:51 -0000 1.2
***************
*** 123,127 ****
demo-tracer abort
! \s
Enter the number trace points you like to see after the T>>.
--- 123,167 ----
demo-tracer abort
!
! \s Output examples:
!
! \ In the STC-version of Win32Forth you see:
!
! Enter the number trace points you like to see after the T>>.
! Negative input skips the number of trace points. 0 aborts.
!
! 19-5-2007 13:12:29. Used Win32Forth:
! version: 0.02.05 build: 767
!
! TRON TRACING T>> 99
!
! TROFF - [empty]
! Put trace in the definition to activate the tracer.
! Troff sets the tracer off, tron puts it on.
! i/o executed stack
! | | |
! \|/ \|/ \|/
!
! TRON \ tron - [empty]
! \ literal - [1] 3
! \ literal - [2] 3 0
! \ do - [empty]
! \ i - [1] 0
! 0 \ . - [empty]
! \ do - [empty]
! \ i - [1] 1
! 1 \ . - [empty]
! \ do - [empty]
! \ i - [1] 2
! 2 \ . - [empty]
! \ loop - [empty]
!
! \ cr - [empty]
! End of demo. \ ." - [empty]
! ; \ .unnest - [empty]
!
!
! \ In the ITC-version of Win32Forth you see:
!
Enter the number trace points you like to see after the T>>.
|
