File:  [gforth] / gforth / traceall.fs
Revision 1.1: download - view: text, annotated - select for diffs
Thu Dec 30 20:43:25 1999 UTC (24 years, 3 months ago) by pazsan
Branches: MAIN
CVS tags: HEAD
Added a interpreter trace (traceall)

Worked at getting EC Gforth working again.

    1: \ replacement for name
    2: 
    3: : trace-name .s ." | " source >in @ /string type cr (name) ;
    4: 
    5: : traceall  ['] trace-name IS name ;
    6: : notrace   [ what's name ] Literal IS name ;

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>