--- gforth/traceall.fs 1999/12/30 20:43:25 1.1 +++ gforth/traceall.fs 2007/12/31 18:40:24 1.6 @@ -1,5 +1,22 @@ \ replacement for name +\ Copyright (C) 1999,2000,2003 Free Software Foundation, Inc. + +\ This file is part of Gforth. + +\ Gforth is free software; you can redistribute it and/or +\ modify it under the terms of the GNU General Public License +\ as published by the Free Software Foundation, either version 3 +\ of the License, or (at your option) any later version. + +\ This program is distributed in the hope that it will be useful, +\ but WITHOUT ANY WARRANTY; without even the implied warranty of +\ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +\ GNU General Public License for more details. + +\ You should have received a copy of the GNU General Public License +\ along with this program. If not, see http://www.gnu.org/licenses/. + : trace-name .s ." | " source >in @ /string type cr (name) ; : traceall ['] trace-name IS name ;