From 7780c5d98353a1117bd70ecc09860d700219dea0 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Tue, 27 Jan 2009 05:05:46 -0600 Subject: [PATCH] Fix two small typos --- core/kernel/kernel.factor | 4 ++-- core/vocabs/vocabs.factor | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/core/kernel/kernel.factor b/core/kernel/kernel.factor index a8f9281760..be1de76650 100644 --- a/core/kernel/kernel.factor +++ b/core/kernel/kernel.factor @@ -1,6 +1,7 @@ ! Copyright (C) 2004, 2008 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: kernel.private slots.private classes.tuple.private ; +USING: kernel.private slots.private math.private +classes.tuple.private ; IN: kernel DEFER: dip @@ -154,7 +155,6 @@ TUPLE: identity-tuple ; M: identity-tuple equal? 2drop f ; -USE: math.private : = ( obj1 obj2 -- ? ) 2dup eq? [ 2drop t ] [ 2dup both-fixnums? [ 2drop f ] [ equal? ] if diff --git a/core/vocabs/vocabs.factor b/core/vocabs/vocabs.factor index 13f79b04ec..fb9ce54672 100644 --- a/core/vocabs/vocabs.factor +++ b/core/vocabs/vocabs.factor @@ -11,7 +11,7 @@ name words main help source-loaded? docs-loaded? ; -! sources-loaded? slot is one of these two +! sources-loaded? slot is one of these three SYMBOL: +parsing+ SYMBOL: +running+ SYMBOL: +done+