From 3386e28dad5b9a402196e6c9591221b5e4821690 Mon Sep 17 00:00:00 2001 From: dcs Date: Mon, 15 Mar 1999 08:08:20 +0000 Subject: Remove redundant code. --- sys/boot/ficl/softwords/freebsd.fr | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'sys/boot') diff --git a/sys/boot/ficl/softwords/freebsd.fr b/sys/boot/ficl/softwords/freebsd.fr index 6da771bf..9ebeacb 100644 --- a/sys/boot/ficl/softwords/freebsd.fr +++ b/sys/boot/ficl/softwords/freebsd.fr @@ -22,7 +22,7 @@ \ ** OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF \ ** SUCH DAMAGE. \ ** -\ ** $Id: freebsd.fr,v 1.1 1999/02/04 17:13:49 dcs Exp $ +\ ** $Id: freebsd.fr,v 1.2 1999/02/28 02:10:14 dcs Exp $ \ Words for use in scripts: \ % ignore errors here @@ -30,7 +30,7 @@ : tib> source >in @ tuck over >in ! - >r + r> ; : % tib> ['] evaluate catch drop ; -: $ tib> 2dup type cr ['] evaluate catch throw ; +: $ tib> 2dup type cr evaluate ; \ ** E N D F R E E B S D . F R -- cgit v1.1